| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
1143 |
LSR |
CVV(J)=CVV(J)/(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(JM)) |
|
./pkg/seaice/lsr.F |
1144 |
LSR |
VRT(J)=(VRT(J)-AV(I,J,bi,bj)*VRT(JM)) |
|
./pkg/seaice/lsr.F |
1145 |
LSR |
& /(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(JM)) |
|
./pkg/seaice/lsr.F |
384 |
LSR |
AV(I,J,bi,bj)=( - VYY(I,J-1) + VYM(I,J-1) |
|
./pkg/seaice/lsr.F |
404 |
LSR |
AV(I,J,bi,bj) = AV(I,J,bi,bj) * recip_rAz(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
568 |
LSR |
IF (J.EQ.1) AA3 = AA3 - AV(I,J,bi,bj)*vIce(I,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
590 |
LSR |
CVV(I,J)=CVV(I,J)/(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM)) |
|
./pkg/seaice/lsr.F |
591 |
LSR |
VRT(I,J)=(VRT(I,J)-AV(I,J,bi,bj)*VRT(I,JM)) |
|
./pkg/seaice/lsr.F |
592 |
LSR |
& /(BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM)) |
|
./pkg/seaice/lsr.F |
70 |
LSR |
_RL AV (1:sNx,1:sNy,nSx,nSy) |
|
./pkg/seaice/lsr.F |
970 |
LSR |
AV(I,J,bi,bj)=( |
|
./pkg/seaice/lsr.F |
994 |
LSR |
AV(I,1,bi,bj)=ZERO |
|
./pkg/seaice/seaice_lsr.F |
100 |
SEAICE_LSR |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1013 |
SEAICE_RESIDUAL |
I AU, BU, CU, AV, BV, CV, uFld, vFld, |
|
./pkg/seaice/seaice_lsr.F |
1052 |
SEAICE_RESIDUAL |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1095 |
SEAICE_RESIDUAL |
& - ( AV(i,j,bi,bj)*vFld(i,j-1,bi,bj) |
|
./pkg/seaice/seaice_lsr.F |
1140 |
SEAICE_LSR_CALC_COEFFS |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_lsr.F |
1186 |
SEAICE_LSR_CALC_COEFFS |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1378 |
SEAICE_LSR_CALC_COEFFS |
AV(I,J,bi,bj)=( - VYY(I,J-1) + VYM(I,J-1) |
|
./pkg/seaice/seaice_lsr.F |
1417 |
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 |
1870 |
SEAICE_LSR_TRIDIAGV |
I AV, BV, CV, vRt1, vRt2, rhsV, vTmp, seaiceMaskV, WFAV, |
|
./pkg/seaice/seaice_lsr.F |
1895 |
SEAICE_LSR_TRIDIAGV |
_RL AV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/seaice_lsr.F |
1949 |
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 |
1979 |
SEAICE_LSR_TRIDIAGV |
bet = BV(I,J,bi,bj)-AV(I,J,bi,bj)*CVV(I,JM) |
|
./pkg/seaice/seaice_lsr.F |
1981 |
SEAICE_LSR_TRIDIAGV |
VRT(I,J) = (VRT(I,J)-AV(I,J,bi,bj)*VRT(I,JM))/bet |
|
./pkg/seaice/seaice_lsr.F |
493 |
SEAICE_LSR |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_lsr.F |
511 |
SEAICE_LSR |
AV(I,J,bi,bj) = ZERO |
|
./pkg/seaice/seaice_lsr.F |
541 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
573 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce_fd, vIce_fd, |
|
./pkg/seaice/seaice_lsr.F |
626 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_lsr.F |
728 |
SEAICE_LSR |
I AV, BV, CV, rhsVy, |
|
./pkg/seaice/seaice_lsr.F |
794 |
SEAICE_LSR |
I AV, BV, CV, vRt1, vRt2, rhsV, vTmp, seaiceMaskV, WFAV, |
|
./pkg/seaice/seaice_lsr.F |
872 |
SEAICE_LSR |
I AU, BU, CU, AV, BV, CV, uIce, vIce, |
|
./pkg/seaice/seaice_preconditioner.F |
186 |
SEAICE_PRECONDITIONER |
O AU, BU, CU, AV, BV, CV, uRt1, uRt2, vRt1, vRt2, |
|
./pkg/seaice/seaice_preconditioner.F |
203 |
SEAICE_PRECONDITIONER |
AV(I,J,bi,bj) = ZERO |
|
./pkg/seaice/seaice_preconditioner.F |
269 |
SEAICE_PRECONDITIONER |
I AU, BU, CU, AV, BV, CV, duIce, dvIce, |
|
./pkg/seaice/seaice_preconditioner.F |
372 |
SEAICE_PRECONDITIONER |
I AV, BV, CV, vRt1, vRt2, rhsV, vTmp, seaiceMaskV, WFAV, |
|
./pkg/seaice/seaice_preconditioner.F |
391 |
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) |