File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_calc_residual.F |
115 |
SEAICE_CALC_RESIDUAL |
O uIceRHS, vIceRHS, |
./pkg/seaice/seaice_calc_residual.F |
140 |
SEAICE_CALC_RESIDUAL |
vIceRes(I,J,bi,bj) = vIceLHS(I,J,bi,bj) - vIceRHS(I,J,bi,bj) |
./pkg/seaice/seaice_calc_residual.F |
61 |
SEAICE_CALC_RESIDUAL |
_RL vIceRHS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_calc_residual.F |
75 |
SEAICE_CALC_RESIDUAL |
vIceRHS(I,J,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_calc_rhs.F |
101 |
SEAICE_CALC_RHS |
vIceRHS(I,J,bi,bj) = FORCEY(I,J,bi,bj) + ( |
./pkg/seaice/seaice_calc_rhs.F |
10 |
SEAICE_CALC_RHS |
O uIceRHS, vIceRHS, |
./pkg/seaice/seaice_calc_rhs.F |
112 |
SEAICE_CALC_RHS |
vIceRHS(I,J,bi,bj) = vIceRHS(I,J,bi,bj)*maskinS(I,J,bi,bj) |
./pkg/seaice/seaice_calc_rhs.F |
51 |
SEAICE_CALC_RHS |
_RL vIceRHS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_krylov.F |
101 |
SEAICE_KRYLOV |
_RL vIceRHS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_krylov.F |
153 |
SEAICE_KRYLOV |
vIceRHS(I,J,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_krylov.F |
229 |
SEAICE_KRYLOV |
O uIceRHS, vIceRHS, |
./pkg/seaice/seaice_krylov.F |
242 |
SEAICE_KRYLOV |
vIceLHS(I,J,bi,bj) = vIceLHS(I,J,bi,bj) - vIceRHS(I,J,bi,bj) |
./pkg/seaice/seaice_krylov.F |
304 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uIceRHS,vIceRHS,rhs,.TRUE.,myThid) |