| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
798 |
NO PROCEDURE |
& delR, delRc, xgOrigin, ygOrigin, rSphere, recip_rSphere, |
|
./model/inc/PARAMS.h |
851 |
NO PROCEDURE |
_RL recip_rSphere |
|
./pkg/gmredi/gmredi_init_varia.F |
136 |
GMREDI_INIT_VARIA |
gradf(i,j,bi,bj) = recip_rSphere*fCoriCos(i,j,bi,bj) |
|
./pkg/mom_common/mom_quasihydrostatic.F |
106 |
MOM_QUASIHYDROSTATIC |
& )* 0.5 _d 0 * recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_common/mom_u_metric_nh.F |
56 |
MOM_U_METRIC_NH |
uMetricTerms(i,j) = uFld(i,j)*recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_common/mom_v_metric_nh.F |
56 |
MOM_V_METRIC_NH |
vMetricTerms(i,j) = vFld(i,j)*recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_common/mom_w_metric_nh.F |
54 |
MOM_W_METRIC_NH |
& *recip_rSphere*recip_deepFacF(k)*( |
|
./pkg/mom_fluxform/mom_u_metric_sphere.F |
52 |
MOM_U_METRIC_SPHERE |
& uFld(i,j)*recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_fluxform/mom_v_metric_sphere.F |
49 |
MOM_V_METRIC_SPHERE |
vMetricTerms(i,j) = -recip_rSphere*recip_deepFacC(k) |
|
./pkg/seaice/lsr.F |
1055 |
LSR |
& * 0.5 _d 0 * _recip_dxV(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1058 |
LSR |
& * 0.5 _d 0 * _recip_dxV(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1063 |
LSR |
& *recip_rSphere |
|
./pkg/seaice/lsr.F |
1112 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1114 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere ) |
|
./pkg/seaice/lsr.F |
1124 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1126 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere ) |
|
./pkg/seaice/lsr.F |
735 |
LSR |
& * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
736 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj) *recip_rSphere*recip_rSphere |
|
./pkg/seaice/lsr.F |
811 |
LSR |
& * 0.5 _d 0 * _recip_dxV(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
817 |
LSR |
& *recip_rSphere |
|
./pkg/seaice/lsr.F |
823 |
LSR |
& *recip_rSphere |
|
./pkg/seaice/lsr.F |
829 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
831 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
836 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
838 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
965 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
967 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj) * recip_rSphere*recip_rSphere |
|
./pkg/seaice/lsr.F |
974 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
976 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
982 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
984 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
111 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = - _tanPhiAtU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
112 |
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 |
k2AtC(I,J,bi,bj) = - _tanPhiAtU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
168 |
SEAICE_INIT_VARIA |
k2AtU(I,J,bi,bj) = - _tanPhiAtU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
169 |
SEAICE_INIT_VARIA |
k2AtV(I,J,bi,bj) = - _tanPhiAtV(I,J,bi,bj)*recip_rSphere |
|
./model/src/ini_parms.F |
1208 |
INI_PARMS |
recip_rSphere = 1. _d 0/rSphere |
|
./model/src/ini_parms.F |
1210 |
INI_PARMS |
recip_rSphere = 0. |
|
./model/src/set_grid_factors.F |
67 |
SET_GRID_FACTORS |
deepFacC(k) = (rSphere+rC(k))*recip_rSphere |
|
./model/src/set_grid_factors.F |
71 |
SET_GRID_FACTORS |
deepFacF(k) = (rSphere+rF(k))*recip_rSphere |
|
./model/src/set_grid_factors.F |
77 |
SET_GRID_FACTORS |
& )*recip_rSphere |
|
./model/src/set_grid_factors.F |
82 |
SET_GRID_FACTORS |
& )*recip_rSphere |