| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
1140 |
LSR |
CVV(J)=CVV(J)/(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(JM)) |
|
./pkg/seaice/lsr.F |
1141 |
LSR |
VRT(J)=(VRT(J)-AV(I,J,bi,bj)*VRT(JM)) |
|
./pkg/seaice/lsr.F |
1142 |
LSR |
& /(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(JM)) |
|
./pkg/seaice/lsr.F |
381 |
LSR |
AV(I,J,bi,bj)=( - VYY(I,J-1) + VYM(I,J-1) |
|
./pkg/seaice/lsr.F |
401 |
LSR |
AV(I,J,bi,bj) = AV(I,J,bi,bj) * recip_rAz(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
565 |
LSR |
IF (J.EQ.1) AA3 = AA3 - AV(I,J,bi,bj)*vIce(I,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
587 |
LSR |
CVV(I,J)=CVV(I,J)/(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM)) |
|
./pkg/seaice/lsr.F |
588 |
LSR |
VRT(I,J)=(VRT(I,J)-AV(I,J,bi,bj)*VRT(I,JM)) |
|
./pkg/seaice/lsr.F |
589 |
LSR |
& /(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM)) |
|
./pkg/seaice/lsr.F |
67 |
LSR |
_RL AV (1:sNx,1:sNy,nSx,nSy) |
|
./pkg/seaice/lsr.F |
967 |
LSR |
AV(I,J,bi,bj)=( |
|
./pkg/seaice/lsr.F |
991 |
LSR |
AV(I,1,bi,bj)=ZERO |
|
./pkg/seaice/seaice_lsr.F |
1005 |
SEAICE_RESIDUAL |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1048 |
SEAICE_RESIDUAL |
& - ( AV(i,j,bi,bj)*vFld(i,j-1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1093 |
SEAICE_LSR_CALC_COEFFS |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_lsr.F |
1138 |
SEAICE_LSR_CALC_COEFFS |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1305 |
SEAICE_LSR_CALC_COEFFS |
AV(I,J,bi,bj)=( - VYY(I,J-1) + VYM(I,J-1) |
|
./pkg/seaice/seaice_lsr.F |
1344 |
SEAICE_LSR_CALC_COEFFS |
AV(I,J,bi,bj) = AV(I,J,bi,bj) * recip_rAs(I,J,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1731 |
SEAICE_LSR_TRIDIAGV |
I AV, BV, CV, vRt1, vRt2, rhsV, vTmp, seaiceMaskV, WFAV, |
|
./pkg/seaice/seaice_lsr.F |
1759 |
SEAICE_LSR_TRIDIAGV |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1824 |
SEAICE_LSR_TRIDIAGV |
IF (J.EQ.jMin) AA3 = AA3 - AV(I,J,bi,bj)*vIce(I,J-1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1866 |
SEAICE_LSR_TRIDIAGV |
bet = BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM) |
|
./pkg/seaice/seaice_lsr.F |
1868 |
SEAICE_LSR_TRIDIAGV |
VRT(I,J) = (VRT(I,J)-AV(I,J,bi,bj)*VRT(I,JM))/bet |
|
./pkg/seaice/seaice_lsr.F |
412 |
SEAICE_LSR |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_lsr.F |
430 |
SEAICE_LSR |
AV(I,J,bi,bj) = ZERO |
|
./pkg/seaice/seaice_lsr.F |
460 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
490 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce_fd, vIce_fd, |
|
./pkg/seaice/seaice_lsr.F |
543 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
645 |
SEAICE_LSR |
I AV, BV, CV, rhsVy, |
|
./pkg/seaice/seaice_lsr.F |
711 |
SEAICE_LSR |
I AV, BV, CV, vRt1, vRt2, rhsV, vTmp, seaiceMaskV, WFAV, |
|
./pkg/seaice/seaice_lsr.F |
789 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
966 |
SEAICE_RESIDUAL |
I AU, BU, CU, AV, BV, CV, uFld, vFld, |
|
./pkg/seaice/seaice_lsr.F |
96 |
SEAICE_LSR |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_preconditioner.F |
182 |
SEAICE_PRECONDITIONER |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_preconditioner.F |
199 |
SEAICE_PRECONDITIONER |
AV(I,J,bi,bj) = ZERO |
|
./pkg/seaice/seaice_preconditioner.F |
263 |
SEAICE_PRECONDITIONER |
I AU, BU, CU, AV, BV, CV, duIce, dvIce, |
|
./pkg/seaice/seaice_preconditioner.F |
365 |
SEAICE_PRECONDITIONER |
I AV, BV, CV, vRt1, vRt2, rhsV, vTmp, seaiceMaskV, WFAV, |
|
./pkg/seaice/seaice_preconditioner.F |
384 |
SEAICE_PRECONDITIONER |
I AU, BU, CU, AV, BV, CV, duIce, dvIce, |
|
./pkg/seaice/seaice_preconditioner.F |
94 |
SEAICE_PRECONDITIONER |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |