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

◆ myjsfc_wrapper_run()

subroutine myjsfc_wrapper::myjsfc_wrapper_run ( logical, intent(in) restart,
integer, intent(in) im,
integer, intent(in) levs,
integer, intent(in) kdt,
integer, intent(in) ntrac,
integer, intent(in) ntke,
integer, intent(in) ntcw,
integer, intent(in) ntiw,
integer, intent(in) ntrw,
integer, intent(in) ntsw,
integer, intent(in) ntgl,
integer, intent(in) iter,
logical, dimension(:), intent(in) flag_iter,
real(kind=kind_phys), dimension(:,:), intent(in) ugrs,
real(kind=kind_phys), dimension(:,:), intent(in) vgrs,
real(kind=kind_phys), dimension(:,:), intent(in) tgrs,
real(kind=kind_phys), dimension(:,:,:), intent(in) qgrs,
real(kind=kind_phys), dimension(:,:), intent(in) prsl,
real(kind=kind_phys), dimension(:,:), intent(in) prsi,
real(kind=kind_phys), dimension(:,:), intent(in) phii,
real(kind=kind_phys), dimension(:), intent(in) prsik_1,
real(kind=kind_phys), dimension(:), intent(in) prslk_1,
real(kind=kind_phys), dimension(:), intent(in) tsfc,
real(kind=kind_phys), dimension(:), intent(in) qsfc,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_qsfc,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_thz0,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_qz0,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_uz0,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_vz0,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_z0base,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_akhs,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_akms,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_chkqlm,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_elflx,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_a1u,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_a1t,
real(kind=kind_phys), dimension(:), intent(inout), optional phy_myj_a1q,
real(kind=kind_phys), dimension(:), intent(inout) pblh,
real(kind=kind_phys), dimension(:), intent(in) slmsk,
real(kind=kind_phys), dimension(:), intent(inout) zorl,
real(kind=kind_phys), dimension(:), intent(inout) ustar,
real(kind=kind_phys), dimension(:), intent(inout) rib,
real(kind=kind_phys), dimension(:), intent(inout) cm,
real(kind=kind_phys), dimension(:), intent(inout) ch,
real(kind=kind_phys), dimension(:), intent(inout) stress,
real(kind=kind_phys), dimension(:), intent(inout) ffm,
real(kind=kind_phys), dimension(:), intent(inout) ffh,
real(kind=kind_phys), dimension(:), intent(inout) fm10,
real(kind=kind_phys), dimension(:), intent(inout) fh2,
real(kind=kind_phys), dimension(:), intent(inout) landfrac,
real(kind=kind_phys), dimension(:), intent(inout) oceanfrac,
real(kind=kind_phys), dimension(:), intent(inout) fice,
real(kind=kind_phys), dimension(:), intent(inout) z0rl_wat,
real(kind=kind_phys), dimension(:), intent(inout) z0rl_lnd,
real(kind=kind_phys), dimension(:), intent(inout) z0rl_ice,
real(kind=kind_phys), dimension(:), intent(inout) ustar_wat,
real(kind=kind_phys), dimension(:), intent(inout) ustar_lnd,
real(kind=kind_phys), dimension(:), intent(inout) ustar_ice,
real(kind=kind_phys), dimension(:), intent(inout) cm_wat,
real(kind=kind_phys), dimension(:), intent(inout) cm_lnd,
real(kind=kind_phys), dimension(:), intent(inout) cm_ice,
real(kind=kind_phys), dimension(:), intent(inout) ch_wat,
real(kind=kind_phys), dimension(:), intent(inout) ch_lnd,
real(kind=kind_phys), dimension(:), intent(inout) ch_ice,
real(kind=kind_phys), dimension(:), intent(inout) rb_wat,
real(kind=kind_phys), dimension(:), intent(inout) rb_lnd,
real(kind=kind_phys), dimension(:), intent(inout) rb_ice,
real(kind=kind_phys), dimension(:), intent(inout) stress_wat,
real(kind=kind_phys), dimension(:), intent(inout) stress_lnd,
real(kind=kind_phys), dimension(:), intent(inout) stress_ice,
real(kind=kind_phys), dimension(:), intent(inout) fm_wat,
real(kind=kind_phys), dimension(:), intent(inout) fm_lnd,
real(kind=kind_phys), dimension(:), intent(inout) fm_ice,
real(kind=kind_phys), dimension(:), intent(inout) fh_wat,
real(kind=kind_phys), dimension(:), intent(inout) fh_lnd,
real(kind=kind_phys), dimension(:), intent(inout) fh_ice,
real(kind=kind_phys), dimension(:), intent(inout) fm10_wat,
real(kind=kind_phys), dimension(:), intent(inout) fm10_lnd,
real(kind=kind_phys), dimension(:), intent(inout) fm10_ice,
real(kind=kind_phys), dimension(:), intent(inout) fh2_wat,
real(kind=kind_phys), dimension(:), intent(inout) fh2_lnd,
real(kind=kind_phys), dimension(:), intent(inout) fh2_ice,
real(kind=kind_phys), dimension(:), intent(inout) wind,
real(kind=kind_phys), intent(in) con_cp,
real(kind=kind_phys), intent(in) con_g,
real(kind=kind_phys), intent(in) con_rd,
integer, intent(in) me,
logical, intent(in) lprnt,
character(len=*), intent(out) errmsg,
integer, intent(out) errflg )

Argument Table

myjsfc_wrapper_run argument table
local_namestandard_namelong_nameunitstypedimensionskindintent
restartflag_for_restartflag for restart (warmstart) or coldstartflaglogical()in
imhorizontal_loop_extenthorizontal loop extentcountinteger()in
levsvertical_layer_dimensionvertical layer dimensioncountinteger()in
kdtindex_of_timestepcurrent time step indexindexinteger()in
ntracnumber_of_tracersnumber of tracerscountinteger()in
ntkeindex_of_turbulent_kinetic_energy_in_tracer_concentration_arraytracer index for turbulent kinetic energyindexinteger()in
ntcwindex_of_cloud_liquid_water_mixing_ratio_in_tracer_concentration_arraycloud condensate index in tracer arrayindexinteger()in
ntiwindex_of_cloud_ice_mixing_ratio_in_tracer_concentration_arraytracer index for ice waterindexinteger()in
ntrwindex_of_rain_mixing_ratio_in_tracer_concentration_arraytracer index for rain waterindexinteger()in
ntswindex_of_snow_mixing_ratio_in_tracer_concentration_arraytracer index for snow waterindexinteger()in
ntglindex_of_graupel_mixing_ratio_in_tracer_concentration_arraytracer index for graupelindexinteger()in
iterccpp_loop_counterloop counter for subcycling loops in CCPPindexinteger()in
flag_iterflag_for_iterationflag for iterationflaglogical(ccpp_constant_one:horizontal_loop_extent)in
ugrsx_windx component of layer windm s-1real(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)kind_physin
vgrsy_windy component of layer windm s-1real(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)kind_physin
tgrsair_temperaturelayer mean air temperatureKreal(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)kind_physin
qgrstracer_concentrationmodel layer mean tracer concentrationkg kg-1real(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension, ccpp_constant_one:number_of_tracers)kind_physin
prslair_pressuremean layer pressurePareal(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_layer_dimension)kind_physin
prsiair_pressure_at_interfaceair pressure at model layer interfacesPareal(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)kind_physin
phiigeopotential_at_interfacegeopotential at model layer interfacesm2 s-2real(ccpp_constant_one:horizontal_loop_extent, ccpp_constant_one:vertical_interface_dimension)kind_physin
prsik_1surface_dimensionless_exner_functiondimensionless Exner function at lowest model interfacenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physin
prslk_1dimensionless_exner_function_at_surface_adjacent_layerdimensionless Exner function at lowest model layernonereal(ccpp_constant_one:horizontal_loop_extent)kind_physin
tsfcsurface_skin_temperaturesurface temperatureKreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
qsfcsurface_specific_humiditysurface air saturation specific humiditykg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physin
phy_myj_qsfcsurface_specific_humidity_for_myj_schemessurface air saturation specific humidity for MYJ schemkg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_thz0air_potential_temperature_at_top_of_viscous_sublayerpotential temperat at viscous sublayer top over waterKreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_qz0specific_humidity_at_top_of_viscous_sublayerspecific humidity at_viscous sublayer top over waterkg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_uz0x_wind_at_top_of_viscous_sublayeru wind component at viscous sublayer top over waterm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_vz0y_wind_at_top_of_viscous_sublayerv wind component at viscous sublayer top over waterm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_z0basebaseline_surface_roughness_lengthbaseline surface roughness length for momentum in metemreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_akhsheat_exchange_coefficient_for_myj_schemessurface heat exchange_coefficient for MYJ schemesm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_akmsmomentum_exchange_coefficient_for_myj_schemessurface momentum exchange_coefficient for MYJ schemesm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_chkqlmcontrol_for_surface_layer_evaporationsurface layer evaporation switchnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_elflxsurface_upward_specific_humidity_flux_for_mellor_yamada_janjic_surface_layer_schemekinematic surface latent heat fluxm s-1 kg kg-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_a1uweight_for_momentum_at_top_of_viscous_sublayerWeight for momentum at viscous layer topnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_a1tweight_for_potental_temperature_at_top_of_viscous_sublayerWeight for potental temperature at viscous layer topnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
phy_myj_a1qweight_for_specific_humidity_at_top_of_viscous_sublayerWeight for Specfic Humidity at viscous layer topnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
pblhatmosphere_boundary_layer_thicknessPBL thicknessmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
slmskarea_typelandmask: sea/land/ice=0/1/2flagreal(ccpp_constant_one:horizontal_loop_extent)kind_physin
zorlsurface_roughness_lengthsurface roughness lengthcmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ustarsurface_friction_velocityboundary layer parameterm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ribbulk_richardson_number_at_lowest_model_levelbulk Richardson number at the surfacenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
cmsurface_drag_coefficient_for_momentum_in_airsurface exchange coeff for momentumnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
chsurface_drag_coefficient_for_heat_and_moisture_in_airsurface exchange coeff heat & moisturenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
stresssurface_wind_stresssurface wind stressm2 s-2real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ffmmonin_obukhov_similarity_function_for_momentumMonin_Obukhov similarity function for momentumnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ffhmonin_obukhov_similarity_function_for_heatMonin_Obukhov similarity function for heatnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fm10monin_obukhov_similarity_function_for_momentum_at_10mMonin_Obukhov similarity parameter for momentum at 10mnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fh2monin_obukhov_similarity_function_for_heat_at_2mMonin_Obukhov similarity parameter for heat at 2mnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
landfracland_area_fractionfraction of horizontal grid area occupied by landfracreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
oceanfracsea_area_fractionfraction of horizontal grid area occupied by oceanfracreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ficesea_ice_area_fraction_of_sea_area_fractionice fraction over open waterfracreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
z0rl_watsurface_roughness_length_over_watersurface roughness length over water (interstitial)cmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
z0rl_lndsurface_roughness_length_over_landsurface roughness length over land (interstitial)cmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
z0rl_icesurface_roughness_length_over_icesurface roughness length over ice (interstitial)cmreal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ustar_watsurface_friction_velocity_over_watersurface friction velocity over waterm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ustar_lndsurface_friction_velocity_over_landsurface friction velocity over landm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ustar_icesurface_friction_velocity_over_icesurface friction velocity over icem s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
cm_watsurface_drag_coefficient_for_momentum_in_air_over_watersurface exchange coeff for momentum over waternonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
cm_lndsurface_drag_coefficient_for_momentum_in_air_over_landsurface exchange coeff for momentum over landnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
cm_icesurface_drag_coefficient_for_momentum_in_air_over_icesurface exchange coeff for momentum over icenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ch_watsurface_drag_coefficient_for_heat_and_moisture_in_air_over_watersurface exchange coeff heat surface exchange coeff heat & moisture over ocean moisture over waternonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ch_lndsurface_drag_coefficient_for_heat_and_moisture_in_air_over_landsurface exchange coeff heat & moisture over landnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
ch_icesurface_drag_coefficient_for_heat_and_moisture_in_air_over_icesurface exchange coeff heat & moisture over icenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
rb_watbulk_richardson_number_at_lowest_model_level_over_waterbulk Richardson number at the surface over waternonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
rb_lndbulk_richardson_number_at_lowest_model_level_over_landbulk Richardson number at the surface over landnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
rb_icebulk_richardson_number_at_lowest_model_level_over_icebulk Richardson number at the surface over icenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
stress_watsurface_wind_stress_over_watersurface wind stress over waterm2 s-2real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
stress_lndsurface_wind_stress_over_landsurface wind stress over landm2 s-2real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
stress_icesurface_wind_stress_over_icesurface wind stress over icem2 s-2real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fm_watmonin_obukhov_similarity_function_for_momentum_over_waterMonin-Obukhov similarity funct for momentum over waternonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fm_lndmonin_obukhov_similarity_function_for_momentum_over_landMonin-Obukhov similarity funct for momentum over landnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fm_icemonin_obukhov_similarity_function_for_momentum_over_iceMonin-Obukhov similarity funct for momentum over icenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fh_watmonin_obukhov_similarity_function_for_heat_over_waterMonin-Obukhov similarity function for heat over waternonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fh_lndmonin_obukhov_similarity_function_for_heat_over_landMonin-Obukhov similarity function for heat over landnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fh_icemonin_obukhov_similarity_function_for_heat_over_iceMonin-Obukhov similarity function for heat over icenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fm10_watmonin_obukhov_similarity_function_for_momentum_at_10m_over_waterMonin-Obukhov parameter for momentum at 10m over waternonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fm10_lndmonin_obukhov_similarity_function_for_momentum_at_10m_over_landMonin-Obukhov parameter for momentum at 10m over landnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fm10_icemonin_obukhov_similarity_function_for_momentum_at_10m_over_iceMonin-Obukhov parameter for momentum at 10m over icenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fh2_watmonin_obukhov_similarity_function_for_heat_at_2m_over_waterMonin-Obukhov parameter for heat at 2m over waternonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fh2_lndmonin_obukhov_similarity_function_for_heat_at_2m_over_landMonin-Obukhov parameter for heat at 2m over landnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
fh2_icemonin_obukhov_similarity_function_for_heat_at_2m_over_iceMonin-Obukhov parameter for heat at 2m over icenonereal(ccpp_constant_one:horizontal_loop_extent)kind_physinout
windwind_speed_at_lowest_model_layerwind speed at lowest model levelm s-1real(ccpp_constant_one:horizontal_loop_extent)kind_physinout
con_cpspecific_heat_of_dry_air_at_constant_pressurespecific heat of dry air at constant pressureJ kg-1 K-1real()kind_physin
con_ggravitational_accelerationgravitational accelerationm s-2real()kind_physin
con_rdgas_constant_of_dry_airideal gas constant for dry airJ kg-1 K-1real()kind_physin
mempi_rankcurrent MPI-rankindexinteger()in
lprntflag_printcontrol flag for diagnostic print outflaglogical()in
errmsgccpp_error_messageerror message for error handling in CCPPnonecharacter()len=*out
errflgccpp_error_codeerror code for error handling in CCPP1integer()out

Definition at line 36 of file myjsfc_wrapper.F90.