| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
826 |
NO PROCEDURE |
& rVel2wUnit, wUnit2rVel, mass2rUnit, rUnit2mass, |
|
./model/inc/PARAMS.h |
939 |
NO PROCEDURE |
_RL mass2rUnit, rUnit2mass |
|
./pkg/frazil/frazil_tendency_apply.F |
61 |
FRAZIL_TENDENCY_APPLY_T |
& * recip_Cp * mass2rUnit |
|
./pkg/icefront/icefront_thermodynamics.F |
107 |
ICEFRONT_THERMODYNAMICS |
eps5 = mass2rUnit/HeatCapacity_Cp |
|
./pkg/icefront/icefront_thermodynamics.F |
157 |
ICEFRONT_THERMODYNAMICS |
& mass2rUnit * sLoc |
|
./pkg/kl10/kl10_calc.F |
129 |
KL10_CALC |
b0 = MAX(-gravity*mass2rUnit* |
|
./pkg/kl10/kl10_calc.F |
139 |
KL10_CALC |
buoyFreqf = -gravity*mass2rUnit* |
|
./pkg/kl10/kl10_calc.F |
143 |
KL10_CALC |
buoyFreqf = -gravity*mass2rUnit* |
|
./model/src/apply_forcing.F |
520 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/apply_forcing.F |
531 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/apply_forcing.F |
548 |
APPLY_FORCING_T |
tmpFac = (tmpFac/atm_Cp) * mass2rUnit |
|
./model/src/apply_forcing.F |
551 |
APPLY_FORCING_T |
tmpFac = recip_Cp * mass2rUnit |
|
./model/src/apply_forcing.F |
665 |
APPLY_FORCING_T |
& *recip_Cp*mass2rUnit |
|
./model/src/apply_forcing.F |
692 |
APPLY_FORCING_T |
& *recip_Cp*mass2rUnit |
|
./model/src/apply_forcing.F |
885 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/apply_forcing.F |
896 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/calc_div_ghat.F |
187 |
CALC_DIV_GHAT |
& - addMass(i,j,k,bi,bj)*mass2rUnit/deltaTMom |
|
./model/src/calc_div_ghat.F |
195 |
CALC_DIV_GHAT |
& - addMass(i,j,k,bi,bj)*mass2rUnit/deltaTMom |
|
./pkg/longstep/longstep_forcing_surf.F |
122 |
LONGSTEP_FORCING_SURF |
& *mass2rUnit |
|
./pkg/longstep/longstep_forcing_surf.F |
146 |
LONGSTEP_FORCING_SURF |
& *mass2rUnit |
|
./pkg/longstep/longstep_forcing_surf.F |
89 |
LONGSTEP_FORCING_SURF |
& *mass2rUnit |
|
./model/src/calc_gw.F |
577 |
CALC_GW |
& + wVel(i,j,k,bi,bj)*mass2rUnit*0.5 _d 0 |
|
./pkg/mom_common/mom_u_botdrag_impl.F |
80 |
MOM_U_BOTDRAG_IMPL |
dragFac = mass2rUnit*rhoConst |
|
./pkg/mom_common/mom_u_bottomdrag.F |
76 |
MOM_U_BOTTOMDRAG |
dragFac = mass2rUnit*rhoConst |
|
./pkg/mom_common/mom_v_botdrag_impl.F |
80 |
MOM_V_BOTDRAG_IMPL |
dragFac = mass2rUnit*rhoConst |
|
./pkg/mom_common/mom_v_bottomdrag.F |
76 |
MOM_V_BOTTOMDRAG |
dragFac = mass2rUnit*rhoConst |
|
./pkg/mom_fluxform/mom_calc_rtrans.F |
77 |
MOM_CALC_RTRANS |
rTransU(i,j) = mass2rUnit* |
|
./pkg/mom_fluxform/mom_calc_rtrans.F |
80 |
MOM_CALC_RTRANS |
rTransV(i,j) = mass2rUnit* |
|
./pkg/mom_fluxform/mom_fluxform.F |
490 |
MOM_FLUXFORM |
& + uVel(i,j,k,bi,bj)*mass2rUnit*0.5 _d 0 |
|
./pkg/mom_fluxform/mom_fluxform.F |
723 |
MOM_FLUXFORM |
& + vVel(i,j,k,bi,bj)*mass2rUnit*0.5 _d 0 |
|
./model/src/config_summary.F |
839 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( mass2rUnit, INDEX_NONE,'mass2rUnit =', |
|
./model/src/config_summary.F |
847 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( mass2rUnit, INDEX_NONE,'mass2rUnit =', |
|
./pkg/my82/my82_ri_number.F |
115 |
MY82_RI_NUMBER |
buoyFreq(I,J) = gravity*mass2rUnit * |
|
./pkg/offline/offline_get_diffus.F |
144 |
OFFLINE_GET_DIFFUS |
& *mass2rUnit |
|
./pkg/pp81/pp81_ri_number.F |
119 |
PP81_RI_NUMBER |
buoyFreq = - gravity*mass2rUnit * |
|
./pkg/ptracers/ptracers_forcing_surf.F |
135 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./pkg/ptracers/ptracers_forcing_surf.F |
166 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./pkg/ptracers/ptracers_forcing_surf.F |
188 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./model/src/external_forcing.F |
392 |
EXTERNAL_FORCING_T |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/external_forcing.F |
403 |
EXTERNAL_FORCING_T |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/external_forcing.F |
420 |
EXTERNAL_FORCING_T |
tmpFac = (tmpFac/atm_Cp) * mass2rUnit |
|
./model/src/external_forcing.F |
423 |
EXTERNAL_FORCING_T |
tmpFac = recip_Cp * mass2rUnit |
|
./model/src/external_forcing.F |
549 |
EXTERNAL_FORCING_T |
& *recip_Cp*mass2rUnit |
|
./model/src/external_forcing.F |
714 |
EXTERNAL_FORCING_S |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/external_forcing.F |
725 |
EXTERNAL_FORCING_S |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/external_forcing_surf.F |
210 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./model/src/external_forcing_surf.F |
212 |
EXTERNAL_FORCING_SURF |
surfaceForcingV(i,j,bi,bj) = fv(i,j,bi,bj)*mass2rUnit |
|
./model/src/external_forcing_surf.F |
219 |
EXTERNAL_FORCING_SURF |
& ) *recip_Cp*mass2rUnit |
|
./model/src/external_forcing_surf.F |
222 |
EXTERNAL_FORCING_SURF |
& -saltFlux(i,j,bi,bj)*mass2rUnit |
|
./model/src/external_forcing_surf.F |
263 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./model/src/external_forcing_surf.F |
274 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./model/src/external_forcing_surf.F |
298 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./model/src/external_forcing_surf.F |
309 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./model/src/external_forcing_surf.F |
324 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./model/src/external_forcing_surf.F |
335 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./pkg/salt_plume/salt_plume_apply.F |
121 |
SALT_PLUME_APPLY |
recip_ConvertFac = mass2rUnit/HeatCapacity_Cp |
|
./pkg/salt_plume/salt_plume_apply.F |
129 |
SALT_PLUME_APPLY |
recip_ConvertFac = mass2rUnit |
|
./pkg/salt_plume/salt_plume_forcing_surf.F |
68 |
SALT_PLUME_FORCING_SURF |
& - SPforcS1(i,j,bi,bj) * mass2rUnit |
|
./pkg/salt_plume/salt_plume_forcing_surf.F |
70 |
SALT_PLUME_FORCING_SURF |
& - SPforcT1(i,j,bi,bj) * mass2rUnit / HeatCapacity_Cp |
|
./pkg/salt_plume/salt_plume_forcing_surf.F |
73 |
SALT_PLUME_FORCING_SURF |
& - saltPlumeFlux(i,j,bi,bj) * mass2rUnit |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
112 |
SALT_PLUME_TENDENCY_APPLY_S |
& *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
150 |
SALT_PLUME_TENDENCY_APPLY_S |
& *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_t.F |
61 |
SALT_PLUME_TENDENCY_APPLY_T |
& *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/salt_plume/salt_plume_volfrac.F |
150 |
SALT_PLUME_VOLFRAC |
SPbrineVolFlux(i,j,bi,bj)=dMbdt(i,j)*mass2rUnit |
|
./pkg/shelfice/shelfice_thermodynamics.F |
423 |
SHELFICE_THERMODYNAMICS |
& *recip_Cp*mass2rUnit |
|
./pkg/shelfice/shelfice_thermodynamics.F |
424 |
SHELFICE_THERMODYNAMICS |
& - cFac * shelfIceFreshWaterFlux(I,J,bi,bj)*mass2rUnit |
|
./pkg/shelfice/shelfice_thermodynamics.F |
427 |
SHELFICE_THERMODYNAMICS |
& shelfIceFreshWaterFlux(I,J,bi,bj) * mass2rUnit |
|
./pkg/shelfice/shelfice_thermodynamics.F |
552 |
SHELFICE_THERMODYNAMICS |
& - cFac*shelfIceFreshWaterFlux(I,J,bi,bj)*mass2rUnit ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
556 |
SHELFICE_THERMODYNAMICS |
& - cFac*shelfIceFreshWaterFlux(I,J,bi,bj)*mass2rUnit ) |
|
./model/src/ini_parms.F |
1450 |
INI_PARMS |
mass2rUnit = gravity |
|
./model/src/ini_parms.F |
1453 |
INI_PARMS |
mass2rUnit = recip_rhoConst |
|
./model/src/integr_continuity.F |
271 |
INTEGR_CONTINUITY |
& +mass2rUnit*PmEpR(i,j,bi,bj)*maskC(i,j,k,bi,bj) |
|
./model/src/integr_continuity.F |
88 |
INTEGR_CONTINUITY |
IF ( fluidIsWater.AND.useRealFreshWaterFlux ) facEmP=mass2rUnit |
|
./model/src/integr_continuity.F |
90 |
INTEGR_CONTINUITY |
IF ( selectAddFluid.GE.1 ) facMass = mass2rUnit |
|
./model/src/integrate_for_w.F |
85 |
INTEGRATE_FOR_W |
& + mFld(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/pre_cg3d.F |
109 |
PRE_CG3D |
& + EmPmR(i,j,bi,bj)*mass2rUnit |
|
./model/src/pre_cg3d.F |
95 |
PRE_CG3D |
tmpFac = freeSurfFac*mass2rUnit*implicDiv2DFlow/deltaTMom |
|
./verification/rotating_tank/code/apply_forcing.F |
522 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
533 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
550 |
APPLY_FORCING_T |
tmpFac = (tmpFac/atm_Cp) * mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
553 |
APPLY_FORCING_T |
tmpFac = recip_Cp * mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
680 |
APPLY_FORCING_T |
& *recip_Cp*mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
942 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
953 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/solve_for_pressure.F |
137 |
SOLVE_FOR_PRESSURE |
tmpFac = freeSurfFac*mass2rUnit*implicDiv2DFlow |
|
./model/src/solve_for_pressure.F |
167 |
SOLVE_FOR_PRESSURE |
& freeSurfFac*deltaTFreeSurf*mass2rUnit*sumEmP/globalArea |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
138 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
169 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
191 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
210 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
212 |
EXTERNAL_FORCING_SURF |
surfaceForcingV(i,j,bi,bj) = fv(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
222 |
EXTERNAL_FORCING_SURF |
& ) *recip_Cp*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
225 |
EXTERNAL_FORCING_SURF |
& -saltFlux(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
266 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
277 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
301 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
312 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
327 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
338 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
210 |
EXTERNAL_FORCING_SURF |
surfaceForcingU(i,j,bi,bj) = fu(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
212 |
EXTERNAL_FORCING_SURF |
surfaceForcingV(i,j,bi,bj) = fv(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
222 |
EXTERNAL_FORCING_SURF |
& ) *recip_Cp*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
225 |
EXTERNAL_FORCING_SURF |
& -saltFlux(i,j,bi,bj)*mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
266 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
277 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
301 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
312 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
327 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
338 |
EXTERNAL_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
132 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
162 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
183 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
132 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
162 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
183 |
PTRACERS_FORCING_SURF |
& *mass2rUnit |