| 88 | realnum dt2 = dt * 0.5; |
| 89 | if (g2) { |
| 90 | PLOOP_OVER_IVECS(gv, is, ie, i) { |
| 91 | f[i] = ((1 - dt2 * cnd[i]) * f[i] - dtdx * (g1[i + s1] - g1[i] + g2[i] - g2[i + s2])) * |
| 92 | cndinv[i]; |
| 93 | } |
| 94 | } |
| 95 | else { |
| 96 | PLOOP_OVER_IVECS(gv, is, ie, i) { |
no test coverage detected