| 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 ) |
| local_name | standard_name | long_name | units | type | dimensions | kind | intent |
|---|---|---|---|---|---|---|---|
| me | mpi_rank | current MPI-rank | index | integer | () | in | |
| master | mpi_root | master MPI-rank | index | integer | () | in | |
| isot | control_for_soil_type_dataset | soil type dataset choice | index | integer | () | in | |
| ivegsrc | control_for_vegetation_dataset | land use dataset choice | index | integer | () | in | |
| nlunit | iounit_of_namelist | fortran unit number for file opens | none | integer | () | in | |
| lsm_cold_start | do_lsm_cold_start | flag to signify LSM is cold-started | flag | logical | () | in | |
| flag_init | flag_for_first_timestep | flag signaling first time step for time integration loop | flag | logical | () | in | |
| con_fvirt | ratio_of_vapor_to_dry_air_gas_constants_minus_one | rv/rd - 1 (rv = ideal gas constant for water vapor) | none | real | () | kind_phys | in |
| con_rd | gas_constant_of_dry_air | ideal gas constant for dry air | J kg-1 K-1 | real | () | kind_phys | in |
| im | horizontal_dimension | horizontal dimension | count | integer | () | in | |
| lsoil_ruc | vertical_dimension_of_soil_internal_to_land_surface_scheme | number of soil layers internal to land surface model | count | integer | () | in | |
| lsoil | vertical_dimension_of_soil | soil vertical layer dimension | count | integer | () | in | |
| kice | vertical_dimension_of_sea_ice | vertical loop extent for ice levels, start at 1 | count | integer | () | in | |
| nlev | vertical_layer_dimension | number of vertical levels | count | integer | () | in | |
| lsm_ruc | identifier_for_ruc_land_surface_scheme | flag for RUC land surface model | flag | integer | () | in | |
| lsm | control_for_land_surface_scheme | flag for land surface model | flag | integer | () | in | |
| slmsk | area_type | landmask: sea/land/ice=0/1/2 | flag | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| stype | soil_type_classification | soil type for lsm | index | integer | (ccpp_constant_one:horizontal_dimension) | in | |
| vtype | vegetation_type_classification | vegetation type for lsm | index | integer | (ccpp_constant_one:horizontal_dimension) | in | |
| landfrac | land_area_fraction | fraction of horizontal grid area occupied by land | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| q1 | specific_humidity_at_surface_adjacent_layer | water vapor specific humidity at lowest model layer | kg kg-1 | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| prsl1 | air_pressure_at_surface_adjacent_layer | mean pressure at lowest model layer | Pa | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| tsfc_lnd | surface_skin_temperature_over_land | surface skin temperature over land | K | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| tsfc_ice | surface_skin_temperature_over_ice | surface skin temperature over ice | K | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| tsfc_wat | sea_surface_temperature | surface skin temperature over water | K | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| tg3 | deep_soil_temperature | deep soil temperature | K | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| smc | volume_fraction_of_condensed_water_in_soil | total soil moisture | frac | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil) | kind_phys | in |
| slc | volume_fraction_of_unfrozen_water_in_soil | liquid soil moisture | frac | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil) | kind_phys | in |
| stc | soil_temperature | soil temperature | K | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil) | kind_phys | in |
| fice | sea_ice_area_fraction_of_sea_area_fraction | ice fraction over open water | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| min_seaice | min_sea_ice_area_fraction | minimum sea ice value | frac | real | () | kind_phys | in |
| sncovr_lnd | surface_snow_area_fraction_over_land | surface snow area fraction over land | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| sncovr_ice | surface_snow_area_fraction_over_ice | surface snow area fraction over ice | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| snoalb | upper_bound_of_max_albedo_assuming_deep_snow | maximum snow albedo | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| facsf | strong_cosz_area_fraction | fractional coverage with strong cosz dependency | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| facwf | weak_cosz_area_fraction | fractional coverage with weak cosz dependency | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| alvsf | vis_albedo_strong_cosz | mean vis albedo with strong cosz dependency | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| alvwf | vis_albedo_weak_cosz | mean vis albedo with weak cosz dependency | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| alnsf | nir_albedo_strong_cosz | mean nir albedo with strong cosz dependency | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| alnwf | nir_albedo_weak_cosz | mean nir albedo with weak cosz dependency | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | in |
| sfcqv_lnd | water_vapor_mixing_ratio_at_surface_over_land | water vapor mixing ratio at surface over land | kg kg-1 | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| sfcqv_ice | water_vapor_mixing_ratio_at_surface_over_ice | water vapor mixing ratio at surface over ice | kg kg-1 | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| sfalb_lnd_bck | surface_snow_free_albedo_over_land | surface snow-free albedo over ice | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| semisbase | baseline_surface_longwave_emissivity | baseline surface lw emissivity in fraction | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | out |
| semis_lnd | surface_longwave_emissivity_over_land | surface lw emissivity in fraction over land | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| semis_ice | surface_longwave_emissivity_over_ice | surface lw emissivity in fraction over ice | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albdvis_lnd | surface_albedo_direct_visible_over_land | direct surface albedo visible band over land | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albdnir_lnd | surface_albedo_direct_nir_over_land | direct surface albedo NIR band over land | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albivis_lnd | surface_albedo_diffuse_visible_over_land | diffuse surface albedo visible band over land | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albinir_lnd | surface_albedo_diffuse_nir_over_land | diffuse surface albedo NIR band over land | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albdvis_ice | surface_albedo_direct_visible_over_ice | direct surface albedo visible band over ice | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albdnir_ice | surface_albedo_direct_nir_over_ice | direct surface albedo NIR band over ice | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albivis_ice | surface_albedo_diffuse_visible_over_ice | diffuse surface albedo visible band over ice | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| albinir_ice | surface_albedo_diffuse_nir_over_ice | diffuse surface albedo NIR band over ice | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| zs | depth_of_soil_layers | depth of soil levels for land surface model | m | real | (ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme) | kind_phys | out |
| sh2o | volume_fraction_of_unfrozen_soil_moisture_for_land_surface_model | volume fraction of unfrozen soil moisture for lsm | frac | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme) | kind_phys | inout |
| smfrkeep | volume_fraction_of_frozen_soil_moisture_for_land_surface_model | volume fraction of frozen soil moisture for lsm | frac | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme) | kind_phys | inout |
| tslb | soil_temperature_for_land_surface_model | soil temperature for land surface model | K | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme) | kind_phys | inout |
| smois | volume_fraction_of_soil_moisture_for_land_surface_model | volumetric fraction of soil moisture for lsm | frac | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme) | kind_phys | inout |
| wetness | normalized_soil_wetness_for_land_surface_model | normalized soil wetness | frac | real | (ccpp_constant_one:horizontal_dimension) | kind_phys | inout |
| tsice | temperature_in_ice_layer | sea ice internal temperature | K | real | (ccpp_constant_one:horizontal_dimension, ccpp_constant_one:vertical_dimension_of_sea_ice) | kind_phys | inout |
| pores | maximum_soil_moisture_content_for_land_surface_model | maximum soil moisture for a given soil type for land surface model | m | real | (ccpp_constant_one:30) | kind_phys | out |
| resid | minimum_soil_moisture_content_for_land_surface_model | minimum soil moisture for a given soil type for land surface model | m | real | (ccpp_constant_one:30) | kind_phys | out |
| errmsg | ccpp_error_message | error message for error handling in CCPP | none | character | () | len=* | out |
| errflg | ccpp_error_code | error code for error handling in CCPP | 1 | integer | () | out |
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().