@@ -1597,7 +1597,8 @@ int lsrkStep_TakeStepSSP43(ARKodeMem ark_mem, sunrealtype* dsmPtr, int* nflagPtr
1597
1597
N_VPrintFile (ark_mem -> tempv3 , ARK_LOGGER -> debug_fp );
1598
1598
#endif
1599
1599
1600
- N_VLinearSum (ONE , ark_mem -> ycur , ark_mem -> h * p5 , ark_mem -> tempv3 , ark_mem -> ycur );
1600
+ N_VLinearSum (ONE , ark_mem -> ycur , ark_mem -> h * p5 , ark_mem -> tempv3 ,
1601
+ ark_mem -> ycur );
1601
1602
if (!ark_mem -> fixedstep )
1602
1603
{
1603
1604
N_VLinearSum (ONE , ark_mem -> tempv1 , ark_mem -> h / rs , ark_mem -> tempv3 ,
@@ -1619,8 +1620,8 @@ int lsrkStep_TakeStepSSP43(ARKodeMem ark_mem, sunrealtype* dsmPtr, int* nflagPtr
1619
1620
ark_mem -> nst , 3 , ark_mem -> h , ark_mem -> tcur + ark_mem -> h );
1620
1621
#endif
1621
1622
1622
- retval = step_mem -> fe (ark_mem -> tcur + ark_mem -> h , ark_mem -> ycur , ark_mem -> tempv3 ,
1623
- ark_mem -> user_data );
1623
+ retval = step_mem -> fe (ark_mem -> tcur + ark_mem -> h , ark_mem -> ycur ,
1624
+ ark_mem -> tempv3 , ark_mem -> user_data );
1624
1625
step_mem -> nfe ++ ;
1625
1626
if (retval < 0 ) { return ARK_RHSFUNC_FAIL ; }
1626
1627
if (retval > 0 ) { return RHSFUNC_RECVR ; }
@@ -1675,7 +1676,8 @@ int lsrkStep_TakeStepSSP43(ARKodeMem ark_mem, sunrealtype* dsmPtr, int* nflagPtr
1675
1676
N_VPrintFile (ark_mem -> tempv3 , ARK_LOGGER -> debug_fp );
1676
1677
#endif
1677
1678
1678
- N_VLinearSum (ONE , ark_mem -> ycur , ark_mem -> h * p5 , ark_mem -> tempv3 , ark_mem -> ycur );
1679
+ N_VLinearSum (ONE , ark_mem -> ycur , ark_mem -> h * p5 , ark_mem -> tempv3 ,
1680
+ ark_mem -> ycur );
1679
1681
if (!ark_mem -> fixedstep )
1680
1682
{
1681
1683
N_VLinearSum (ONE , ark_mem -> tempv1 , ark_mem -> h / rs , ark_mem -> tempv3 ,
@@ -1897,8 +1899,8 @@ int lsrkStep_TakeStepSSP104(ARKodeMem ark_mem, sunrealtype* dsmPtr, int* nflagPt
1897
1899
ark_mem -> nst , 10 , ark_mem -> h , ark_mem -> tcur + ark_mem -> h );
1898
1900
#endif
1899
1901
1900
- retval = step_mem -> fe (ark_mem -> tcur + ark_mem -> h , ark_mem -> ycur , ark_mem -> tempv3 ,
1901
- ark_mem -> user_data );
1902
+ retval = step_mem -> fe (ark_mem -> tcur + ark_mem -> h , ark_mem -> ycur ,
1903
+ ark_mem -> tempv3 , ark_mem -> user_data );
1902
1904
step_mem -> nfe ++ ;
1903
1905
if (retval < 0 ) { return ARK_RHSFUNC_FAIL ; }
1904
1906
if (retval > 0 ) { return RHSFUNC_RECVR ; }
0 commit comments