MCPcopy Create free account
hub / github.com/boutproject/BOUT-dev / CVCompleteStep

Function CVCompleteStep

externalpackages/PVODE/source/cvode.cpp:2199–2218  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

2197******************************************************************/
2198
2199static void CVCompleteStep(CVodeMem cv_mem)
2200{
2201 int i, j;
2202
2203 nst++;
2204 hu = h;
2205 qu = q;
2206
2207 for (i=q; i >= 2; i--) tau[i] = tau[i-1];
2208 if ((q==1) && (nst > 1)) tau[2] = tau[1];
2209 tau[1] = h;
2210
2211 for (j=0; j <= q; j++)
2212 N_VLinearSum(l[j], acor, ONE, zn[j], zn[j]);
2213 qwait--;
2214 if ((qwait == 1) && (q != qmax)) {
2215 N_VScale(ONE, acor, zn[qmax]);
2216 saved_tq5 = tq[5];
2217 }
2218}
2219
2220/************* CVPrepareNextStep **********************************
2221

Callers 1

cvode.cppFile · 0.85

Calls 2

N_VLinearSumFunction · 0.85
N_VScaleFunction · 0.85

Tested by

no test coverage detected