CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ lsm_ruc_init()

subroutine, public lsm_ruc::lsm_ruc_init ( integer, intent(in) me,
integer, intent(in) master,
integer, intent(in) isot,
integer, intent(in) ivegsrc,
integer, intent(in) nlunit,
logical, intent(in) lsm_cold_start,
logical, intent(in) flag_init,
real (kind_phys), intent(in) con_fvirt,
real (kind_phys), intent(in) con_rd,
integer, intent(in) im,
integer, intent(in) lsoil_ruc,
integer, intent(in) lsoil,
integer, intent(in) kice,
integer, intent(in) nlev,
integer, intent(in) lsm_ruc,
integer, intent(in) lsm,
real (kind_phys), dimension(:), intent(in) slmsk,
integer, dimension(:), intent(in) stype,
integer, dimension(:), intent(in) vtype,
real (kind_phys), dimension(:), intent(in) landfrac,
real (kind_phys), dimension(:), intent(in) q1,
real (kind_phys), dimension(:), intent(in) prsl1,
real (kind_phys), dimension(:), intent(in) tsfc_lnd,
real (kind_phys), dimension(:), intent(in) tsfc_ice,
real (kind_phys), dimension(:), intent(in) tsfc_wat,
real (kind_phys), dimension(:), intent(in) tg3,
real (kind_phys), dimension(:,:), intent(in) smc,
real (kind_phys), dimension(:,:), intent(in) slc,
real (kind_phys), dimension(:,:), intent(in) stc,
real (kind_phys), dimension(:), intent(in) fice,
real (kind_phys), intent(in) min_seaice,
real (kind_phys), dimension(:), intent(in) sncovr_lnd,
real (kind_phys), dimension(:), intent(in) sncovr_ice,
real (kind_phys), dimension(:), intent(in) snoalb,
real (kind_phys), dimension(:), intent(in) facsf,
real (kind_phys), dimension(:), intent(in) facwf,
real (kind_phys), dimension(:), intent(in) alvsf,
real (kind_phys), dimension(:), intent(in) alvwf,
real (kind_phys), dimension(:), intent(in) alnsf,
real (kind_phys), dimension(:), intent(in) alnwf,
real (kind_phys), dimension(:), intent(inout), optional sfcqv_lnd,
real (kind_phys), dimension(:), intent(inout), optional sfcqv_ice,
real (kind_phys), dimension(:), intent(inout), optional sfalb_lnd_bck,
real (kind_phys), dimension(:), intent(out) semisbase,
real (kind_phys), dimension(:), intent(inout) semis_lnd,
real (kind_phys), dimension(:), intent(inout) semis_ice,
real (kind_phys), dimension(:), intent(inout) albdvis_lnd,
real (kind_phys), dimension(:), intent(inout) albdnir_lnd,
real (kind_phys), dimension(:), intent(inout) albivis_lnd,
real (kind_phys), dimension(:), intent(inout) albinir_lnd,
real (kind_phys), dimension(:), intent(inout), optional albdvis_ice,
real (kind_phys), dimension(:), intent(inout), optional albdnir_ice,
real (kind_phys), dimension(:), intent(inout), optional albivis_ice,
real (kind_phys), dimension(:), intent(inout), optional albinir_ice,
real (kind_phys), dimension(:), intent(out) zs,
real (kind_phys), dimension(:,:), intent(inout), optional sh2o,
real (kind_phys), dimension(:,:), intent(inout), optional smfrkeep,
real (kind_phys), dimension(:,:), intent(inout), optional tslb,
real (kind_phys), dimension(:,:), intent(inout), optional smois,
real (kind_phys), dimension(:), intent(inout), optional wetness,
real (kind_phys), dimension(:,:), intent(inout) tsice,
real (kind_phys), dimension(:), intent(out) pores,
real (kind_phys), dimension(:), intent(out) resid,
character(len=*), intent(out) errmsg,
integer, intent(out) errflg )

Argument Table

lsm_ruc_init argument table
local_namestandard_namelong_nameunitstypedimensionskindintent
mempi_rankcurrent MPI-rankindexinteger()in
mastermpi_rootmaster MPI-rankindexinteger()in
isotcontrol_for_soil_type_datasetsoil type dataset choiceindexinteger()in
ivegsrccontrol_for_vegetation_datasetland use dataset choiceindexinteger()in
nlunitiounit_of_namelistfortran unit number for file opensnoneinteger()in
lsm_cold_startdo_lsm_cold_startflag to signify LSM is cold-startedflaglogical()in
flag_initflag_for_first_timestepflag signaling first time step for time integration loopflaglogical()in
con_fvirtratio_of_vapor_to_dry_air_gas_constants_minus_onerv/rd - 1 (rv = ideal gas constant for water vapor)nonereal()kind_physin
con_rdgas_constant_of_dry_airideal gas constant for dry airJ kg-1 K-1real()kind_physin
imhorizontal_dimensionhorizontal dimensioncountinteger()in
lsoil_rucvertical_dimension_of_soil_internal_to_land_surface_schemenumber of soil layers internal to land surface modelcountinteger()in
lsoilvertical_dimension_of_soilsoil vertical layer dimensioncountinteger()in
kicevertical_dimension_of_sea_icevertical loop extent for ice levels, start at 1countinteger()in
nlevvertical_layer_dimensionnumber of vertical levelscountinteger()in
lsm_rucidentifier_for_ruc_land_surface_schemeflag for RUC land surface modelflaginteger()in
lsmcontrol_for_land_surface_schemeflag for land surface modelflaginteger()in
slmskarea_typelandmask: sea/land/ice=0/1/2flagreal(ccpp_constant_one:horizontal_dimension)kind_physin
stypesoil_type_classificationsoil type for lsmindexinteger(ccpp_constant_one:horizontal_dimension)in
vtypevegetation_type_classificationvegetation type for lsmindexinteger(ccpp_constant_one:horizontal_dimension)in
landfracland_area_fractionfraction of horizontal grid area occupied by landfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
q1specific_humidity_at_surface_adjacent_layerwater vapor specific humidity at lowest model layerkg kg-1real(ccpp_constant_one:horizontal_dimension)kind_physin
prsl1air_pressure_at_surface_adjacent_layermean pressure at lowest model layerPareal(ccpp_constant_one:horizontal_dimension)kind_physin
tsfc_lndsurface_skin_temperature_over_landsurface skin temperature over landKreal(ccpp_constant_one:horizontal_dimension)kind_physin
tsfc_icesurface_skin_temperature_over_icesurface skin temperature over iceKreal(ccpp_constant_one:horizontal_dimension)kind_physin
tsfc_watsea_surface_temperaturesurface skin temperature over waterKreal(ccpp_constant_one:horizontal_dimension)kind_physin
tg3deep_soil_temperaturedeep soil temperatureKreal(ccpp_constant_one:horizontal_dimension)kind_physin
smcvolume_fraction_of_condensed_water_in_soiltotal soil moisturefracreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil)kind_physin
slcvolume_fraction_of_unfrozen_water_in_soilliquid soil moisturefracreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil)kind_physin
stcsoil_temperaturesoil temperatureKreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil)kind_physin
ficesea_ice_area_fraction_of_sea_area_fractionice fraction over open waterfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
min_seaicemin_sea_ice_area_fractionminimum sea ice valuefracreal()kind_physin
sncovr_lndsurface_snow_area_fraction_over_landsurface snow area fraction over landfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
sncovr_icesurface_snow_area_fraction_over_icesurface snow area fraction over icefracreal(ccpp_constant_one:horizontal_dimension)kind_physin
snoalbupper_bound_of_max_albedo_assuming_deep_snowmaximum snow albedofracreal(ccpp_constant_one:horizontal_dimension)kind_physin
facsfstrong_cosz_area_fractionfractional coverage with strong cosz dependencyfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
facwfweak_cosz_area_fractionfractional coverage with weak cosz dependencyfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
alvsfvis_albedo_strong_coszmean vis albedo with strong cosz dependencyfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
alvwfvis_albedo_weak_coszmean vis albedo with weak cosz dependencyfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
alnsfnir_albedo_strong_coszmean nir albedo with strong cosz dependencyfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
alnwfnir_albedo_weak_coszmean nir albedo with weak cosz dependencyfracreal(ccpp_constant_one:horizontal_dimension)kind_physin
sfcqv_lndwater_vapor_mixing_ratio_at_surface_over_landwater vapor mixing ratio at surface over landkg kg-1real(ccpp_constant_one:horizontal_dimension)kind_physinout
sfcqv_icewater_vapor_mixing_ratio_at_surface_over_icewater vapor mixing ratio at surface over icekg kg-1real(ccpp_constant_one:horizontal_dimension)kind_physinout
sfalb_lnd_bcksurface_snow_free_albedo_over_landsurface snow-free albedo over icefracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
semisbasebaseline_surface_longwave_emissivitybaseline surface lw emissivity in fractionfracreal(ccpp_constant_one:horizontal_dimension)kind_physout
semis_lndsurface_longwave_emissivity_over_landsurface lw emissivity in fraction over landfracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
semis_icesurface_longwave_emissivity_over_icesurface lw emissivity in fraction over icefracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albdvis_lndsurface_albedo_direct_visible_over_landdirect surface albedo visible band over landfracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albdnir_lndsurface_albedo_direct_nir_over_landdirect surface albedo NIR band over landfracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albivis_lndsurface_albedo_diffuse_visible_over_landdiffuse surface albedo visible band over landfracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albinir_lndsurface_albedo_diffuse_nir_over_landdiffuse surface albedo NIR band over landfracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albdvis_icesurface_albedo_direct_visible_over_icedirect surface albedo visible band over icefracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albdnir_icesurface_albedo_direct_nir_over_icedirect surface albedo NIR band over icefracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albivis_icesurface_albedo_diffuse_visible_over_icediffuse surface albedo visible band over icefracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
albinir_icesurface_albedo_diffuse_nir_over_icediffuse surface albedo NIR band over icefracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
zsdepth_of_soil_layersdepth of soil levels for land surface modelmreal(ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)kind_physout
sh2ovolume_fraction_of_unfrozen_soil_moisture_for_land_surface_modelvolume fraction of unfrozen soil moisture for lsmfracreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)kind_physinout
smfrkeepvolume_fraction_of_frozen_soil_moisture_for_land_surface_modelvolume fraction of frozen soil moisture for lsmfracreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)kind_physinout
tslbsoil_temperature_for_land_surface_modelsoil temperature for land surface modelKreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)kind_physinout
smoisvolume_fraction_of_soil_moisture_for_land_surface_modelvolumetric fraction of soil moisture for lsmfracreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme)kind_physinout
wetnessnormalized_soil_wetness_for_land_surface_modelnormalized soil wetnessfracreal(ccpp_constant_one:horizontal_dimension)kind_physinout
tsicetemperature_in_ice_layersea ice internal temperatureKreal(ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_sea_ice)kind_physinout
poresmaximum_soil_moisture_content_for_land_surface_modelmaximum soil moisture for a given soil type for land surface modelmreal(ccpp_constant_one:30)kind_physout
residminimum_soil_moisture_content_for_land_surface_modelminimum soil moisture for a given soil type for land surface modelmreal(ccpp_constant_one:30)kind_physout
errmsgccpp_error_messageerror message for error handling in CCPPnonecharacter()len=*out
errflgccpp_error_codeerror code for error handling in CCPP1integer()out
  • Call rucinit() to initialize soil/ice/water variables

Definition at line 36 of file lsm_ruc.F90.

References module_soil_pre::init_soil_depth_3(), module_sf_ruclsm::rslf(), rucinit(), and set_soilveg_ruc_mod::set_soilveg_ruc().

Here is the call graph for this function: