This module defines model-specific constants/parameters.
| Variables | |
| real(kind=kind_phys) | cp | 
| = 7.*r_d/2. (J/kg/K) | |
| real(kind=kind_phys) | cpv | 
| = 4.*r_v (J/kg/K) Spec heat H2O gas | |
| real(kind=kind_phys) | cice | 
| = 2106. (J/kg/K) Spec heat H2O ice | |
| real(kind=kind_phys) | cliq | 
| = 4190. (J/kg/K) Spec heat H2O liq | |
| real(kind=kind_phys) | p608 | 
| = R_v/R_d-1. | |
| real(kind=kind_phys) | ep_2 | 
| = R_d/R_v | |
| real(kind=kind_phys) | grav | 
| = accel due to gravity | |
| real(kind=kind_phys) | karman | 
| = von Karman constant | |
| real(kind=kind_phys) | t0c | 
| = temperature of water at freezing, 273.15 K | |
| real(kind=kind_phys) | rcp | 
| = r_d/cp | |
| real(kind=kind_phys) | r_d | 
| = 287. (J/kg/K) gas const dry air | |
| real(kind=kind_phys) | r_v | 
| = 461.6 (J/kg/K) gas const water | |
| real(kind=kind_phys) | xlf | 
| = 0.35E6 (J/kg) fusion at 0 C | |
| real(kind=kind_phys) | xlv | 
| = 2.50E6 (J/kg) vaporization at 0 C | |
| real(kind=kind_phys) | xls | 
| = 2.85E6 (J/kg) sublimation | |
| real(kind=kind_phys) | rvovrd | 
| = r_v/r_d != 1.608 | |
| real(kind=kind_phys), parameter | zero = 0.0 | 
| real(kind=kind_phys), parameter | half = 0.5 | 
| real(kind=kind_phys), parameter | one = 1.0 | 
| real(kind=kind_phys), parameter | two = 2.0 | 
| real(kind=kind_phys), parameter | onethird = 1./3. | 
| real(kind=kind_phys), parameter | twothirds = 2./3. | 
| real(kind=kind_phys), parameter | tref = 300.0 | 
| reference temperature (K) | |
| real(kind=kind_phys), parameter | tkmin = 253.0 | 
| for total water conversion, Tripoli and Cotton (1981) | |
| real(kind=kind_phys), parameter | p1000mb =100000.0 | 
| real(kind=kind_phys), parameter | svp1 = 0.6112 | 
| (kPa) | |
| real(kind=kind_phys), parameter | svp2 = 17.67 | 
| (dimensionless) | |
| real(kind=kind_phys), parameter | svp3 = 29.65 | 
| (K) | |
| real(kind=kind_phys), parameter | tice = 240.0 | 
| -33 (C), temp at saturation w.r.t. ice | |
| real(kind=kind_phys) | ep_3 | 
| = 1.-ep_2 != 0.378 | |
| real(kind=kind_phys) | gtr | 
| = grav/tref | |
| real(kind=kind_phys) | rk | 
| = cp/r_d | |
| real(kind=kind_phys) | tv0 | 
| = p608*tref | |
| real(kind=kind_phys) | tv1 | 
| = (1.+p608)*tref | |
| real(kind=kind_phys) | xlscp | 
| = (xlv+xlf)/cp | |
| real(kind=kind_phys) | xlvcp | 
| = xlv/cp | |
| real(kind=kind_phys) | g_inv | 
| = 1./grav | |