FV3 Bundle
constants_mod Module Reference

Functions/Subroutines

subroutine, public constants_init
 dummy routine. More...
 

Variables

real realnumber
 dummy variable to use in HUGE initializations More...
 
real, parameter, private small_fac = 1._r8_kind
 
real, parameter, public radius = 6371.0e+3_r8_kind * small_fac
 Radius of the Earth [m]. More...
 
real(kind=8), parameter, public pi_8 = 3.14159265358979323846_r8_kind
 Ratio of circle circumference to diameter [N/A]. More...
 
real, parameter, public pi = 3.14159265358979323846_r8_kind
 Ratio of circle circumference to diameter [N/A]. More...
 
real, parameter, public omega = 7.292e-5_r8_kind / small_fac
 Rotation rate of the Earth [1/s]. More...
 
real, parameter, public grav = 9.80_r8_kind
 Acceleration due to gravity [m/s^2]. More...
 
real, parameter, public rdgas = 287.04_r8_kind
 Gas constant for dry air [J/kg/deg]. More...
 
real, parameter, public rvgas = 461.50_r8_kind
 Gas constant for water vapor [J/kg/deg]. More...
 
real, parameter, public hlv = 2.500e6_r8_kind
 Latent heat of evaporation [J/kg]. More...
 
real, parameter, public hlf = 3.34e5_r8_kind
 Latent heat of fusion [J/kg]. More...
 
real, parameter, public kappa = 2.0_r8_kind/7.0_r8_kind
 RDGAS / CP_AIR [dimensionless]. More...
 
real, parameter, public cp_air = RDGAS/KAPPA
 Specific heat capacity of dry air at constant pressure [J/kg/deg]. More...
 
real, parameter, public tfreeze = 273.16_r8_kind
 Freezing temperature of fresh water [K]. More...
 
real, parameter, public stefan = 5.6734e-8_r8_kind
 Stefan-Boltzmann constant [W/m^2/deg^4]. More...
 
real, parameter, public cp_vapor = 4.0_r8_kind*RVGAS
 Specific heat capacity of water vapor at constant pressure [J/kg/deg]. More...
 
real, parameter, public cp_ocean = 3989.24495292815_r8_kind
 Specific heat capacity taken from McDougall (2002) "Potential Enthalpy ..." [J/kg/deg]. More...
 
real, parameter, public rho0 = 1.035e3_r8_kind
 Average density of sea water [kg/m^3]. More...
 
real, parameter, public rho0r = 1.0_r8_kind/RHO0
 Reciprocal of average density of sea water [m^3/kg]. More...
 
real, parameter, public rho_cp = RHO0*CP_OCEAN
 (kg/m^3)*(cal/kg/deg C)(joules/cal) = (joules/m^3/deg C) [J/m^3/deg] More...
 
real, parameter, public es0 = 1.0_r8_kind
 Humidity factor. Controls the humidity content of the atmosphere through the Saturation Vapour Pressure expression when using DO_SIMPLE. [dimensionless]. More...
 
real, parameter, public dens_h2o = 1000._r8_kind
 Density of liquid water [kg/m^3]. More...
 
real, parameter, public hls = HLV + HLF
 Latent heat of sublimation [J/kg]. More...
 
real, parameter, public wtmair = 2.896440E+01_r8_kind
 Molecular weight of air [AMU]. More...
 
real, parameter, public wtmh2o = WTMAIR*(RDGAS/RVGAS)
 Molecular weight of water [AMU]. More...
 
real, parameter, public wtmozone = 47.99820_r8_kind
 Molecular weight of ozone [AMU]. More...
 
real, parameter, public wtmc = 12.00000_r8_kind
 Molecular weight of carbon [AMU]. More...
 
real, parameter, public wtmco2 = 44.00995_r8_kind
 Molecular weight of carbon dioxide [AMU]. More...
 
real, parameter, public wtmch4 = 16.0425_r8_kind
 Molecular weight of methane [AMU]. More...
 
real, parameter, public wtmo2 = 31.9988_r8_kind
 Molecular weight of molecular oxygen [AMU]. More...
 
real, parameter, public wtmcfc11 = 137.3681_r8_kind
 Molecular weight of CFC-11 (CCl3F) [AMU]. More...
 
real, parameter, public wtmcfc12 = 120.9135_r8_kind
 Molecular weight of CFC-21 (CCl2F2) [AMU]. More...
 
real, parameter, public wtmn = 14.0067_r8_kind
 Molecular weight of Nitrogen [AMU]. More...
 
real, parameter, public diffac = 1.660000E+00_r8_kind
 Diffusivity factor [dimensionless]. More...
 
real, parameter, public avogno = 6.023000E+23_r8_kind
 Avogadro's number [atoms/mole]. More...
 
real, parameter, public pstd = 1.013250E+06_r8_kind
 Mean sea level pressure [dynes/cm^2]. More...
 
real, parameter, public pstd_mks = 101325.0_r8_kind
 Mean sea level pressure [N/m^2]. More...
 
real, parameter, public seconds_per_day = 8.640000E+04_r8_kind
 Seconds in a day [s]. More...
 
real, parameter, public seconds_per_hour = 3600._r8_kind
 Seconds in an hour [s]. More...
 
real, parameter, public seconds_per_minute = 60._r8_kind
 Seconds in a minute [s]. More...
 
real, parameter, public rad_to_deg = 180._r8_kind/PI
 Degrees per radian [deg/rad]. More...
 
real, parameter, public deg_to_rad = PI/180._r8_kind
 Radians per degree [rad/deg]. More...
 
real, parameter, public radian = RAD_TO_DEG
 Equal to RAD_TO_DEG for backward compatability. [rad/deg]. More...
 
real, parameter, public alogmin = -50.0_r8_kind
 Minimum value allowed as argument to log function [N/A]. More...
 
real, parameter, public epsln = 1.0e-40_r8_kind
 A small number to prevent divide by zero exceptions [N/A]. More...
 
real, parameter, public radcon = ((1.0E+02*GRAV)/(1.0E+04*CP_AIR))*SECONDS_PER_DAY
 Factor used to convert flux divergence to heating rate in degrees per day [deg sec/(cm day)]. More...
 
real, parameter, public radcon_mks = (GRAV/CP_AIR)*SECONDS_PER_DAY
 Factor used to convert flux divergence to heating rate in degrees per day [deg sec/(m day)]. More...
 
real, parameter, public o2mixrat = 2.0953E-01_r8_kind
 Mixing ratio of molecular oxygen in air [dimensionless]. More...
 
real, parameter, public rhoair = 1.292269_r8_kind
 Reference atmospheric density [kg/m^3]. More...
 
real, parameter, public vonkarm = 0.40_r8_kind
 Von Karman constant [dimensionless]. More...
 
real, parameter, public c2dbars = 1.e-4_r8_kind
 Converts rho*g*z (in mks) to dbars: 1dbar = 10^4 (kg/m^3)(m/s^2)m [dbars]. More...
 
real, parameter, public kelvin = 273.15_r8_kind
 Degrees Kelvin at zero Celsius [K]. More...
 

Function/Subroutine Documentation

◆ constants_init()

subroutine, public constants_mod::constants_init ( )

dummy routine.

Definition at line 141 of file constants.F90.

Here is the caller graph for this function:

Variable Documentation

◆ alogmin

real, parameter, public constants_mod::alogmin = -50.0_r8_kind

Minimum value allowed as argument to log function [N/A].

Definition at line 122 of file constants.F90.

◆ avogno

real, parameter, public constants_mod::avogno = 6.023000E+23_r8_kind

Avogadro's number [atoms/mole].

Definition at line 112 of file constants.F90.

◆ c2dbars

real, parameter, public constants_mod::c2dbars = 1.e-4_r8_kind

Converts rho*g*z (in mks) to dbars: 1dbar = 10^4 (kg/m^3)(m/s^2)m [dbars].

Definition at line 132 of file constants.F90.

◆ cp_air

real, parameter, public constants_mod::cp_air = RDGAS/KAPPA

Specific heat capacity of dry air at constant pressure [J/kg/deg].

Definition at line 83 of file constants.F90.

◆ cp_ocean

real, parameter, public constants_mod::cp_ocean = 3989.24495292815_r8_kind

Specific heat capacity taken from McDougall (2002) "Potential Enthalpy ..." [J/kg/deg].

Definition at line 90 of file constants.F90.

◆ cp_vapor

real, parameter, public constants_mod::cp_vapor = 4.0_r8_kind*RVGAS

Specific heat capacity of water vapor at constant pressure [J/kg/deg].

Definition at line 89 of file constants.F90.

◆ deg_to_rad

real, parameter, public constants_mod::deg_to_rad = PI/180._r8_kind

Radians per degree [rad/deg].

Definition at line 120 of file constants.F90.

◆ dens_h2o

real, parameter, public constants_mod::dens_h2o = 1000._r8_kind

Density of liquid water [kg/m^3].

Definition at line 98 of file constants.F90.

◆ diffac

real, parameter, public constants_mod::diffac = 1.660000E+00_r8_kind

Diffusivity factor [dimensionless].

Definition at line 111 of file constants.F90.

◆ epsln

real, parameter, public constants_mod::epsln = 1.0e-40_r8_kind

A small number to prevent divide by zero exceptions [N/A].

Definition at line 123 of file constants.F90.

◆ es0

real, parameter, public constants_mod::es0 = 1.0_r8_kind

Humidity factor. Controls the humidity content of the atmosphere through the Saturation Vapour Pressure expression when using DO_SIMPLE. [dimensionless].

Definition at line 96 of file constants.F90.

◆ grav

real, parameter, public constants_mod::grav = 9.80_r8_kind

Acceleration due to gravity [m/s^2].

Definition at line 76 of file constants.F90.

◆ hlf

real, parameter, public constants_mod::hlf = 3.34e5_r8_kind

Latent heat of fusion [J/kg].

Definition at line 81 of file constants.F90.

◆ hls

real, parameter, public constants_mod::hls = HLV + HLF

Latent heat of sublimation [J/kg].

Definition at line 99 of file constants.F90.

◆ hlv

real, parameter, public constants_mod::hlv = 2.500e6_r8_kind

Latent heat of evaporation [J/kg].

Definition at line 80 of file constants.F90.

◆ kappa

real, parameter, public constants_mod::kappa = 2.0_r8_kind/7.0_r8_kind

RDGAS / CP_AIR [dimensionless].

Definition at line 82 of file constants.F90.

◆ kelvin

real, parameter, public constants_mod::kelvin = 273.15_r8_kind

Degrees Kelvin at zero Celsius [K].

Definition at line 133 of file constants.F90.

◆ o2mixrat

real, parameter, public constants_mod::o2mixrat = 2.0953E-01_r8_kind

Mixing ratio of molecular oxygen in air [dimensionless].

Definition at line 129 of file constants.F90.

◆ omega

real, parameter, public constants_mod::omega = 7.292e-5_r8_kind / small_fac

Rotation rate of the Earth [1/s].

Definition at line 75 of file constants.F90.

◆ pi

real, parameter, public constants_mod::pi = 3.14159265358979323846_r8_kind

Ratio of circle circumference to diameter [N/A].

Definition at line 74 of file constants.F90.

◆ pi_8

real(kind=8), parameter, public constants_mod::pi_8 = 3.14159265358979323846_r8_kind

Ratio of circle circumference to diameter [N/A].

Definition at line 73 of file constants.F90.

◆ pstd

real, parameter, public constants_mod::pstd = 1.013250E+06_r8_kind

Mean sea level pressure [dynes/cm^2].

Definition at line 113 of file constants.F90.

◆ pstd_mks

real, parameter, public constants_mod::pstd_mks = 101325.0_r8_kind

Mean sea level pressure [N/m^2].

Definition at line 114 of file constants.F90.

◆ rad_to_deg

real, parameter, public constants_mod::rad_to_deg = 180._r8_kind/PI

Degrees per radian [deg/rad].

Definition at line 119 of file constants.F90.

◆ radcon

real, parameter, public constants_mod::radcon = ((1.0E+02*GRAV)/(1.0E+04*CP_AIR))*SECONDS_PER_DAY

Factor used to convert flux divergence to heating rate in degrees per day [deg sec/(cm day)].

Definition at line 125 of file constants.F90.

◆ radcon_mks

real, parameter, public constants_mod::radcon_mks = (GRAV/CP_AIR)*SECONDS_PER_DAY

Factor used to convert flux divergence to heating rate in degrees per day [deg sec/(m day)].

Definition at line 127 of file constants.F90.

◆ radian

real, parameter, public constants_mod::radian = RAD_TO_DEG

Equal to RAD_TO_DEG for backward compatability. [rad/deg].

Definition at line 121 of file constants.F90.

◆ radius

real, parameter, public constants_mod::radius = 6371.0e+3_r8_kind * small_fac

Radius of the Earth [m].

Definition at line 72 of file constants.F90.

◆ rdgas

real, parameter, public constants_mod::rdgas = 287.04_r8_kind

Gas constant for dry air [J/kg/deg].

Definition at line 77 of file constants.F90.

◆ realnumber

real constants_mod::realnumber
private

dummy variable to use in HUGE initializations

Definition at line 38 of file constants.F90.

◆ rho0

real, parameter, public constants_mod::rho0 = 1.035e3_r8_kind

Average density of sea water [kg/m^3].

Definition at line 92 of file constants.F90.

◆ rho0r

real, parameter, public constants_mod::rho0r = 1.0_r8_kind/RHO0

Reciprocal of average density of sea water [m^3/kg].

Definition at line 93 of file constants.F90.

◆ rho_cp

real, parameter, public constants_mod::rho_cp = RHO0*CP_OCEAN

(kg/m^3)*(cal/kg/deg C)(joules/cal) = (joules/m^3/deg C) [J/m^3/deg]

Definition at line 94 of file constants.F90.

◆ rhoair

real, parameter, public constants_mod::rhoair = 1.292269_r8_kind

Reference atmospheric density [kg/m^3].

Definition at line 130 of file constants.F90.

◆ rvgas

real, parameter, public constants_mod::rvgas = 461.50_r8_kind

Gas constant for water vapor [J/kg/deg].

Definition at line 78 of file constants.F90.

◆ seconds_per_day

real, parameter, public constants_mod::seconds_per_day = 8.640000E+04_r8_kind

Seconds in a day [s].

Definition at line 116 of file constants.F90.

◆ seconds_per_hour

real, parameter, public constants_mod::seconds_per_hour = 3600._r8_kind

Seconds in an hour [s].

Definition at line 117 of file constants.F90.

◆ seconds_per_minute

real, parameter, public constants_mod::seconds_per_minute = 60._r8_kind

Seconds in a minute [s].

Definition at line 118 of file constants.F90.

◆ small_fac

real, parameter, private constants_mod::small_fac = 1._r8_kind
private

Definition at line 69 of file constants.F90.

◆ stefan

real, parameter, public constants_mod::stefan = 5.6734e-8_r8_kind

Stefan-Boltzmann constant [W/m^2/deg^4].

Definition at line 87 of file constants.F90.

◆ tfreeze

real, parameter, public constants_mod::tfreeze = 273.16_r8_kind

Freezing temperature of fresh water [K].

Definition at line 84 of file constants.F90.

◆ vonkarm

real, parameter, public constants_mod::vonkarm = 0.40_r8_kind

Von Karman constant [dimensionless].

Definition at line 131 of file constants.F90.

◆ wtmair

real, parameter, public constants_mod::wtmair = 2.896440E+01_r8_kind

Molecular weight of air [AMU].

Definition at line 101 of file constants.F90.

◆ wtmc

real, parameter, public constants_mod::wtmc = 12.00000_r8_kind

Molecular weight of carbon [AMU].

Definition at line 104 of file constants.F90.

◆ wtmcfc11

real, parameter, public constants_mod::wtmcfc11 = 137.3681_r8_kind

Molecular weight of CFC-11 (CCl3F) [AMU].

Definition at line 108 of file constants.F90.

◆ wtmcfc12

real, parameter, public constants_mod::wtmcfc12 = 120.9135_r8_kind

Molecular weight of CFC-21 (CCl2F2) [AMU].

Definition at line 109 of file constants.F90.

◆ wtmch4

real, parameter, public constants_mod::wtmch4 = 16.0425_r8_kind

Molecular weight of methane [AMU].

Definition at line 106 of file constants.F90.

◆ wtmco2

real, parameter, public constants_mod::wtmco2 = 44.00995_r8_kind

Molecular weight of carbon dioxide [AMU].

Definition at line 105 of file constants.F90.

◆ wtmh2o

real, parameter, public constants_mod::wtmh2o = WTMAIR*(RDGAS/RVGAS)

Molecular weight of water [AMU].

Definition at line 102 of file constants.F90.

◆ wtmn

real, parameter, public constants_mod::wtmn = 14.0067_r8_kind

Molecular weight of Nitrogen [AMU].

Definition at line 110 of file constants.F90.

◆ wtmo2

real, parameter, public constants_mod::wtmo2 = 31.9988_r8_kind

Molecular weight of molecular oxygen [AMU].

Definition at line 107 of file constants.F90.

◆ wtmozone

real, parameter, public constants_mod::wtmozone = 47.99820_r8_kind

Molecular weight of ozone [AMU].

Definition at line 103 of file constants.F90.