Symbol Description Uses
y3d Input = Y vector ; Output = X = solution of A*X=Y 13


File Line number Procedure Code
./model/src/solve_tridiagonal.F 104 SOLVE_TRIDIAGONAL 
         y3d(i,j,k) = ( y3d(i,j,k)
./model/src/solve_tridiagonal.F 105 SOLVE_TRIDIAGONAL 
     &                - a3d(i,j,k)*y3d(i,j,k-1)
./model/src/solve_tridiagonal.F 115 SOLVE_TRIDIAGONAL 
          y3d(i,j,k) = y3d(i,j,k)
./model/src/solve_tridiagonal.F 116 SOLVE_TRIDIAGONAL 
     &               - c3d(i,j,k)*b3d(i,j,k)*y3d(i,j,k+1)
./model/src/solve_tridiagonal.F 12 SOLVE_TRIDIAGONAL 
     U                     y3d,
./model/src/solve_tridiagonal.F 130 SOLVE_TRIDIAGONAL 
         y3d_m1(i,j,k) = y3d(i,j,k)
./model/src/solve_tridiagonal.F 184 SOLVE_TRIDIAGONAL 
         y3d(i,j,k) = y3d_update(k)
./model/src/solve_tridiagonal.F 266 SOLVE_TRIDIAGONAL 
         y3d(i,j,k) = y3d_update(i,j,k)
./model/src/solve_tridiagonal.F 41 SOLVE_TRIDIAGONAL 
      _RL y3d(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/solve_tridiagonal.F 98 SOLVE_TRIDIAGONAL 
         y3d(i,j,1) = y3d(i,j,1)*b3d(i,j,1)