| 1306 | ******************************************************************/ |
| 1307 | |
| 1308 | static real CVYddNorm(CVodeMem cv_mem, real hg) |
| 1309 | { |
| 1310 | real yddnrm; |
| 1311 | |
| 1312 | N_VLinearSum(hg, zn[1], ONE, zn[0], y); |
| 1313 | f(N, tn+hg, y, tempv, f_data); |
| 1314 | nfe++; |
| 1315 | N_VLinearSum(ONE, tempv, -ONE, zn[1], tempv); |
| 1316 | N_VScale(ONE/hg, tempv, tempv); |
| 1317 | |
| 1318 | yddnrm = N_VWrmsNorm(tempv, ewt); |
| 1319 | return(yddnrm); |
| 1320 | } |
| 1321 | |
| 1322 | /********************* CVStep ************************************** |
| 1323 |
no test coverage detected