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

◆ rad_sw_pre_run()

subroutine rad_sw_pre::rad_sw_pre_run ( integer, intent(in) im,
logical, intent(in) lsswr,
real(kind_phys), dimension(:), intent(in) coszen,
integer, intent(out) nday,
integer, dimension(:), intent(out) idxday,
character(len=*), intent(out) errmsg,
integer, intent(out) errflg )

Argument Table

rad_sw_pre_run argument table
local_namestandard_namelong_nameunitstypedimensionskindintent
imhorizontal_loop_extenthorizontal loop extentcountinteger()in
lsswrflag_for_calling_shortwave_radiationlogical flags for sw radiation callsflaglogical()in
coszencosine_of_solar_zenith_angle_for_daytime_points_on_radiation_timestepmean cos of zenith angle over rad call periodnonereal(ccpp_constant_one:horizontal_loop_extent)kind_physin
ndaydaytime_points_dimensiondaytime points dimensioncountinteger()out
idxdaydaytime_pointsdaytime pointsindexinteger(ccpp_constant_one:horizontal_loop_extent)out
errmsgccpp_error_messageerror message for error handling in CCPPnonecharacter()len=*out
errflgccpp_error_codeerror code for error handling in CCPP1integer()out

General Algorithm

Definition at line 13 of file rad_sw_pre.F90.