subroutine, public rrfs_smoke_wrapper::rrfs_smoke_wrapper_run | ( | integer, intent(in) | im, |
logical, intent(in) | flag_init, | ||
integer, intent(in) | kte, | ||
integer, intent(in) | kme, | ||
integer, intent(in) | ktau, | ||
real(kind_phys), intent(in) | dt, | ||
real(kind_phys), dimension(:), intent(in) | garea, | ||
integer, dimension(:), intent(in) | land, | ||
integer, dimension(8), intent(in) | jdate, | ||
real(kind_phys), dimension(:), intent(in) | u10m, | ||
real(kind_phys), dimension(:), intent(in) | v10m, | ||
real(kind_phys), dimension(:), intent(in) | ustar, | ||
real(kind_phys), dimension(:), intent(in) | rlat, | ||
real(kind_phys), dimension(:), intent(in) | rlon, | ||
real(kind_phys), dimension(:), intent(in) | tskin, | ||
real(kind_phys), dimension(:), intent(in) | pb2d, | ||
real(kind_phys), dimension(:), intent(in) | t2m, | ||
real(kind_phys), dimension(:), intent(in) | dpt2m, | ||
real(kind_phys), dimension(:,:), intent(in) | pr3d, | ||
real(kind_phys), dimension(:,:), intent(in) | ph3d, | ||
real(kind_phys), dimension(:,:), intent(in) | phl3d, | ||
real(kind_phys), dimension(:,:), intent(in) | prl3d, | ||
real(kind_phys), dimension(:,:), intent(in) | tk3d, | ||
real(kind_phys), dimension(:,:), intent(in) | us3d, | ||
real(kind_phys), dimension(:,:), intent(in) | vs3d, | ||
real(kind_phys), dimension(:,:), intent(in) | spechum, | ||
real(kind_phys), dimension(:,:), intent(in) | w, | ||
integer, intent(in) | nsoil, | ||
real(kind_phys), dimension(:,:), intent(in), optional | smc, | ||
real(kind_phys), dimension(:,:), intent(in), optional | tslb, | ||
integer, dimension(:), intent(in) | vegtype_dom, | ||
real(kind_phys), dimension(:,:), intent(in) | vegtype_frac, | ||
integer, dimension(:), intent(in) | soiltyp, | ||
integer, intent(in) | nlcat, | ||
real(kind_phys), dimension(:), intent(in) | dswsfc, | ||
real(kind_phys), dimension(:), intent(in) | zorl, | ||
real(kind_phys), dimension(:), intent(in) | snow, | ||
real(kind_phys), intent(in) | julian, | ||
real(kind_phys), dimension(:), intent(in) | recmol, | ||
integer, dimension(8), intent(in) | idat, | ||
real(kind_phys), dimension(:), intent(in) | rain_cpl, | ||
real(kind_phys), dimension(:), intent(in) | rainc_cpl, | ||
real(kind_phys), dimension(:), intent(in) | hf2d, | ||
real(kind_phys), intent(in) | g, | ||
real(kind_phys), intent(in) | pi, | ||
real(kind_phys), intent(in) | con_cp, | ||
real(kind_phys), intent(in) | con_rd, | ||
real(kind_phys), intent(in) | con_fv, | ||
real(kind_phys), dimension(:,:,:), intent(in), optional | dust12m_in, | ||
real(kind_phys), dimension(:,:), intent(in), optional | emi_ant_in, | ||
real(kind_phys), dimension(:,:,:), intent(in), optional | smoke_rrfs, | ||
real(kind_phys), dimension(:,:), intent(in), optional | smoke2d_rrfs, | ||
integer, intent(in) | ntrac, | ||
real(kind_phys), dimension(:,:,:), intent(inout) | qgrs, | ||
real(kind_phys), dimension(:,:,:), intent(inout) | gq0, | ||
real(kind_phys), dimension(:,:,:), intent(inout), optional | chem3d, | ||
integer, intent(in) | tile_num, | ||
integer, intent(in) | ntfsmoke, | ||
integer, intent(in) | ntsmoke, | ||
integer, intent(in) | ntdust, | ||
integer, intent(in) | ntcoarsepm, | ||
integer, intent(in) | imp_physics, | ||
integer, intent(in) | imp_physics_thompson, | ||
real(kind_phys), dimension(:,:), intent(inout), optional | nwfa, | ||
real(kind_phys), dimension(:,:), intent(inout), optional | nifa, | ||
real(kind_phys), dimension(:), intent(inout), optional | emanoc, | ||
real(kind_phys), dimension(:), intent(inout), optional | emdust, | ||
real(kind_phys), dimension(:), intent(inout), optional | emseas, | ||
real(kind_phys), dimension(:,:), intent(inout), optional | drydep_flux_out, | ||
real(kind_phys), dimension(:,:), intent(inout), optional | wetdpr, | ||
real(kind_phys), dimension(:), intent(inout), optional | ebb_smoke_in, | ||
real(kind_phys), dimension(:), intent(inout), optional | frp_output, | ||
real(kind_phys), dimension(:), intent(inout), optional | coef_bb, | ||
integer, dimension(:), intent(out), optional | fire_type_out, | ||
real(kind_phys), dimension(:,:), intent(inout), optional | ebu_smoke, | ||
real(kind_phys), dimension(:), intent(inout), optional | fhist, | ||
real(kind_phys), dimension(:), intent(inout), optional | min_fplume, | ||
real(kind_phys), dimension(:), intent(inout), optional | max_fplume, | ||
real(kind_phys), dimension(:), intent(inout), optional | hwp, | ||
real(kind_phys), dimension(:), intent(inout), optional | hwp_ave, | ||
real(kind_phys), dimension(:), intent(in), optional | wetness, | ||
integer, intent(in) | ndvel, | ||
real(kind_phys), dimension(:,:), intent(inout), optional | ddvel_inout, | ||
real(kind_phys), dimension(:), intent(in), optional | smoke_fire, | ||
logical, intent(in) | cpl_fire, | ||
real(kind_phys), dimension(:), intent(inout), optional | peak_hr_out, | ||
real(kind_phys), dimension(:), intent(out), optional | lu_nofire_out, | ||
real(kind_phys), dimension(:), intent(out), optional | lu_qfire_out, | ||
real(kind_phys), dimension(:), intent(out), optional | fire_heat_flux_out, | ||
real(kind_phys), dimension(:), intent(out), optional | frac_grid_burned_out, | ||
real(kind_phys), dimension(:), intent(in) | oro, | ||
real(kind_phys), dimension(:), intent(in) | totprcp, | ||
real(kind_phys), dimension(:), intent(inout), optional | uspdavg, | ||
real(kind_phys), dimension(:), intent(inout), optional | hpbl_thetav, | ||
real(kind_phys), dimension(:,:), intent(inout), optional | rho_dry, | ||
type(mpi_comm), intent(in) | mpicomm, | ||
integer, intent(in) | mpirank, | ||
integer, intent(in) | mpiroot, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg ) |
local_name | standard_name | long_name | units | type | dimensions | kind | intent |
---|---|---|---|---|---|---|---|
im | horizontal_loop_extent | horizontal loop extent | count | integer | () | in | |
flag_init | flag_for_first_timestep | flag signaling first time step for time integration loop | flag | logical | () | in | |
kte | vertical_layer_dimension | vertical layer dimension | count | integer | () | in | |
kme | vertical_interface_dimension | number of vertical levels plus one | count | integer | () | in | |
ktau | index_of_timestep | current forecast iteration | index | integer | () | in | |
dt | timestep_for_physics | physics time step | s | real | () | kind_phys | in |
garea | cell_area | grid cell area | m2 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
land | sea_land_ice_mask | landmask: sea/land/ice=0/1/2 | flag | integer | (ccpp_constant_one:horizontal_loop_extent) | in | |
jdate | date_and_time_of_forecast_in_united_states_order | current forecast date and time | none | integer | (ccpp_constant_one:8) | in | |
u10m | x_wind_at_10m | 10 meter u wind speed | m s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
v10m | y_wind_at_10m | 10 meter v wind speed | m s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
ustar | surface_friction_velocity | boundary layer parameter | m s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
rlat | latitude | latitude | radian | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
rlon | longitude | longitude | radian | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
tskin | surface_skin_temperature | surface skin temperature | K | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
pb2d | atmosphere_boundary_layer_thickness | PBL thickness | m | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
t2m | air_temperature_at_2m | 2 meter temperature | K | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
dpt2m | dewpoint_temperature_at_2m | 2 meter dewpoint temperature | K | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
pr3d | air_pressure_at_interface | air pressure at model layer interfaces | Pa | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension) | kind_phys | in |
ph3d | geopotential_at_interface | geopotential at model layer interfaces | m2 s-2 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension) | kind_phys | in |
phl3d | geopotential | geopotential at model layer centers | m2 s-2 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | in |
prl3d | air_pressure | mean layer pressure | Pa | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | in |
tk3d | air_temperature_of_new_state | updated temperature | K | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
us3d | x_wind_of_new_state | updated x-direction wind | m s-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
vs3d | y_wind_of_new_state | updated y-direction wind | m s-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
spechum | specific_humidity_of_new_state | water vapor specific humidity updated by physics | kg kg-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
w | lagrangian_tendency_of_air_pressure | layer mean vertical velocity | Pa s-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | in |
nsoil | vertical_dimension_of_soil_internal_to_land_surface_scheme | number of soil layers internal to land surface model | count | integer | () | in | |
smc | volume_fraction_of_soil_moisture_for_land_surface_model | volumetric fraction of soil moisture for lsm | frac | real | (ccpp_constant_one:horizontal_loop_extent, 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_loop_extent, ccpp_constant_one:vertical_dimension_of_soil_internal_to_land_surface_scheme) | kind_phys | in |
vegtype_dom | vegetation_type_classification | vegetation type at each grid cell | index | integer | (ccpp_constant_one:horizontal_loop_extent) | in | |
soiltyp | soil_type_classification | soil type at each grid cell | index | integer | (ccpp_constant_one:horizontal_loop_extent) | in | |
nlcat | number_of_vegetation_categories | number of vegetation categories | count | integer | () | in | |
vegtype_frac | fraction_of_vegetation_category | fraction of horizontal grid area occupied by given vegetation category | frac | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:number_of_vegetation_categories) | kind_phys | in |
dswsfc | surface_downwelling_shortwave_flux | surface downwelling shortwave flux at current time | W m-2 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
zorl | surface_roughness_length | surface roughness length in cm | cm | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
snow | lwe_surface_snow | water equivalent snow depth | mm | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
julian | forecast_julian_day | julian day | days | real | () | kind_phys | in |
recmol | reciprocal_of_obukhov_length | one over obukhov length | m-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
idat | date_and_time_at_model_initialization_in_iso_order | initialization date and time | none | integer | (ccpp_constant_one:8) | in | |
rain_cpl | lwe_thickness_of_precipitation_amount_on_dynamics_timestep | total rain at this time step | m | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
rainc_cpl | lwe_thickness_of_convective_precipitation_amount_on_dynamics_timestep | convective rain at this time step | m | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
hf2d | instantaneous_surface_upward_sensible_heat_flux | surface upward sensible heat flux valid for current call | W m-2 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
g | gravitational_acceleration | gravitational acceleration | m s-2 | real | () | kind_phys | in |
pi | pi | ratio of a circle's circumference to its diameter | none | real | () | kind_phys | in |
con_cp | specific_heat_of_dry_air_at_constant_pressure | specific heat !of dry air at constant pressure | J kg-1 K-1 | 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 |
con_fv | 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 |
dust12m_in | fengsha_dust12m_input | fengsha dust input | various | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:12, ccpp_constant_one:5) | kind_phys | in |
emi_ant_in | anthropogenic_background_input | anthropogenic background input | various | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:1) | kind_phys | in |
smoke_RRFS | emission_smoke_rrfs | emission fire RRFS | various | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:24, ccpp_constant_one:2) | kind_phys | in |
smoke2d_RRFS | emission_smoke_prvd_rrfs | emission fire RRFS daily | various | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:5) | kind_phys | in |
ntrac | number_of_tracers | number of tracers | count | integer | () | in | |
qgrs | tracer_concentration | model layer mean tracer concentration | kg kg-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension, ccpp_constant_one:number_of_tracers) | kind_phys | inout |
gq0 | tracer_concentration_of_new_state | tracer concentration updated by physics | kg kg-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension, ccpp_constant_one:number_of_tracers) | kind_phys | inout |
chem3d | chem3d_mynn_pbl_transport | mynn pbl transport of smoke and dust | various | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension, ccpp_constant_one:number_of_chemical_species_vertically_mixed) | kind_phys | inout |
tile_num | index_of_cubed_sphere_tile | tile number | none | integer | () | in | |
ntsmoke | index_for_smoke_in_tracer_concentration_array | tracer index for smoke | index | integer | () | in | |
ntfsmoke | index_for_fire_smoke_in_tracer_concentration_array | tracer index for fire smoke | index | integer | () | in | |
ntdust | index_for_dust_in_tracer_concentration_array | tracer index for dust | index | integer | () | in | |
ntcoarsepm | index_for_coarse_particulate_matter_in_tracer_concentration_array | tracer index for coarse particulate matter | index | integer | () | in | |
imp_physics | control_for_microphysics_scheme | choice of microphysics scheme | flag | integer | () | in | |
imp_physics_thompson | identifier_for_thompson_microphysics_scheme | choice of Thompson microphysics scheme | flag | integer | () | in | |
nwfa | mass_number_concentration_of_hygroscopic_aerosols_of_new_state | number concentration of water-friendly aerosols | kg-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
nifa | mass_number_concentration_of_nonhygroscopic_ice_nucleating_aerosols_of_new_state | number concentration of ice-friendly aerosols | kg-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
emanoc | emission_of_anothropogenic_for_mp_indir_fdb | emission of anothropogenic for mp indirect feedabck | ug m-2 s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
emdust | emission_of_dust_for_smoke | emission of dust for smoke | ug m-2 s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
emseas | emission_of_sea_salt_for_mp_indir_fdb | emission of sea salt for mp indirect feedabck | ug m-2 s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
ebb_smoke_in | surface_smoke_emission | emission of surface smoke | ug m-2 s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
frp_output | frp_hourly | hourly fire radiative power | MW | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
coef_bb | coef_bb_dc | coef to estimate the fire emission | none | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
fire_type_out | fire_type | type of fire | 1 | integer | (ccpp_constant_one:horizontal_loop_extent) | out | |
ebu_smoke | ebu_smoke | buffer of vertical fire emission | various | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
fhist | fire_hist | coefficient to scale the fire activity depending on the fire duration | none | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
min_fplume | minimum_fire_plume_sigma_pressure_level | minimum model level of fire plumerise | none | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
max_fplume | maximum_fire_plume_sigma_pressure_level | maximum model level of fire plumerise | none | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
mpicomm | mpi_communicator | MPI communicator | index | MPI_Comm | () | MPI_Comm | in |
mpirank | mpi_rank | current MPI-rank | index | integer | () | in | |
mpiroot | mpi_root | master MPI-rank | index | integer | () | in | |
rho_dry | dry_air_density | dry air density | kg m-3 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension) | kind_phys | inout |
uspdavg | mean_wind_speed_in_boundary_layer | average wind speed within the boundary layer | m s-1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
hpbl_thetav | atmosphere_boundary_layer_thickness_from_modified_parcel | pbl height based on modified parcel method | m | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
drydep_flux_out | dry_deposition_flux | rrfs dry deposition flux | ug m-2 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:number_of_chemical_species_deposited) | kind_phys | inout |
wetdpr | mp_wet_deposition_smoke_dust | large scale wet deposition of smoke and dust | kg kg-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:number_of_chemical_species_vertically_mixed) | kind_phys | inout |
hwp | hourly_wildfire_potential | rrfs hourly fire weather potential | none | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | out |
hwp_ave | hourly_wildfire_potential_average | rrfs hourly fire weather potential average | none | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | inout |
wetness | normalized_soil_wetness_for_land_surface_model | normalized soil wetness | frac | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
ndvel | number_of_chemical_species_deposited | number of chemical pbl deposited | count | integer | () | in | |
ddvel_inout | dry_deposition_velocity_mynn_pbl_transport | dry deposition velocity by mynn pbl transport | m s-1 | real | (ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:number_of_chemical_species_deposited) | kind_phys | inout |
peak_hr_out | peak_hr_fire | time_of_peak_fire_emissions | s | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | out |
lu_nofire_out | sum_of_land_use_fractions_for_no_fire_pixels | land use of no fire pixels for type | 1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | out |
lu_qfire_out | sum_of_land_use_fractions_for_cropland_fire_pixels | land use of fire pixels for type | 1 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | out |
fire_heat_flux_out | surface_fire_heat_flux | heat flux of fire at the surface | W m-2 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | out |
frac_grid_burned_out | fraction_of_grid_cell_burning | ration of the burnt area to the grid cell area | frac | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | out |
oro | height_above_mean_sea_level | height_above_mean_sea_level | m | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
smoke_fire | smoke_emission_of_fire | smoke emission of fire | kg m-2 | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
totprcp | accumulated_lwe_thickness_of_precipitation_amount | accumulated total precipitation | m | real | (ccpp_constant_one:horizontal_loop_extent) | kind_phys | in |
cpl_fire | do_fire_coupling | flag controlling fire_behavior collection (default off) | flag | logical | () | in | |
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 |
– Local Variables
– indexes, time
– anthropogentic variables
– parameter to caluclate wfa&ifa (m)
– aerosol density (kg/m3)
– other
– compute coarsepm setting if using simple dry dep option and
– compute dry deposition, based on Emerson et al., (2020)
– compute dry deposition based on simple parameterization (HRRR-Smoke)