File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_utils.F |
36 |
NO PROCEDURE |
PARAMETER ( AA5 = 1.061405429 ) |
./pkg/fizhi/fizhi_utils.F |
40 |
NO PROCEDURE |
PARAMETER ( X4 = AA5 / AA3 ) |
./pkg/fizhi/fizhi_utils.F |
41 |
NO PROCEDURE |
PARAMETER ( X5 = AA5 / AA4 ) |
./pkg/seaice/lsr.F |
141 |
LSR |
AA5=-(ETA(I-1,J,bi,bj)+ETA(I,J,bi,bj)-ETA(I-1,J-1,bi,bj) |
./pkg/seaice/lsr.F |
147 |
LSR |
& +AA5*DELYR(I,J,bi,bj)+AA6*RADIUS2 |
./pkg/seaice/lsr.F |
366 |
LSR |
AA5=((ZETA(I-1,J,bi,bj)-ETA(I-1,J,bi,bj)) |
./pkg/seaice/lsr.F |
380 |
LSR |
& +AA5*DELYR(I,J,bi,bj)+AA6*RADIUS2 |
./pkg/seaice/lsr.F |
48 |
LSR |
_RL AA1, AA2, AA3, AA4, AA5, AA6, S1, S2, S1A, S2A |