File |
Line number |
Procedure |
Code |
./pkg/seaice/lsr.F |
117 |
LSR |
DELY2(I,J,bi,bj)=HALF/(DYUICE(I,J,bi,bj)*DYUICE(I,J,bi,bj)) |
./pkg/seaice/lsr.F |
146 |
LSR |
& *DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
221 |
LSR |
& *DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
227 |
LSR |
& *DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
373 |
LSR |
AV(I,J,bi,bj)=(-AA2*DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
378 |
LSR |
BV(I,J,bi,bj)=((AA1+AA2)*DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
383 |
LSR |
CV(I,J,bi,bj)=(-AA1*DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
487 |
LSR |
AA3=(AA2*DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
496 |
LSR |
AA3=(AA1*DELY2(I,J,bi,bj) |
./pkg/seaice/lsr.F |
65 |
LSR |
_RL DELY2 (1:sNx,1:sNy,nSx,nSy) |