| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/lsr.F |
1056 |
LSR |
& +ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1060 |
LSR |
& +ETAMEAN(I,J,bi,bj)*TWO * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1110 |
LSR |
& +( ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj) ) |
|
./pkg/seaice/lsr.F |
1113 |
LSR |
& + ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1122 |
LSR |
& -( ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
1125 |
LSR |
& - ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
125 |
LSR |
_RL ETAMEAN (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/seaice/lsr.F |
710 |
LSR |
ETAMEAN(I,J,bi,bj) =QUART*( |
|
./pkg/seaice/lsr.F |
736 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj) *recip_rSphere*recip_rSphere |
|
./pkg/seaice/lsr.F |
813 |
LSR |
& -(ETAMEAN(I,J,bi,bj)+ZETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
819 |
LSR |
& -ETAMEAN(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
828 |
LSR |
& - ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
830 |
LSR |
& + TWO*ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
835 |
LSR |
& + ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J+1,bi,bj) |
|
./pkg/seaice/lsr.F |
837 |
LSR |
& - TWO*ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
967 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj) * recip_rSphere*recip_rSphere |
|
./pkg/seaice/lsr.F |
972 |
LSR |
& - (ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
975 |
LSR |
& -ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
980 |
LSR |
& +(ZETAMEAN(I,J,bi,bj)-ETAMEAN(I,J,bi,bj)) |
|
./pkg/seaice/lsr.F |
983 |
LSR |
& +ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |