VARphy Module


Used by

  • module~~varphy~~UsedByGraph module~varphy VARphy proc~sisvat_zag SISVAT_zAg proc~sisvat_zag->module~varphy proc~inlandsis~2 INLANDSIS proc~inlandsis~2->module~varphy proc~sisvat_zcr SISVAT_zCr proc~sisvat_zcr->module~varphy proc~sisvat_weq SISVAT_wEq proc~sisvat_weq->module~varphy proc~sisvat_ts2~2 SISVAT_TS2 proc~sisvat_ts2~2->module~varphy proc~sisvat_qso SISVAT_qSo proc~sisvat_qso->module~varphy proc~snoptp SnOptP proc~snoptp->module~varphy proc~sisvat_qsn SISVAT_qSn proc~sisvat_qsn->module~varphy proc~sisvat_qso~2 SISVAT_qSo proc~sisvat_qso~2->module~varphy proc~sisvat_zsn SISVAT_zSn proc~sisvat_zsn->module~varphy proc~sisvat_zcr~2 SISVAT_zCr proc~sisvat_zcr~2->module~varphy proc~snoptp~2 SnOptP proc~snoptp~2->module~varphy proc~sisvat_weq~2 SISVAT_wEq proc~sisvat_weq~2->module~varphy proc~sisvat_zag~2 SISVAT_zAg proc~sisvat_zag~2->module~varphy proc~inlandsis INLANDSIS proc~inlandsis->module~varphy proc~sisvat_gsn SISVAT_GSn proc~sisvat_gsn->module~varphy proc~sisvat_gsn~2 SISVAT_GSn proc~sisvat_gsn~2->module~varphy proc~albedo_kokhanovsky~2 albedo_kokhanovsky proc~albedo_kokhanovsky~2->module~varphy proc~albedo_kokhanovsky albedo_kokhanovsky proc~albedo_kokhanovsky->module~varphy proc~sisvat_tso~2 SISVAT_TSo proc~sisvat_tso~2->module~varphy proc~sisvat_ini~2 SISVAT_ini proc~sisvat_ini~2->module~varphy proc~sisvat_ini SISVAT_ini proc~sisvat_ini->module~varphy proc~sisvat_zsn~2 SISVAT_zSn proc~sisvat_zsn~2->module~varphy proc~sisvat_bsn SISVAT_BSn proc~sisvat_bsn->module~varphy proc~sisvat_qsn~2 SISVAT_qSn proc~sisvat_qsn~2->module~varphy proc~surf_inlandsis surf_inlandsis proc~surf_inlandsis->module~varphy proc~sisvat_tso SISVAT_TSo proc~sisvat_tso->module~varphy proc~sisvat_ts2 SISVAT_TS2 proc~sisvat_ts2->module~varphy proc~sisvat_bsn~2 SISVAT_BSn proc~sisvat_bsn~2->module~varphy proc~surf_inlandsis~2 surf_inlandsis proc~surf_inlandsis~2->module~varphy

Contents

Variables


Variables

Type Visibility Attributes Name Initial
character(len=1), public, parameter :: labnum(0:9) = (/'0', '1', '2', '3', '4', '5', '6', '7', '8', '9'/)
integer, public, parameter :: iun = 1
real, public, parameter :: zer0 = 0.0e+0
real, public, parameter :: half = 0.5e+0
real, public, parameter :: un_1 = 1.0e+0
real, public, parameter :: eps6 = 1.0e-6
real, public, parameter :: R_1000 = 1.e3
real, public, parameter :: zero = 0.0e+0
real, public, parameter :: demi = 0.5e+0
real, public, parameter :: unun = 1.0e+0
real, public, parameter :: epsi = 1.0e-6
real, public, parameter :: eps9 = 1.0e-9
real, public :: ea_MAX
real, public :: ea_MIN
real, public, parameter :: pi = 3.141592653589793238462643e0
real, public, parameter :: Grav_F = 9.81e0
real, public, parameter :: Grav_I = 1./Grav_F
real, public, parameter :: gravit = 9.81e0
real, public, parameter :: gravi2 = gravit**2
real, public, parameter :: grvinv = 1./gravit
real, public, parameter :: StefBo = 5.67e-8
real, public, parameter :: cp = 1004.708845
real, public, parameter :: RVapor = 461.e0
real, public, parameter :: Lv_H2O = 2.5008e+6
real, public, parameter :: Ls_H2O = 2.8345e+6
real, public, parameter :: r_LvCp = 2490.04
real, public, parameter :: r_LcCp = 332.27
real, public, parameter :: r_LsCp = 2822.31
real, public, parameter :: LhfH2O = 3.34e+5
real, public, parameter :: LhvH2O = 2.5008e+6
real, public, parameter :: LhsH2O = 2.8345e+6
real, public, parameter :: rhoWat = 1000.00e0
real, public, parameter :: rhoIce = 920.e0
real, public, parameter :: BSnoRo = 3.30e+2
real, public, parameter :: frsno = 300.0
real, public, parameter :: Tf_Sno = 273.16e+0
real, public, parameter :: ro_Wat = 1000.00e0
real, public, parameter :: C__Wat = 4186.00e0
real, public, parameter :: ro_Ice = 920.e0
real, public, parameter :: cdice = 2.10e0
real, public, parameter :: TfSnow = 273.15e+0
real, public, parameter :: csnow = 2105.00e+0
real, public, parameter :: r0sno = 3.00e+1
real, public, parameter :: blsno = 3.30e+2
real, public, parameter :: Lf_H2O = 3.337e+5
real, public, parameter :: A_MolV = 1.35e-5
real, public, parameter :: vonKrm = 0.40e0
real, public, parameter :: r_turb = 3.0
real, public, parameter :: A_turb = 5.8
real, public, parameter :: akmol = 1.35e-5