Index | Rundeck: P1SoM40 | Created: Fri May 10 03:30:18 EDT 2024 |
earth | Module: SOIL_DRV | File: GHY_DRV.f |
Author : I. Alienov/F. Abramopolous
Version:
Declaration:
subroutine earth (ns, moddsf, moddd)
- grav : used from constant
- rgas : used from constant
- lhe : used from constant
- lhs : used from constant
- sha : used from constant
- tf : used from constant
- rhow : used from constant
- deltx : used from constant
- gasc : used from constant
- stbo : used from constant
- im : used from resolution
- jm : used from resolution
- modeleclock : used from model_com
- dtsrc : used from model_com
- nday : used from model_com
- itime : used from model_com
- grid : used from domain_decomp_atm
- getdomainbounds : used from domain_decomp_atm
- am_i_root : used from domain_decomp_atm
- imaxj : used from geom
- lat2d : used from geom
- fsrdir : used from rad_com
- srvissurf : used from rad_com
- co2x : used from rad_com
- co2ppm : used from rad_com
- advnc : used from sle001
- evap_limits : used from sle001
- w : used from sle001
- snowd : used from sle001
- tp : used from sle001
- fice : used from sle001
- ashg : used from sle001
- alhg : used from sle001
- aevap : used from sle001
- abetad : used from sle001
- aruns : used from sle001
- arunu : used from sle001
- aeruns : used from sle001
- aerunu : used from sle001
- tbcs : used from sle001
- tsns : used from sle001
- af0dt : used from sle001
- af1dt : used from sle001
- ijdebug : used from sle001
- thets : used from sle001
- atmlnd : used from fluxes
- prec : used from fluxes
- eprec : used from fluxes
- precss : used from fluxes
- nisurf : used from fluxes
- snowbv : used from ghy_com
- fearth : used from ghy_com
- fr_snow_ij : used from ghy_com
- tearth : used from ghy_com
- tsns_ij : used from ghy_com
- wearth : used from ghy_com
- aiearth : used from ghy_com
- evap_max_ij : used from ghy_com
- fr_sat_ij : used from ghy_com
- qg_ij : used from ghy_com
- top_dev_ij : used from ghy_com
- soil_surf_moist : used from ghy_com
- pbl : used from pbl_drv
- t_pbl_args : used from pbl_drv
- xdelt : used from pbl_drv
- alloc_pbl_args : used from pbl_drv
- dealloc_pbl_args : used from pbl_drv
- snow_cover_same_as_rad : used from snow_drvm
- i_earth : used from snow_model
- j_earth : used from snow_model
- entcells : used from ent_com
- update_vegetation_data : used from ent_drv
- ngm : used from ghy_com
- imt : used from ghy_com
- nlsn : used from ghy_com
- ls_nfrac : used from ghy_com
- dz_ij : used from ghy_com
- sl_ij : used from ghy_com
- q_ij : used from ghy_com
- qk_ij : used from ghy_com
- top_index_ij : used from ghy_com
- top_dev_ij : used from ghy_com
- w_ij : used from ghy_com
- ht_ij : used from ghy_com
- snowbv : used from ghy_com
- nsn_ij : used from ghy_com
- dzsn_ij : used from ghy_com
- wsn_ij : used from ghy_com
- hsn_ij : used from ghy_com
- fr_snow_ij : used from ghy_com
- shc_soil_texture : used from ghy_com
- qf_ij : used from ghy_com
- ns :
integer, intent(in)
- moddsf :
integer, intent(in)
- moddd :
integer, intent(in)
- i :
integer
- j :
integer
- itype :
integer
- ibv :
integer
- shdt :
real*8
- evhdt :
real*8
- rcdmws :
real*8
- rcdhws :
real*8
- cdq :
real*8
- cdm :
real*8
- cdh :
real*8
- elhx :
real*8
- tg :
real*8
- srheat :
real*8
- tg1 :
real*8
- ptype :
real*8
- trheat :
real*8
- rhosrf :
real*8
- ma1 :
real*8
- tfs :
real*8
- th1 :
real*8
- thv1 :
real*8
- psk :
real*8
- ps :
real*8
- spring :
real*8
- q1 :
real*8
- dlwdt :
real*8
- irrig :
real*8
- htirrig :
real*8
- rhosrf0 :
real*8
- estimated surface air density
- fb :
real*8
- fv :
real*8
- trdn :
real*8, dimension(:, :), pointer
- srdn :
real*8, dimension(:, :), pointer
- qsat :
real*8
- qg :
real*8
- rel. humidity at the ground, defined: total_evap = Cq V (qg-qs)
- qg_nsat :
real*8
- rel. humidity at non-saturated fraction of soil
- jr :
integer
- pbl_args :
type(t_pbl_args)
- qg_sat :
real*8
- ts :
real*8
- qs :
real*8
- ii :
integer
- ivar :
integer
- kr :
integer
- ca :
real*8
- vis_rad :
real*8
- direct_vis_rad :
real*8
- cos_zen_angle :
real*8
- end_of_day_flag :
logical
- - hack to pass "end of day" flag to Ent
- j_0 :
integer
- j_1 :
integer
- j_0h :
integer
- j_1h :
integer
- i_0 :
integer
- i_1 :
integer
- counter :
integer, save
- Initial Value
= 0
- dayofyear :
integer