| File |
Line number |
Procedure |
Code |
|
./pkg/mom_fluxform/mom_v_metric_sphere.F |
56 |
MOM_V_METRIC_SPHERE |
& *_tanPhiAtV(i,j,bi,bj) |
|
./pkg/seaice/lsr.F |
1051 |
LSR |
& * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1053 |
LSR |
& +ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1057 |
LSR |
& +ETAMEAN(I,J,bi,bj)*TWO * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1108 |
LSR |
& * _tanPhiAtV(I,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
1110 |
LSR |
& + ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
1120 |
LSR |
& * _tanPhiAtV(I,J+1,bi,bj) |
|
./pkg/seaice/lsr.F |
1122 |
LSR |
& - ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
731 |
LSR |
AA5= -(AA3-AA4) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
734 |
LSR |
& * _tanPhiAtV(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
807 |
LSR |
& * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
812 |
LSR |
& * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
818 |
LSR |
& *TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
825 |
LSR |
& - ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
827 |
LSR |
& + TWO*ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
832 |
LSR |
& + ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J+1,bi,bj) |
|
./pkg/seaice/lsr.F |
834 |
LSR |
& - TWO*ETAMEAN(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
961 |
LSR |
& )* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
965 |
LSR |
& * _tanPhiAtV(I,J,bi,bj) * _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
970 |
LSR |
& * _tanPhiAtV(I,J-1,bi,bj) |
|
./pkg/seaice/lsr.F |
972 |
LSR |
& -ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/lsr.F |
978 |
LSR |
& * _tanPhiAtV(I,J+1,bi,bj) |
|
./pkg/seaice/lsr.F |
980 |
LSR |
& +ETAMEAN(I,J,bi,bj)*TWO* _tanPhiAtV(I,J,bi,bj) |
|
./pkg/seaice/seaice_init_varia.F |
110 |
SEAICE_INIT_VARIA |
k2AtZ(I,J,bi,bj) = - _tanPhiAtV(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
167 |
SEAICE_INIT_VARIA |
k2AtV(I,J,bi,bj) = - _tanPhiAtV(I,J,bi,bj)*recip_rSphere |