| 1594 | ******************************************************************/ |
| 1595 | |
| 1596 | static void CVSet(CVodeMem cv_mem) |
| 1597 | { |
| 1598 | switch(lmm) { |
| 1599 | case ADAMS: CVSetAdams(cv_mem); |
| 1600 | break; |
| 1601 | case BDF : CVSetBDF(cv_mem); |
| 1602 | break; |
| 1603 | } |
| 1604 | rl1 = ONE / l[1]; |
| 1605 | gamma = h * rl1; |
| 1606 | if (nst == 0) gammap = gamma; |
| 1607 | gamrat = (nst > 0) ? gamma / gammap : ONE; /* protect x / x != 1.0 */ |
| 1608 | } |
| 1609 | |
| 1610 | /******************** CVSetAdams ********************************* |
| 1611 |
no test coverage detected