CCPP SciDoc for UFS-SRW v2.2.0  SRW v2.2.0
Common Community Physics Package Developed at DTC

◆ gfs_surface_generic_pre_run()

subroutine, public gfs_surface_generic_pre::gfs_surface_generic_pre_run ( integer, intent(in)  nthreads,
integer, intent(in)  im,
integer, intent(in)  levs,
real(kind=kind_phys), dimension(:), intent(in)  vfrac,
integer, dimension(:), intent(in)  islmsk,
integer, intent(in)  isot,
integer, intent(in)  ivegsrc,
integer, dimension(:), intent(inout)  stype,
integer, dimension(:), intent(inout)  scolor,
integer, dimension(:), intent(inout)  vtype,
integer, dimension(:), intent(inout)  slope,
real(kind=kind_phys), dimension(:), intent(in)  prsik_1,
real(kind=kind_phys), dimension(:), intent(in)  prslk_1,
real(kind=kind_phys), dimension(:), intent(inout)  tsfc,
real(kind=kind_phys), dimension(:,:), intent(in)  phil,
real(kind=kind_phys), intent(in)  con_g,
real(kind=kind_phys), dimension(:), intent(inout)  sigmaf,
real(kind=kind_phys), dimension(:), intent(inout)  work3,
real(kind=kind_phys), dimension(:), intent(inout)  zlvl,
real(kind=kind_phys), dimension(:), intent(out)  drain_cpl,
real(kind=kind_phys), dimension(:), intent(out)  dsnow_cpl,
real(kind=kind_phys), dimension(:), intent(in)  rain_cpl,
real(kind=kind_phys), dimension(:), intent(in)  snow_cpl,
integer, intent(in)  lndp_type,
integer, intent(in)  n_var_lndp,
real(kind=kind_phys), dimension(:,:), intent(in)  sfc_wts,
character(len=3), dimension(:), intent(in)  lndp_var_list,
real(kind=kind_phys), dimension(:), intent(in)  lndp_prt_list,
real(kind=kind_phys), dimension(:), intent(out)  z01d,
real(kind=kind_phys), dimension(:), intent(out)  zt1d,
real(kind=kind_phys), dimension(:), intent(out)  bexp1d,
real(kind=kind_phys), dimension(:), intent(out)  xlai1d,
real(kind=kind_phys), dimension(:), intent(out)  vegf1d,
real(kind=kind_phys), intent(out)  lndp_vgf,
logical, intent(in)  cplflx,
logical, dimension(:), intent(inout)  flag_cice,
integer, dimension(:), intent(out)  islmsk_cice,
real(kind=kind_phys), dimension(:), intent(in)  slimskin_cpl,
real(kind=kind_phys), dimension(:), intent(out)  wind,
real(kind=kind_phys), dimension(:), intent(in)  u1,
real(kind=kind_phys), dimension(:), intent(in)  v1,
real(kind=kind_phys), dimension(:), intent(inout)  cnvwind,
real(kind=kind_phys), dimension(:), intent(out)  smcwlt2,
real(kind=kind_phys), dimension(:), intent(out)  smcref2,
integer, dimension(:), intent(out)  vtype_save,
integer, dimension(:), intent(out)  stype_save,
integer, dimension(:), intent(out)  scolor_save,
integer, dimension(:), intent(out)  slope_save,
character(len=*), intent(out)  errmsg,
integer, intent(out)  errflg 
)

Argument Table

References surface_perturbation::cdfnor().

Here is the call graph for this function: