subroutine, public rrtmg_sw::rrtmg_sw_run | ( | real (kind=kind_phys), dimension(npts,nlay), intent(in) | plyr, |
real (kind=kind_phys), dimension(npts,nlp1), intent(in) | plvl, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in) | tlyr, | ||
real (kind=kind_phys), dimension(npts,nlp1), intent(in) | tlvl, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in) | qlyr, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in) | olyr, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_co2, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_n2o, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_ch4, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_o2, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_co, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_cfc11, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_cfc12, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_cfc22, | ||
real(kind=kind_phys), dimension(npts,nlay), intent(in) | gasvmr_ccl4, | ||
integer, dimension(:), intent(in) | icseed, | ||
real(kind=kind_phys), dimension(npts,nlay,nbdsw), intent(in) | aeraod, | ||
real(kind=kind_phys), dimension(npts,nlay,nbdsw), intent(in) | aerssa, | ||
real(kind=kind_phys), dimension(npts,nlay,nbdsw), intent(in) | aerasy, | ||
real (kind=kind_phys), dimension(npts), intent(in) | sfcalb_nir_dir, | ||
real (kind=kind_phys), dimension(npts), intent(in) | sfcalb_nir_dif, | ||
real (kind=kind_phys), dimension(npts), intent(in) | sfcalb_uvis_dir, | ||
real (kind=kind_phys), dimension(npts), intent(in) | sfcalb_uvis_dif, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in) | dzlyr, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in) | delpin, | ||
real (kind=kind_phys), dimension(npts), intent(in) | de_lgth, | ||
real (kind=kind_phys), dimension(npts), intent(in) | cosz, | ||
real (kind=kind_phys), intent(in) | solcon, | ||
integer, intent(in) | NDAY, | ||
integer, dimension(:), intent(in) | idxday, | ||
integer, intent(in) | npts, | ||
integer, intent(in) | nlay, | ||
integer, intent(in) | nlp1, | ||
logical, intent(in) | lprnt, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in) | cld_cf, | ||
logical, intent(in) | lsswr, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(inout) | hswc, | ||
type (topfsw_type), dimension(npts), intent(inout) | topflx, | ||
type (sfcfsw_type), dimension(npts), intent(inout) | sfcflx, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(inout) | cldtau, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(inout), optional | HSW0, | ||
real (kind=kind_phys), dimension(npts,nlay,nbdsw), intent(inout), optional | HSWB, | ||
type (profsw_type), dimension(npts,nlp1), intent(inout), optional | FLXPRF, | ||
type (cmpfsw_type), dimension(npts), intent(inout), optional | FDNCMP, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_lwp, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_ref_liq, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_iwp, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_ref_ice, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_rwp, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_ref_rain, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_swp, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_ref_snow, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_od, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_ssa, | ||
real (kind=kind_phys), dimension(npts,nlay), intent(in), optional | cld_asy, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg | ||
) |
References amdo3, amdw, cldprop(), physcons::con_amd, physcons::con_amw, physcons::con_avgd, physcons::con_g, f_one, f_zero, ftiny, heatfac, physparam::iovrsw, ipsdsw0, physparam::isubcsw, physparam::iswcliq, physparam::iswrgas, physparam::ivflip, lfdncmp, lflxprf, lhsw0, lhswb, module_radsw_parameters::nbdsw, oneminus, s0, setcoef(), spcvrtc(), spcvrtm(), and taumol().