File |
Line number |
Procedure |
Code |
./pkg/seaice/lsr.F |
302 |
LSR |
UXM(I,J) = _dyC(I,J,bi,bj) * (zetaV(I,J)-etaV(I,J)) |
./pkg/seaice/lsr.F |
344 |
LSR |
AU(I,J,bi,bj)= ( - UXX(I-1,J) + UXM(I-1,J) ) |
./pkg/seaice/lsr.F |
347 |
LSR |
CU(I,J,bi,bj)= ( - UXX(I ,J) - UXM(I ,J) ) |
./pkg/seaice/lsr.F |
352 |
LSR |
& + UXM(I-1,J) - UXM(I,J) - UYM(I,J-1) + UYM(I,J) |
./pkg/seaice/lsr.F |
97 |
LSR |
_RL UXM (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_lsr.F |
1221 |
SEAICE_LSR_CALC_COEFFS |
_RL UXM (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_lsr.F |
1270 |
SEAICE_LSR_CALC_COEFFS |
UXM(I,J) = _dyF(I,J,bi,bj) * zetaMinusEta(I,J,bi,bj) |
./pkg/seaice/seaice_lsr.F |
1315 |
SEAICE_LSR_CALC_COEFFS |
AU(I,J,bi,bj)= ( - UXX(I-1,J) + UXM(I-1,J) ) |
./pkg/seaice/seaice_lsr.F |
1318 |
SEAICE_LSR_CALC_COEFFS |
CU(I,J,bi,bj)= ( - UXX(I ,J) - UXM(I ,J) ) |
./pkg/seaice/seaice_lsr.F |
1323 |
SEAICE_LSR_CALC_COEFFS |
& + UXM(I-1,J) - UXM(I,J) + UYM(I,J+1) - UYM(I,J) |