Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r_2), | public, | parameter | :: | zero | = | 0.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | half | = | 0.5_r_2 | |
real(kind=r_2), | public, | parameter | :: | one | = | 1.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | two | = | 2.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | four | = | 4.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | thousand | = | 1000._r_2 | |
real(kind=r_2), | public, | parameter | :: | e1 | = | 1.e-1_r_2 | |
real(kind=r_2), | public, | parameter | :: | e2 | = | 1.e-2_r_2 | |
real(kind=r_2), | public, | parameter | :: | e3 | = | 1.e-3_r_2 | |
real(kind=r_2), | public, | parameter | :: | e4 | = | 1.e-4_r_2 | |
real(kind=r_2), | public, | parameter | :: | e5 | = | 1.e-5_r_2 | |
real(kind=r_2), | public, | parameter | :: | e6 | = | 1.e-6_r_2 | |
real(kind=r_2), | public, | parameter | :: | e7 | = | 1.e-7_r_2 | |
real(kind=r_2), | public, | parameter | :: | pi | = | 3.1415927_r_2 | |
real(kind=r_2), | public, | parameter | :: | Tzero | = | 273.16_r_2 | |
real(kind=r_2), | public, | parameter | :: | gravity | = | 9.8086_r_2 | |
real(kind=r_2), | public, | parameter | :: | Mw | = | 0.018016_r_2 | |
real(kind=r_2), | public, | parameter | :: | rmair | = | 0.02897_r_2 | |
real(kind=r_2), | public, | parameter | :: | Mw18 | = | 0.018_r_2 | |
real(kind=r_2), | public, | parameter | :: | cpa | = | 1004.64_r_2 | |
real(kind=r_2), | public, | parameter | :: | esata | = | 6.106_r_2*100.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | esatb | = | 17.27_r_2 | |
real(kind=r_2), | public, | parameter | :: | esatc | = | 237.3_r_2 | |
real(kind=r_2), | public, | parameter | :: | rlambda | = | 2.442e6_r_2 | |
real(kind=r_2), | public, | parameter | :: | lambdaf | = | 335000._r_2 | |
real(kind=r_2), | public, | parameter | :: | lambdas | = | 2835000._r_2 | |
real(kind=r_2), | public, | parameter | :: | Dva | = | 2.17e-5_r_2 | |
real(kind=r_2), | public, | parameter | :: | rhow | = | 1000.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | rhoi | = | 920._r_2 | |
real(kind=r_2), | public, | parameter | :: | rhoa | = | 1.184_r_2 | |
real(kind=r_2), | public, | parameter | :: | rhocp | = | 1189.8_r_2 | |
real(kind=r_2), | public, | parameter | :: | esata_ice | = | 611.2_r_2 | |
real(kind=r_2), | public, | parameter | :: | esatb_ice | = | 22.46_r_2 | |
real(kind=r_2), | public, | parameter | :: | esatc_ice | = | 272.62_r_2 | |
real(kind=r_2), | public, | parameter | :: | csice | = | 2.100e3_r_2 | |
real(kind=r_2), | public, | parameter | :: | cswat | = | 4.182e3_r_2 | |
real(kind=r_2), | public, | parameter | :: | rgas | = | 8.3143_r_2 | |
real(kind=r_2), | public, | parameter | :: | kw | = | 0.58_r_2 | |
real(kind=r_2), | public, | parameter | :: | dSfac | = | 5.25_r_2 | |
real(kind=r_2), | public, | parameter | :: | dpmaxr | = | 0.5_r_2 | |
real(kind=r_2), | public, | parameter | :: | h0min | = | -5.e-3_r_2 | |
real(kind=r_2), | public, | parameter | :: | snmin | = | 0.005_r_2 | |
real(kind=r_2), | public, | parameter | :: | fsnowliq_max | = | 0.03_r_2 | |
integer(kind=i_d), | public, | parameter | :: | nsnow_max | = | 1 | |
real(kind=r_2), | public, | parameter | :: | dh0max | = | 0.0001_r_2 | |
real(kind=r_2), | public, | parameter | :: | SLmax | = | 1.01_r_2 | |
real(kind=r_2), | public, | parameter | :: | SLmin | = | 0.001_r_2 | |
real(kind=r_2), | public, | parameter | :: | Smax | = | 1.05_r_2 | |
real(kind=r_2), | public, | parameter | :: | h0max | = | 0.005_r_2 | |
real(kind=r_2), | public, | parameter | :: | qprecmax | = | 1.0e10_r_2 | |
real(kind=r_2), | public, | parameter | :: | dSmax | = | 0.1_r_2 | |
real(kind=r_2), | public, | parameter | :: | dSmaxr | = | 0.4_r_2 | |
real(kind=r_2), | public, | parameter | :: | dtmax | = | 86400._r_2 | |
real(kind=r_2), | public, | parameter | :: | dtmin | = | 0.01_r_2 | |
real(kind=r_2), | public, | parameter | :: | dsmmax | = | 1.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | dTsoilmax | = | 30.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | dTLmax | = | 30.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | tol_dthetaldT | = | 1.e-12_r_2 | |
integer(kind=i_d), | public, | parameter | :: | nsteps_ice_max | = | 20 | |
integer(kind=i_d), | public, | parameter | :: | nsteps_max | = | 200 | |
real(kind=r_2), | public, | parameter | :: | gf | = | 1.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | hmin | = | -1.0e6_r_2 | |
real(kind=r_2), | public, | parameter | :: | csol | = | 0.0_r_2 | |
real(kind=r_2), | public, | parameter | :: | rhmin | = | 0.05_r_2 | |
real(kind=r_2), | public, | parameter | :: | hbot | = | 0.0_r_2 | |
character(len=20), | public | :: | botbc | = | "free drainage" | ||
integer(kind=i_d), | public | :: | experiment | = | 0 | ||
real(kind=r_2), | public, | parameter | :: | freezefac | = | 1.0_r_2 | |
integer(kind=i_d), | public, | parameter | :: | topmodel | = | 0 | |
real(kind=r_2), | public, | parameter | :: | alpha | = | 0.1_r_2 | |
real(kind=r_2), | public, | parameter | :: | fsat_max | = | 2.0_r_2 | |
integer(kind=i_d), | public | :: | ithermalcond | = | 0 |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r_2), | public | :: | Ta | ||||
real(kind=r_2), | public | :: | rha | ||||
real(kind=r_2), | public | :: | rbw | ||||
real(kind=r_2), | public | :: | rbh | ||||
real(kind=r_2), | public | :: | rrc | ||||
real(kind=r_2), | public | :: | Rn | ||||
real(kind=r_2), | public | :: | Da | ||||
real(kind=r_2), | public | :: | cva | ||||
real(kind=r_2), | public | :: | civa | ||||
real(kind=r_2), | public | :: | phiva | ||||
real(kind=r_2), | public | :: | Rnsw |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=i_d), | public | :: | isat | ||||
real(kind=r_2), | public | :: | h | ||||
real(kind=r_2), | public | :: | phi | ||||
real(kind=r_2), | public | :: | phiS | ||||
real(kind=r_2), | public | :: | K | ||||
real(kind=r_2), | public | :: | KS | ||||
real(kind=r_2), | public | :: | Dv | ||||
real(kind=r_2), | public | :: | cvsat | ||||
real(kind=r_2), | public | :: | rh | ||||
real(kind=r_2), | public | :: | phiv | ||||
real(kind=r_2), | public | :: | phivS | ||||
real(kind=r_2), | public | :: | kH | ||||
real(kind=r_2), | public | :: | kE | ||||
real(kind=r_2), | public | :: | kth | ||||
real(kind=r_2), | public | :: | csoil | ||||
real(kind=r_2), | public | :: | eta_th | ||||
real(kind=r_2), | public | :: | hS | ||||
real(kind=r_2), | public | :: | rhS | ||||
real(kind=r_2), | public | :: | sl | ||||
real(kind=r_2), | public | :: | cv | ||||
real(kind=r_2), | public | :: | cvsatT | ||||
real(kind=r_2), | public | :: | cvS | ||||
real(kind=r_2), | public | :: | kv | ||||
integer(kind=i_d), | public | :: | iice | ||||
real(kind=r_2), | public | :: | thetai | ||||
real(kind=r_2), | public | :: | thetal | ||||
real(kind=r_2), | public | :: | phiT | ||||
real(kind=r_2), | public | :: | KT | ||||
real(kind=r_2), | public | :: | lambdav | ||||
real(kind=r_2), | public | :: | lambdaf | ||||
real(kind=r_2), | public | :: | Sliq | ||||
real(kind=r_2), | public | :: | he | ||||
real(kind=r_2), | public | :: | phie | ||||
real(kind=r_2), | public | :: | Ksat | ||||
real(kind=r_2), | public | :: | dthetaldT | ||||
real(kind=r_2), | public | :: | Tfrz | ||||
real(kind=r_2), | public | :: | csoileff | ||||
real(kind=r_2), | public | :: | zsat | ||||
real(kind=r_2), | public | :: | macropore_factor |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | depth | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | hsnow | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | hliq | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | dens | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | tsn | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | kH | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | kE | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | kth | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | Dv | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | cv | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | sl | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | melt | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | Jsensible | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | Jlatent | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | deltaJlatent | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | deltaJsensible | |||
real(kind=r_2), | public, | DIMENSION(nsnow_max) | :: | fsnowliq_max | |||
real(kind=r_2), | public | :: | wcol | ||||
real(kind=r_2), | public | :: | Qadv_snow | ||||
real(kind=r_2), | public | :: | Qadv_rain | ||||
real(kind=r_2), | public | :: | totdepth | ||||
real(kind=r_2), | public | :: | J | ||||
real(kind=r_2), | public | :: | Qadv_melt | ||||
real(kind=r_2), | public | :: | Qadv_vap | ||||
real(kind=r_2), | public | :: | Qcond_net | ||||
real(kind=r_2), | public | :: | Qadv_transfer | ||||
real(kind=r_2), | public | :: | Qmelt | ||||
real(kind=r_2), | public | :: | Qtransfer | ||||
real(kind=r_2), | public | :: | FluxDivergence | ||||
real(kind=r_2), | public | :: | deltaJ | ||||
real(kind=r_2), | public | :: | Qvap | ||||
real(kind=r_2), | public | :: | MoistureFluxDivergence | ||||
real(kind=r_2), | public | :: | Qprec | ||||
real(kind=r_2), | public | :: | Qevap | ||||
real(kind=r_2), | public | :: | deltawcol | ||||
integer(kind=i_d), | public | :: | nsnow | ||||
integer(kind=i_d), | public | :: | nsnow_last |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=i_d), | public | :: | isat | ||||
real(kind=r_2), | public | :: | zdelta | ||||
real(kind=r_2), | public | :: | zsoil | ||||
real(kind=r_2), | public | :: | zzero | ||||
real(kind=r_2), | public | :: | K | ||||
real(kind=r_2), | public | :: | Wa | ||||
real(kind=r_2), | public | :: | discharge | ||||
real(kind=r_2), | public | :: | f | ||||
real(kind=r_2), | public | :: | Rsmax | ||||
real(kind=r_2), | public | :: | Sy |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r_2), | public | :: | the | ||||
real(kind=r_2), | public | :: | thre | ||||
real(kind=r_2), | public | :: | he | ||||
real(kind=r_2), | public | :: | lam | ||||
real(kind=r_2), | public | :: | Ke | ||||
real(kind=r_2), | public | :: | eta | ||||
real(kind=r_2), | public | :: | thr | ||||
real(kind=r_2), | public | :: | KSe | ||||
real(kind=r_2), | public | :: | phie | ||||
real(kind=r_2), | public | :: | phiSe | ||||
real(kind=r_2), | public | :: | rho | ||||
real(kind=r_2), | public | :: | thw | ||||
real(kind=r_2), | public | :: | thfc | ||||
real(kind=r_2), | public | :: | kd | ||||
real(kind=r_2), | public | :: | css | ||||
real(kind=r_2), | public | :: | clay | ||||
real(kind=r_2), | public | :: | tortuosity | ||||
integer(kind=i_d), | public | :: | ishorizon | ||||
real(kind=r_2), | public | :: | zeta | ||||
real(kind=r_2), | public | :: | fsatmax | ||||
real(kind=r_2), | public | :: | lambc | ||||
real(kind=r_2), | public | :: | LambdaS |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r_2), | public, | DIMENSION(:), POINTER | :: | p |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=i_d), | public | :: | k | ||||
real(kind=r_2), | public | :: | T1 | ||||
real(kind=r_2), | public | :: | Ta | ||||
real(kind=r_2), | public | :: | cva | ||||
real(kind=r_2), | public | :: | Rnet | ||||
real(kind=r_2), | public | :: | hr1 | ||||
real(kind=r_2), | public | :: | hra | ||||
real(kind=r_2), | public | :: | Dv | ||||
real(kind=r_2), | public | :: | gv | ||||
real(kind=r_2), | public | :: | gh | ||||
real(kind=r_2), | public | :: | Dh | ||||
real(kind=r_2), | public | :: | dz | ||||
real(kind=r_2), | public | :: | phie | ||||
real(kind=r_2), | public | :: | he | ||||
real(kind=r_2), | public | :: | K1 | ||||
real(kind=r_2), | public | :: | eta | ||||
real(kind=r_2), | public | :: | lambda | ||||
real(kind=r_2), | public | :: | Ks | ||||
real(kind=r_2), | public | :: | lambdav |