Symbol Description Uses
rUnit2mass units conversion factor (surface forcing), from vertical r-coordinate unit to mass per unit area [kg/m2]. z-coord: = rhoConst ( [m] * rho = [kg/m2] ) ; p-coord: = 1/gravity ( [Pa] / g = [kg/m2] ) ; 53


File Line number Procedure Code
./model/inc/PARAMS.h 775 NO PROCEDURE 
     & rVel2wUnit, wUnit2rVel, mass2rUnit, rUnit2mass,
./model/inc/PARAMS.h 880 NO PROCEDURE 
      _RL mass2rUnit, rUnit2mass
./pkg/frazil/frazil_calc_rhs.F 94 FRAZIL_CALC_RHS 
     &            * HeatCapacity_Cp * rUnit2mass
./pkg/icefront/icefront_thermodynamics.F 103 ICEFRONT_THERMODYNAMICS 
      eps1 = rUnit2mass*HeatCapacity_Cp*ICEFRONTheatTransCoeff(I,J)
./pkg/icefront/icefront_thermodynamics.F 104 ICEFRONT_THERMODYNAMICS 
      eps2 = rUnit2mass*ICEFRONTlatentHeat*ICEFRONTsaltTransCoeff(I,J)
./pkg/icefront/icefront_thermodynamics.F 105 ICEFRONT_THERMODYNAMICS 
      eps3 = rUnit2mass*ICEFRONTheatCapacity_Cp
./pkg/icefront/icefront_thermodynamics.F 151 ICEFRONT_THERMODYNAMICS 
     &           ( -rUnit2mass*ICEFRONTheatTransCoeff(I,J) +
./model/src/apply_forcing.F 605 APPLY_FORCING_T 
          tmpFac = rUnit2mass
./pkg/layers/layers_thermodynamics.F 56 LAYERS_CALC_RHS 
      fluxfac(1) = 1.0/(HeatCapacity_Cp*rUnit2mass)
./pkg/layers/layers_thermodynamics.F 57 LAYERS_CALC_RHS 
      fluxfac(2) = 1.0/rUnit2mass
./pkg/monitor/mon_ke.F 317 MON_KE 
       totAMu = totAMu*rUnit2mass
./pkg/monitor/mon_ke.F 318 MON_KE 
       totAMs = totAMs*rUnit2mass
./pkg/monitor/mon_surfcor.F 189 MON_SURFCOR 
         wT_Heat  = wT_Heat  * rUnit2mass
./pkg/monitor/mon_surfcor.F 190 MON_SURFCOR 
         theta2PE = theta2PE * rUnit2mass
./model/src/config_summary.F 749 CONFIG_SUMMARY 
       CALL WRITE_0D_RL( rUnit2mass, INDEX_NONE,'rUnit2mass =',
./model/src/config_summary.F 755 CONFIG_SUMMARY 
       CALL WRITE_0D_RL( rUnit2mass, INDEX_NONE,'rUnit2mass =',
./model/src/diags_oceanic_surf_flux.F 104 DIAGS_OCEANIC_SURF_FLUX 
       tmpFac = HeatCapacity_Cp*rUnit2mass
./model/src/diags_oceanic_surf_flux.F 109 DIAGS_OCEANIC_SURF_FLUX 
       tmpFac = rUnit2mass
./model/src/diags_oceanic_surf_flux.F 126 DIAGS_OCEANIC_SURF_FLUX 
     &      *HeatCapacity_Cp*rUnit2mass
./model/src/diags_oceanic_surf_flux.F 158 DIAGS_OCEANIC_SURF_FLUX 
     &      surfaceForcingS(i,j,bi,bj)*rUnit2mass
./model/src/diags_oceanic_surf_flux.F 99 DIAGS_OCEANIC_SURF_FLUX 
       tmpFac = HeatCapacity_Cp*rUnit2mass
./pkg/ptracers/ptracers_forcing_surf.F 90 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./pkg/ptracers/ptracers_forcing_surf.F 98 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./model/src/external_forcing.F 492 EXTERNAL_FORCING_T 
          tmpFac = rUnit2mass
./model/src/forcing_surf_relax.F 248 FORCING_SURF_RELAX 
        tmpFac = HeatCapacity_Cp*rUnit2mass
./model/src/forcing_surf_relax.F 253 FORCING_SURF_RELAX 
        tmpFac = rUnit2mass
./pkg/shap_filt/shap_filt_apply_uv.F 168 SHAP_FILT_APPLY_UV 
     &                           - dKE_shap(i,j)*drF(k)*rUnit2mass
./pkg/shelfice/shelfice_thermodynamics.F 352 SHELFICE_THERMODYNAMICS 
     &           * HeatCapacity_Cp*rUnit2mass
./pkg/shelfice/shelfice_thermodynamics.F 400 SHELFICE_THERMODYNAMICS 
            eps1 = rUnit2mass*HeatCapacity_Cp
./pkg/shelfice/shelfice_thermodynamics.F 402 SHELFICE_THERMODYNAMICS 
            eps2 = rUnit2mass*SHELFICElatentHeat
./pkg/shelfice/shelfice_thermodynamics.F 404 SHELFICE_THERMODYNAMICS 
            eps5 = rUnit2mass*HeatCapacity_Cp
./pkg/shelfice/shelfice_thermodynamics.F 421 SHELFICE_THERMODYNAMICS 
            eps8 = rUnit2mass*SHELFICEheatCapacity_Cp
./pkg/shelfice/shelfice_thermodynamics.F 451 SHELFICE_THERMODYNAMICS 
             print *, 'ml-shelfice: rU2mass = ', rUnit2mass
./pkg/shelfice/shelfice_thermodynamics.F 475 SHELFICE_THERMODYNAMICS 
            freshWaterFlux = rUnit2mass
./pkg/shelfice/shelfice_thermodynamics.F 536 SHELFICE_THERMODYNAMICS 
       tmpFac = HeatCapacity_Cp*rUnit2mass
./pkg/shelfice/shelfice_thermodynamics.F 540 SHELFICE_THERMODYNAMICS 
       tmpFac = rUnit2mass
./pkg/timeave/timeave_surf_flux.F 72 TIMEAVE_SURF_FLUX 
     &    *HeatCapacity_Cp*rUnit2mass
./pkg/timeave/timeave_surf_flux.F 93 TIMEAVE_SURF_FLUX 
     &    surfaceForcingS(i,j,bi,bj)*rUnit2mass
./model/src/ini_parms.F 1341 INI_PARMS 
         rUnit2mass = recip_gravity
./model/src/ini_parms.F 1344 INI_PARMS 
         rUnit2mass = rhoConst
./model/src/integr_continuity.F 155 INTEGR_CONTINUITY 
            PmEpR(i,j,bi,bj) = PmEpR(i,j,bi,bj)*rUnit2mass
./verification/rotating_tank/code/apply_forcing.F 622 APPLY_FORCING_T 
          tmpFac = rUnit2mass
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 89 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F 97 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 88 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F 96 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 88 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F 96 PTRACERS_FORCING_SURF 
            add2EmP(i,j) = rUnit2mass
./pkg/aim_v23/aim_tendency_apply.F 102 AIM_TENDENCY_APPLY_U 
     &                       *hFacW(i,j,k,bi,bj)*drF(k)*rUnit2mass
./pkg/aim_v23/aim_tendency_apply.F 289 AIM_TENDENCY_APPLY_V 
     &                       *hFacS(i,j,k,bi,bj)*drF(k)*rUnit2mass
./pkg/atm_phys/atm_phys_tendency_apply.F 163 ATM_PHYS_TENDENCY_APPLY_V 
     &                        *hFacS(i,j,k,bi,bj)*drF(k)*rUnit2mass
./pkg/atm_phys/atm_phys_tendency_apply.F 77 ATM_PHYS_TENDENCY_APPLY_U 
     &                       *hFacW(i,j,k,bi,bj)*drF(k)*rUnit2mass
./pkg/ebm/ebm_wind_perturb.F 134 EBM_WIND_PERTURB 
     &                    + winPert(i,j,bi,bj)*rUnit2mass