CCPP Scidoc for SRW v2.1.0  SRW v2.1.0
Common Community Physics Package Developed at DTC

◆ gfs_surface_composites_pre_run()

subroutine, public gfs_surface_composites_pre::gfs_surface_composites_pre_run ( integer, intent(in)  im,
integer, intent(in)  lkm,
logical, intent(in)  frac_grid,
logical, dimension(:), intent(inout)  flag_cice,
logical, intent(in)  cplflx,
logical, intent(in)  cplice,
logical, intent(in)  cplwav2atm,
integer, intent(in)  lsm,
integer, intent(in)  lsm_ruc,
real(kind=kind_phys), dimension(:), intent(in)  landfrac,
real(kind=kind_phys), dimension(:), intent(in)  lakefrac,
real(kind=kind_phys), dimension(:), intent(in)  lakedepth,
real(kind=kind_phys), dimension(:), intent(in)  oceanfrac,
real(kind=kind_phys), dimension(:), intent(out)  frland,
logical, dimension(:), intent(inout)  dry,
logical, dimension(:), intent(inout)  icy,
logical, dimension(:), intent(inout)  lake,
logical, dimension(:), intent(inout)  use_flake,
logical, dimension(:), intent(inout)  wet,
real(kind=kind_phys), dimension(:), intent(inout)  hice,
real(kind=kind_phys), dimension(:), intent(inout)  cice,
real(kind=kind_phys), dimension(:), intent(inout)  zorlo,
real(kind=kind_phys), dimension(:), intent(inout)  zorll,
real(kind=kind_phys), dimension(:), intent(inout)  zorli,
real(kind=kind_phys), dimension(:), intent(in)  snowd,
real(kind=kind_phys), dimension(:), intent(inout)  snowd_lnd,
real(kind=kind_phys), dimension(:), intent(inout)  snowd_ice,
real(kind=kind_phys), dimension(:), intent(in)  tprcp,
real(kind=kind_phys), dimension(:), intent(inout)  tprcp_wat,
real(kind=kind_phys), dimension(:), intent(inout)  tprcp_lnd,
real(kind=kind_phys), dimension(:), intent(inout)  tprcp_ice,
real(kind=kind_phys), dimension(:), intent(in)  uustar,
real(kind=kind_phys), dimension(:), intent(inout)  uustar_wat,
real(kind=kind_phys), dimension(:), intent(inout)  uustar_lnd,
real(kind=kind_phys), dimension(:), intent(inout)  uustar_ice,
real(kind=kind_phys), dimension(:), intent(in)  weasd,
real(kind=kind_phys), dimension(:), intent(inout)  weasd_lnd,
real(kind=kind_phys), dimension(:), intent(inout)  weasd_ice,
real(kind=kind_phys), dimension(:), intent(inout)  ep1d_ice,
real(kind=kind_phys), dimension(:), intent(inout)  tsfc,
real(kind=kind_phys), dimension(:), intent(inout)  tsfco,
real(kind=kind_phys), dimension(:), intent(inout)  tsfcl,
real(kind=kind_phys), dimension(:), intent(inout)  tsfc_wat,
real(kind=kind_phys), dimension(:), intent(inout)  tisfc,
real(kind=kind_phys), dimension(:), intent(inout)  tsurf_wat,
real(kind=kind_phys), dimension(:), intent(inout)  tsurf_lnd,
real(kind=kind_phys), dimension(:), intent(inout)  tsurf_ice,
real(kind=kind_phys), dimension(:), intent(inout)  gflx_ice,
real(kind=kind_phys), intent(in)  tgice,
integer, dimension(:), intent(inout)  islmsk,
integer, dimension(:), intent(inout)  islmsk_cice,
real(kind=kind_phys), dimension(:), intent(inout)  slmsk,
real(kind=kind_phys), dimension(:), intent(in)  qss,
real(kind=kind_phys), dimension(:), intent(inout)  qss_wat,
real(kind=kind_phys), dimension(:), intent(inout)  qss_lnd,
real(kind=kind_phys), dimension(:), intent(inout)  qss_ice,
real(kind=kind_phys), intent(in)  min_lakeice,
real(kind=kind_phys), intent(in)  min_seaice,
integer, intent(in)  kdt,
real(kind=kind_phys), intent(in)  huge,
character(len=*), intent(out)  errmsg,
integer, intent(out)  errflg 
)

Argument Table

GFS_surface_composites_pre_run argument table
local_namestandard_namelong_nameunitstypedimensionskindintent
imhorizontal_loop_extenthorizontal loop extentcountinteger()in
lkmcontrol_for_lake_surface_schemeflag for lake surface modelflaginteger()in
frac_gridflag_for_fractional_landmaskflag for fractional gridflaglogical()in
flag_ciceflag_for_ciceflag for ciceflaglogical(ccpp_constant_one:horizontal_loop_extent)inout
cplflxflag_for_surface_flux_couplingflag controlling cplflx collection (default off)flaglogical()in
cpliceflag_for_sea_ice_couplingflag controlling cplice collection (default on)flaglogical()in
cplwav2atmflag_for_one_way_ocean_wave_coupling_to_atmosphereflag controlling ocean wave coupling to the atmosphere (default off)flaglogical()in
lsmcontrol_for_land_surface_schemeflag for land surface modelflaginteger()in
lsm_rucidentifier_for_ruc_land_surface_schemeflag for RUC land surface modelflaginteger()in
landfracland_area_fractionfraction of horizontal grid area occupied by landfracreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
lakefraclake_area_fractionfraction of horizontal grid area occupied by lakefracreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
lakedepthlake_depthlake depthmreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
oceanfracsea_area_fractionfraction of horizontal grid area occupied by oceanfracreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
frlandland_area_fraction_for_microphysicsland area fraction used in microphysics schemesfracreal(ccpp_constant_one:horizontal_loop_extent)kind_physout
dryflag_nonzero_land_surface_fractionflag indicating presence of some land surface area fractionflaglogical(ccpp_constant_one:horizontal_loop_extent)inout
icyflag_nonzero_sea_ice_surface_fractionflag indicating presence of some sea ice surface area fractionflaglogical(ccpp_constant_one:horizontal_loop_extent)inout
lakeflag_nonzero_lake_surface_fractionflag indicating presence of some lake surface area fractionflaglogical(ccpp_constant_one:horizontal_loop_extent)inout
use_flakeflag_for_using_flakeflag indicating lake points using flake modelflaglogical(ccpp_constant_one:horizontal_loop_extent)inout
wetflag_nonzero_wet_surface_fractionflag indicating presence of some ocean or lake surface area fractionflaglogical(ccpp_constant_one:horizontal_loop_extent)inout
hicesea_ice_thicknesssea ice thicknessmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
cicesea_ice_area_fraction_of_sea_area_fractionice fraction over open waterfracreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
zorlosurface_roughness_length_over_watersurface roughness length over watercmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
zorllsurface_roughness_length_over_landsurface roughness length over landcmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
zorlisurface_roughness_length_over_icesurface roughness length over icecmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
snowdlwe_surface_snowwater equivalent snow depthmmreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
snowd_lndsurface_snow_thickness_water_equivalent_over_landwater equivalent snow depth over landmmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
snowd_icesurface_snow_thickness_water_equivalent_over_icewater equivalent snow depth over icemmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tprcpnonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timesteptotal precipitation amount in each time stepmreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
tprcp_watnonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep_over_watertotal precipitation amount in each time step over watermreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tprcp_lndnonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep_over_landtotal precipitation amount in each time step over landmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tprcp_icenonnegative_lwe_thickness_of_precipitation_amount_on_dynamics_timestep_over_icetotal precipitation amount in each time step over icemreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
uustarsurface_friction_velocityboundary layer parameterm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physin
uustar_watsurface_friction_velocity_over_watersurface friction velocity over waterm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
uustar_lndsurface_friction_velocity_over_landsurface friction velocity over landm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
uustar_icesurface_friction_velocity_over_icesurface friction velocity over icem s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
weasdlwe_thickness_of_surface_snow_amountwater equiv of acc snow depth over land and sea icemmreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
weasd_lndwater_equivalent_accumulated_snow_depth_over_landwater equiv of acc snow depth over landmmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
weasd_icewater_equivalent_accumulated_snow_depth_over_icewater equiv of acc snow depth over icemmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ep1d_icesurface_upward_potential_latent_heat_flux_over_icesurface upward potential latent heat flux over iceW m-2real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tsfcsurface_skin_temperaturesurface skin temperatureKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tsfcosea_surface_temperaturesea surface temperatureKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tsfclsurface_skin_temperature_over_landsurface skin temperature over landKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tsfc_watsurface_skin_temperature_over_watersurface skin temperature over waterKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tisfcsurface_skin_temperature_over_icesurface skin temperature over iceKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tsurf_watsurface_skin_temperature_after_iteration_over_watersurface skin temperature after iteration over waterKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tsurf_lndsurface_skin_temperature_after_iteration_over_landsurface skin temperature after iteration over landKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tsurf_icesurface_skin_temperature_after_iteration_over_icesurface skin temperature after iteration over iceKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
gflx_iceupward_heat_flux_in_soil_over_icesoil heat flux over iceW m-2real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
tgicefreezing_point_temperature_of_seawaterfreezing point temperature of seawaterKreal()kind_physin
islmsksea_land_ice_masksea/land/ice mask (=0/1/2)flaginteger(ccpp_constant_one:horizontal_loop_extent)inout
islmsk_cicesea_land_ice_mask_cicesea/land/ice mask cice (=0/1/2)flaginteger(ccpp_constant_one:horizontal_loop_extent)inout
slmskarea_typelandmask: sea/land/ice=0/1/2flagreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
qsssurface_specific_humiditysurface air saturation specific humiditykg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physin
qss_watsurface_specific_humidity_over_watersurface air saturation specific humidity over waterkg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
qss_lndsurface_specific_humidity_over_landsurface air saturation specific humidity over landkg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
qss_icesurface_specific_humidity_over_icesurface air saturation specific humidity over icekg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
min_lakeicemin_lake_ice_area_fractionminimum lake ice valuefracreal()kind_physin
min_seaicemin_sea_ice_area_fractionminimum sea ice valuefracreal()kind_physin
kdtindex_of_timestepcurrent forecast iterationindexinteger()in
hugenetcdf_float_fillvaluedefinition of NetCDF float FillValuenonereal()kind_physin
errmsgccpp_error_messageerror message for error handling in CCPPnonecharacter()len=*out
errflgccpp_error_codeerror code for error handling in CCPP1integer()out