| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
111 |
LSR |
ETAMEAN(I,J,bi,bj) =QUART*(ETA(I,J-1,bi,bj)+ETA(I-1,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
143 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj)*TNGICE(I,J,bi,bj)*TNGICE(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
211 |
LSR |
6 -(ETAMEAN(I,J,bi,bj)+ZETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
216 |
LSR |
7 -ETAMEAN(I,J,bi,bj)*TWO*TNGICE(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
222 |
LSR |
& -ETAMEAN(I,J,bi,bj)*DELYR(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
224 |
LSR |
& +ETAMEAN(I,J,bi,bj)*DELYR(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
228 |
LSR |
& +ETAMEAN(I,J,bi,bj)*DELYR(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
230 |
LSR |
& -ETAMEAN(I,J,bi,bj)*DELYR(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
371 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj)*TNGICE(I,J,bi,bj)*TNGICE(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
374 |
LSR |
& -(ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
376 |
LSR |
& -ETAMEAN(I,J,bi,bj)*TWO*TNGICE(I,J,bi,bj)*DELYR(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
384 |
LSR |
& +(ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
386 |
LSR |
& +ETAMEAN(I,J,bi,bj)*TWO*TNGICE(I,J,bi,bj)*DELYR(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
414 |
LSR |
4 +HALF*ETAMEAN(I,J,bi,bj)*((UICEC(I+1,J+1,bi,bj) |
|
./pkg/seaice/lsr.F |
436 |
LSR |
6 +ETAMEAN(I,J,bi,bj)*TNGICE(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
440 |
LSR |
7 +ETAMEAN(I,J,bi,bj)*TWO*TNGICE(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
488 |
LSR |
& +(ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
490 |
LSR |
& +ETAMEAN(I,J,bi,bj)*TWO*TNGICE(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
497 |
LSR |
& -(ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
499 |
LSR |
& -ETAMEAN(I,J,bi,bj)*TWO*TNGICE(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
59 |
LSR |
_RL ETAMEAN (1:sNx,1:sNy,nSx,nSy) |