My Project
Modules | Functions/Subroutines | Variables
ice_constants.f90 File Reference

Go to the source code of this file.

Modules

module  ice_constants
 

Functions/Subroutines

subroutine ice_constants::init_constants
 

Variables

real(kind=dbl_kind), parameter ice_constants::gravit = 9.80616_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::secday = 86400.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::omega = 7.292e-5_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::radius = 6.37e6_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::rhoi = 917.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::rhow = 1026.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::rhofresh = 1000.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::zvir = 0.606_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::vonkar = 0.4_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::cp_air = 1005.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::cp_wv = 1.81e3_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::stefan_boltzmann = 567.0e-10_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::tffresh = 273.15_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::cp_ice = 2106._dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::cp_ocn = 4218._dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::lsub = 2.835e6_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::lvap = 2.501e6_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::lfresh = Lsub-Lvap
 
real(kind=dbl_kind), parameter ice_constants::timelt = 0.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::tsmelt = 0.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::ice_ref_salinity = 4._dbl_kind
 
real(kind=real_kind), parameter ice_constants::spval = 1.0e30_real_kind
 
real(kind=dbl_kind), parameter ice_constants::rhos = 330.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::depresst = 0.054_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::iceruf = 0.0005_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::kappav = 1.4_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::kappan = 17.6_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::emissivity = 0.95_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::kice = 2.03_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::ksno = 0.30_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::zref = 10._dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::qqqice = 11637800._dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::tttice = 5897.8_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::qqqocn = 627572.4_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::tttocn = 5107.4_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c0i = 0.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c1i = 1.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c2i = 2.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c3i = 3.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c4i = 4.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c5i = 5.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c6i = 6.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c7i = 7.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c8i = 8.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c9i = 9.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c10i = 10.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c12 = 12.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c15 = 15.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c16 = 16.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c20 = 20.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c25 = 25.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c90 = 90.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c100 = 100.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c360 = 360.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c365 = 365.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c1000 = 1000.0_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::c1p5 = 1.5_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p001 = 0.001_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p01 = 0.01_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p1 = 0.1_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p2 = 0.2_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p4 = 0.4_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p5 = 0.5_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p6 = 0.6_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p15 = 0.15_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p25 = 0.25_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::p166 = c1i/c6i
 
real(kind=dbl_kind), parameter ice_constants::p333 = c1i/c3i
 
real(kind=dbl_kind), parameter ice_constants::p666 = c2i/c3i
 
real(kind=dbl_kind), parameter ice_constants::p111 = c1i/c9i
 
real(kind=dbl_kind), parameter ice_constants::p055 = p111*p5
 
real(kind=dbl_kind), parameter ice_constants::p027 = p055*p5
 
real(kind=dbl_kind), parameter ice_constants::p222 = c2i/c9i
 
real(kind=dbl_kind), parameter ice_constants::eps04 = 1.0e-4_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::eps11 = 1.0e-11_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::eps12 = 1.0e-12_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::eps13 = 1.0e-13_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::eps15 = 1.0e-15_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::eps16 = 1.0e-16_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::puny = 1.0e-5_dbl_kind
 
real(kind=dbl_kind) ice_constants::pih
 
real(kind=dbl_kind), parameter ice_constants::cm_to_m = 0.01_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::m_to_cm = 100._dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::m2_to_km2 = 1.e-6_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::kg_to_g = 1000._dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::mps_to_cmpdy = 8.64e6_dbl_kind
 
real(kind=dbl_kind), parameter ice_constants::mps_to_cmpyr = mps_to_cmpdy*365._dbl_kind
 
real(kind=dbl_kind) ice_constants::rad_to_deg