| File |
Line number |
Procedure |
Code |
|
./pkg/ebm/ebm_forcing_surf.F |
68 |
EBM_FORCING_SURF |
& fu(i,j,bi,bj)*horiVertRatio*recip_rhoConst |
|
./pkg/ebm/ebm_forcing_surf.F |
73 |
EBM_FORCING_SURF |
& fv(i,j,bi,bj)*horiVertRatio*recip_rhoConst |
|
./pkg/ebm/ebm_forcing_surf.F |
76 |
EBM_FORCING_SURF |
& -Qnet(i,j,bi,bj)*recip_Cp*horiVertRatio*recip_rhoConst |
|
./pkg/shelfice/shelfice_thermodynamics.F |
100 |
SHELFICE_THERMODYNAMICS |
& *recip_rhoConst*recip_SHELFICElatentHeat |
|
./pkg/shelfice/shelfice_thermodynamics.F |
104 |
SHELFICE_THERMODYNAMICS |
& *recip_Cp*horiVertRatio*recip_rhoConst |
|
./pkg/shelfice/shelfice_thermodynamics.F |
193 |
SHELFICE_THERMODYNAMICS |
& *recip_Cp*horiVertRatio*recip_rhoConst |
|
./model/inc/PARAMS.h |
644 |
NO PROCEDURE |
& recip_rhoConst, rhoConst, |
|
./model/inc/PARAMS.h |
733 |
NO PROCEDURE |
_RL recip_rhoConst |
|
./pkg/pp81/pp81_ri_number.F |
121 |
PP81_RI_NUMBER |
buoyFreq = - gravity*recip_rhoConst*horiVertRatio * |
|
./model/src/external_forcing.F |
332 |
EXTERNAL_FORCING_T |
& *recip_Cp*recip_rhoConst |
|
./verification/tidal_basin_2d/code/external_forcing.F |
338 |
EXTERNAL_FORCING_T |
& *recip_Cp*recip_rhoConst |
|
./verification/rotating_tank/code/external_forcing.F |
351 |
EXTERNAL_FORCING_T |
& *recip_Cp*recip_rhoConst |
|
./model/src/ini_linear_phisurf.F |
96 |
INI_LINEAR_PHISURF |
Bo_surf(I,J,bi,bj) = recip_rhoConst |
|
./model/src/ini_parms.F |
1172 |
INI_PARMS |
convertEmP2rUnit = rhoConstFresh*recip_rhoConst*horiVertRatio |
|
./model/src/ini_parms.F |
583 |
INI_PARMS |
recip_rhoConst = 1.D0 / rhoConst |
|
./model/src/calc_phi_hyd.F |
181 |
CALC_PHI_HYD |
& *gravity*alphaRho(i,j)*recip_rhoConst |
|
./model/src/calc_phi_hyd.F |
200 |
CALC_PHI_HYD |
& + half*drF(k)*gravity*alphaRho(i,j)*recip_rhoConst |
|
./model/src/calc_phi_hyd.F |
202 |
CALC_PHI_HYD |
& + drF(k)*gravity*alphaRho(i,j)*recip_rhoConst |
|
./model/src/calc_phi_hyd.F |
224 |
CALC_PHI_HYD |
& +dRlocM*gravity*alphaRho(i,j)*recip_rhoConst |
|
./model/src/calc_phi_hyd.F |
226 |
CALC_PHI_HYD |
& +dRlocP*gravity*alphaRho(i,j)*recip_rhoConst |
|
./model/src/calc_phi_hyd.F |
265 |
CALC_PHI_HYD |
& (one/locAlpha - recip_rhoConst) |
|
./model/src/calc_buoyancy.F |
49 |
CALC_BUOYANCY |
buoy(i,j)=-Gravity*recip_rhoConst*rholoc(i,j) |
|
./model/src/calc_grad_phi_hyd.F |
156 |
CALC_GRAD_PHI_HYD |
factorZ = gravity*recip_rhoConst*0.5 _d 0 |
|
./model/src/external_forcing_surf.F |
172 |
EXTERNAL_FORCING_SURF |
& fu(i,j,bi,bj)*horiVertRatio*recip_rhoConst |
|
./model/src/external_forcing_surf.F |
175 |
EXTERNAL_FORCING_SURF |
& fv(i,j,bi,bj)*horiVertRatio*recip_rhoConst |
|
./model/src/external_forcing_surf.F |
182 |
EXTERNAL_FORCING_SURF |
& ) *recip_Cp*horiVertRatio*recip_rhoConst |
|
./model/src/external_forcing_surf.F |
185 |
EXTERNAL_FORCING_SURF |
& -saltFlux(i,j,bi,bj)*horiVertRatio*recip_rhoConst |
|
./model/src/external_forcing_surf.F |
295 |
EXTERNAL_FORCING_SURF |
& )*recip_rhoConst |
|
./model/src/external_forcing_surf.F |
301 |
EXTERNAL_FORCING_SURF |
phi0surf(i,j,bi,bj) = pload(i,j,bi,bj)*recip_rhoConst |
|
./model/src/external_forcing_surf.F |
325 |
EXTERNAL_FORCING_SURF |
& + shelficeLoadAnomaly(i,j,bi,bj)*recip_rhoConst |
|
./model/src/diags_phi_rlow.F |
101 |
DIAGS_PHI_RLOW |
& )*gravity*alphRho(i,j)*recip_rhoConst |
|
./model/src/diags_phi_rlow.F |
81 |
DIAGS_PHI_RLOW |
& + ddRloc*gravity*alphRho(i,j)*recip_rhoConst |
|
./model/src/taueddy_init_varia.F |
74 |
TAUEDDY_INIT_VARIA |
& *recip_rhoConst |
|
./model/src/taueddy_init_varia.F |
76 |
TAUEDDY_INIT_VARIA |
& *recip_rhoConst |
|
./model/src/ini_phiref.F |
105 |
INI_PHIREF |
& *recip_rhoConst*gravity |
|
./model/src/ini_phiref.F |
111 |
INI_PHIREF |
& *rhoNil*recip_rhoConst*gravity |
|
./pkg/ggl90/ggl90_calc.F |
166 |
GGL90_CALC |
Nsquare = - gravity*recip_rhoConst*recip_drC(K) |
|
./pkg/kpp/kpp_calc.F |
393 |
KPP_CALC |
& recip_Cp*recip_rhoConst |
|
./pkg/kpp/kpp_transport_t.F |
71 |
KPP_TRANSPORT_T |
& -Qsw(i,j,bi,bj)*recip_Cp*recip_rhoConst |
|
./pkg/kpp/kpp_transport_t.F |
86 |
KPP_TRANSPORT_T |
& -Qsw(i,j,bi,bj)*recip_Cp*recip_rhoConst |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
122 |
OCN_APPLY_IMPORT |
phi0surf(i,j,bi,bj) = atmSLPr(i,j,bi,bj)*recip_rhoConst |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
123 |
OCN_APPLY_IMPORT |
& + gravity*seaIceMass(i,j,bi,bj)*recip_rhoConst |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
129 |
OCN_APPLY_IMPORT |
phi0surf(i,j,bi,bj) = pload(i,j,bi,bj)*recip_rhoConst |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
130 |
OCN_APPLY_IMPORT |
& + gravity*seaIceMass(i,j,bi,bj)*recip_rhoConst |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
136 |
OCN_APPLY_IMPORT |
phi0surf(i,j,bi,bj) = atmSLPr(i,j,bi,bj)*recip_rhoConst |
|
./pkg/my82/my82_ri_number.F |
121 |
MY82_RI_NUMBER |
buoyFreq(I,J) = gravity*recip_rhoConst*horiVertRatio * |
|
./pkg/seaice/seaice_dynsolver.F |
188 |
SEAICE_DYNSOLVER |
& )*recip_rhoConst |
|
./pkg/seaice/seaice_dynsolver.F |
195 |
SEAICE_DYNSOLVER |
& + pload(i,j,bi,bj)*recip_rhoConst |