| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
752 |
NO PROCEDURE |
& rSphere, recip_rSphere, radius_fromHorizGrid, |
|
./model/inc/PARAMS.h |
807 |
NO PROCEDURE |
_RL recip_rSphere |
|
./pkg/gmredi/gmredi_k3d.F |
293 |
GMREDI_K3D |
gradf(i,j) = recip_rSphere*fCoriCos(i,j,bi,bj) |
|
./pkg/mom_common/mom_quasihydrostatic.F |
105 |
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 |
1052 |
LSR |
& * 0.5 _d 0 * _recip_dxV(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1055 |
LSR |
& * 0.5 _d 0 * _recip_dxV(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1060 |
LSR |
& *recip_rSphere |
|
./pkg/seaice/lsr.F |
1109 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1111 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere ) |
|
./pkg/seaice/lsr.F |
1121 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
1123 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere ) |
|
./pkg/seaice/lsr.F |
732 |
LSR |
& * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
733 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj) *recip_rSphere*recip_rSphere |
|
./pkg/seaice/lsr.F |
808 |
LSR |
& * 0.5 _d 0 * _recip_dxV(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
814 |
LSR |
& *recip_rSphere |
|
./pkg/seaice/lsr.F |
820 |
LSR |
& *recip_rSphere |
|
./pkg/seaice/lsr.F |
826 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
828 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
833 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
835 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
962 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
964 |
LSR |
AA6=TWO*ETAMEAN(I,J,bi,bj) * recip_rSphere*recip_rSphere |
|
./pkg/seaice/lsr.F |
971 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
973 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
979 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/lsr.F |
981 |
LSR |
& * 0.5 _d 0 * _recip_dyU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
109 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = - _tanPhiAtU(I,J,bi,bj)*recip_rSphere |
|
./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 |
165 |
SEAICE_INIT_VARIA |
k2AtC(I,J,bi,bj) = - _tanPhiAtU(I,J,bi,bj)*recip_rSphere |
|
./pkg/seaice/seaice_init_varia.F |
166 |
SEAICE_INIT_VARIA |
k2AtU(I,J,bi,bj) = - _tanPhiAtU(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 |
|
./model/src/ini_parms.F |
1134 |
INI_PARMS |
recip_rSphere = 1. _d 0/rSphere |
|
./model/src/ini_parms.F |
1136 |
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 |