File |
Line number |
Procedure |
Code |
./model/src/solve_tridiagonal.F |
153 |
SOLVE_TRIDIAGONAL |
y3d_m1(i,j,k) = y3d(i,j,k) |
./model/src/solve_tridiagonal.F |
173 |
SOLVE_TRIDIAGONAL |
y3d_prime(1) = y3d_m1(i,j,1) / b3d(i,j,1) |
./model/src/solve_tridiagonal.F |
184 |
SOLVE_TRIDIAGONAL |
y3d_prime(k) = (y3d_m1(i,j,k) - y3d_prime(k-1)*a3d(i,j,k)) |
./model/src/solve_tridiagonal.F |
219 |
SOLVE_TRIDIAGONAL |
y3d_m1(i,j,k) = y3d(i,j,k) |
./model/src/solve_tridiagonal.F |
236 |
SOLVE_TRIDIAGONAL |
y3d_prime(i,j,1) = y3d_m1(i,j,1)*recVar |
./model/src/solve_tridiagonal.F |
247 |
SOLVE_TRIDIAGONAL |
y3d_prime(i,j,k) = ( y3d_m1(i,j,k) |
./model/src/solve_tridiagonal.F |
69 |
SOLVE_TRIDIAGONAL |
_RL y3d_m1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |