File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_calc_lhs.F |
147 |
SEAICE_CALC_LHS |
uIceLHS(I,J,bi,bj) = |
./pkg/seaice/seaice_calc_lhs.F |
14 |
SEAICE_CALC_LHS |
O uIceLHS, vIceLHS, |
./pkg/seaice/seaice_calc_lhs.F |
155 |
SEAICE_CALC_LHS |
uIceLHS(I,J,bi,bj) = uIceLHS(I,J,bi,bj) - 0.5 _d 0*( |
./pkg/seaice/seaice_calc_lhs.F |
169 |
SEAICE_CALC_LHS |
uIceLHS(I,J,bi,bj) = uIceLHS(I,J,bi,bj) + ( |
./pkg/seaice/seaice_calc_lhs.F |
189 |
SEAICE_CALC_LHS |
uIceLHS(I,J,bi,bj) = uIceLHS(I,J,bi,bj)*maskinW(I,J,bi,bj) |
./pkg/seaice/seaice_calc_lhs.F |
210 |
SEAICE_CALC_LHS |
uIceLHS(I,J,bi,bj) = uIceLHS(I,J,bi,bj) - gUmom(I,J) |
./pkg/seaice/seaice_calc_lhs.F |
70 |
SEAICE_CALC_LHS |
_RL uIceLHS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_calc_residual.F |
127 |
SEAICE_CALC_RESIDUAL |
O uIceLHS, vIceLHS, |
./pkg/seaice/seaice_calc_residual.F |
139 |
SEAICE_CALC_RESIDUAL |
uIceRes(I,J,bi,bj) = uIceLHS(I,J,bi,bj) - uIceRHS(I,J,bi,bj) |
./pkg/seaice/seaice_calc_residual.F |
57 |
SEAICE_CALC_RESIDUAL |
_RL uIceLHS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_calc_residual.F |
72 |
SEAICE_CALC_RESIDUAL |
uIceLHS(I,J,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_krylov.F |
150 |
SEAICE_KRYLOV |
uIceLHS(I,J,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_krylov.F |
234 |
SEAICE_KRYLOV |
O uIceLHS, vIceLHS, |
./pkg/seaice/seaice_krylov.F |
241 |
SEAICE_KRYLOV |
uIceLHS(I,J,bi,bj) = uIceLHS(I,J,bi,bj) - uIceRHS(I,J,bi,bj) |
./pkg/seaice/seaice_krylov.F |
252 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uIceLHS,vIceLHS,resTmp,.TRUE.,myThid) |
./pkg/seaice/seaice_krylov.F |
358 |
SEAICE_KRYLOV |
O uIceLHS, vIceLHS, |
./pkg/seaice/seaice_krylov.F |
364 |
SEAICE_KRYLOV |
uWork(i,j,bi,bj) = uIceLHS(i,j,bi,bj) |
./pkg/seaice/seaice_krylov.F |
97 |
SEAICE_KRYLOV |
_RL uIceLHS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |