File |
Line number |
Procedure |
Code |
./pkg/seaice/lsr.F |
119 |
LSR |
DELXR(I,J,bi,bj)=HALF/(DXUICE(I,J,bi,bj)*RADIUS) |
./pkg/seaice/lsr.F |
209 |
LSR |
6 *TNGICE(I,J,bi,bj)*VICEC(I,J,bi,bj)*DELXR(I,J,bi,bj) |
./pkg/seaice/lsr.F |
214 |
LSR |
6 *DELXR(I,J,bi,bj)*RECIP_CSUICE(I,J,bi,bj) |
./pkg/seaice/lsr.F |
218 |
LSR |
7 -VICEC(I-1,J,bi,bj))*DELXR(I,J,bi,bj) |
./pkg/seaice/lsr.F |
435 |
LSR |
6 *DELXR(I,J,bi,bj)*RECIP_CSUICE(I,J,bi,bj) |
./pkg/seaice/lsr.F |
438 |
LSR |
6 *DELXR(I,J,bi,bj)*RECIP_CSUICE(I,J,bi,bj) |
./pkg/seaice/lsr.F |
442 |
LSR |
7 *DELXR(I,J,bi,bj)*RECIP_CSUICE(I,J,bi,bj) |
./pkg/seaice/lsr.F |
62 |
LSR |
_RL DELXR (1:sNx,1:sNy,nSx,nSy) |