GFS Operational Physics Documentation  gsm/branches/DTC/phys-doc-all phys-doc-all R82971
radsw_main.f File Reference

This file contains NCEP's modifications of the rrtmg-sw radiation code from AER. More...

Functions/Subroutines

subroutine, public module_radsw_main::rswinit (me)
 This subroutine initializes non-varying module variables, conversion factors, and look-up tables. More...
 
subroutine module_radsw_main::mcica_subcol (cldf, nlay, ipseed, lcloudy )
 This subroutine computes the sub-colum cloud profile flag array. More...
 
subroutine module_radsw_main::setcoef (pavel, tavel, h2ovmr, nlay, nlp1, laytrop, jp, jt, jt1, fac00, fac01, fac10, fac11, selffac, selffrac, indself, forfac, forfrac, indfor )
 This subroutine computes various coefficients needed in radiative transfer calculation. More...
 
subroutine module_radsw_main::spcvrtm (ssolar, cosz, sntz, albbm, albdf, sfluxzen, cldfmc, cf1, cf0, taug, taur, tauae, ssaae, asyae, taucw, ssacw, asycw, nlay, nlp1, fxupc, fxdnc, fxup0, fxdn0, ftoauc, ftoau0, ftoadc, fsfcuc, fsfcu0, fsfcdc, fsfcd0, sfbmc, sfdfc, sfbm0, sfdf0, suvbfc, suvbf0 )
 This subroutine computes the shortwave radiative fluxes using two-stream method of h. barder and mcica,the monte-carlo independent column approximation, for the representation of sub-grid cloud variability (i.e. cloud overlap). More...
 
subroutine taumol17
 The subroutine computes the optical depth in band 17: 3250-4000 cm-1 (low - h2o,co2; high - h2o,co2)
 
subroutine taumol18
 The subroutine computes the optical depth in band 18: 4000-4650 cm-1 (low - h2o,ch4; high - ch4)
 
subroutine taumol19
 The subroutine computes the optical depth in band 19: 4650-5150 cm-1 (low - h2o,co2; high - co2)
 
subroutine taumol20
 The subroutine computes the optical depth in band 20: 5150-6150 cm-1 (low - h2o; high - h2o)
 
subroutine taumol21
 The subroutine computes the optical depth in band 21: 6150-7700 cm-1 (low - h2o,co2; high - h2o,co2)
 
subroutine taumol22
 The subroutine computes the optical depth in band 22: 7700-8050 cm-1 (low - h2o,o2; high - o2)
 
subroutine taumol23
 The subroutine computes the optical depth in band 23: 8050-12850 cm-1 (low - h2o; high - nothing)
 
subroutine taumol24
 The subroutine computes the optical depth in band 24: 12850-16000 cm-1 (low - h2o,o2; high - o2)
 
subroutine taumol25
 The subroutine computes the optical depth in band 25: 16000-22650 cm-1 (low - h2o; high - nothing)
 
subroutine taumol26
 The subroutine computes the optical depth in band 26: 22650-29000 cm-1 (low - nothing; high - nothing)
 
subroutine taumol27
 The subroutine computes the optical depth in band 27: 29000-38000 cm-1 (low - o3; high - o3)
 
subroutine taumol28
 The subroutine computes the optical depth in band 28: 38000-50000 cm-1 (low - o3,o2; high - o3,o2)
 
subroutine taumol29
 The subroutine computes the optical depth in band 29: 820-2600 cm-1 (low - h2o; high - co2)
 
subroutine module_radsw_main::cldprop (cfrac, cliqp, reliq, cicep, reice, cdat1, cdat2, cdat3, cdat4, cf1, nlay, ipseed, taucw, ssacw, asycw, cldfrc, cldfmc )
 This subroutine computes the cloud optical properties for each cloudy layer and g-point interval. More...
 
subroutine module_radsw_main::spcvrtc (ssolar, cosz, sntz, albbm, albdf, sfluxzen, cldfrc, cf1, cf0, taug, taur, tauae, ssaae, asyae, taucw, ssacw, asycw, nlay, nlp1, fxupc, fxdnc, fxup0, fxdn0, ftoauc, ftoau0, ftoadc, fsfcuc, fsfcu0, fsfcdc, fsfcd0, sfbmc, sfdfc, sfbm0, sfdf0, suvbfc, suvbf0 )
 This subroutine computes the shortwave radiative fluxes using two-stream method. More...
 
subroutine module_radsw_main::vrtqdr (zrefb, zrefd, ztrab, ztrad, zldbt, ztdbt, NLAY, NLP1, zfu, zfd )
 This subroutine is called by spcvrtc() and spcvrtm(), and computes the upward and downward radiation fluxes. More...
 
subroutine module_radsw_main::taumol (colamt, colmol, fac00, fac01, fac10, fac11, jp, jt, jt1, laytrop, forfac, forfrac, indfor, selffac, selffrac, indself, nlay, sfluxzen, taug, taur )
 This subroutine calculates optical depths for gaseous absorption and rayleigh scattering
subroutine called taumol## (## = 16-29) More...
 
subroutine taumol16
 The subroutine computes the optical depth in band 16: 2600-3250 cm-1 (low - h2o,ch4; high - ch4)
 

Variables

character(40), parameter module_radsw_main::vtagsw ='NCEP SW v5.1 Nov 2012 -RRTMG-SW v3.8 '
 
constant values
real(kind=kind_phys), parameter module_radsw_main::eps = 1.0e-6
 
real(kind=kind_phys), parameter module_radsw_main::oneminus = 1.0 - eps
 
real(kind=kind_phys), parameter module_radsw_main::bpade = 1.0/0.278
 pade approx constant
 
real(kind=kind_phys), parameter module_radsw_main::stpfac = 296.0/1013.0
 
real(kind=kind_phys), parameter module_radsw_main::ftiny = 1.0e-12
 
real(kind=kind_phys), parameter module_radsw_main::s0 = 1368.22
 internal solar constant
 
real(kind=kind_phys), parameter module_radsw_main::f_zero = 0.0
 
real(kind=kind_phys), parameter module_radsw_main::f_one = 1.0
 
atomic weights for conversion from mass to volume mixing ratios
real(kind=kind_phys), parameter module_radsw_main::amdw = con_amd/con_amw
 
real(kind=kind_phys), parameter module_radsw_main::amdo3 = con_amd/con_amo3
 
band indices
integer, dimension(nblow:nbhgh) module_radsw_main::nspa
 
integer, dimension(nblow:nbhgh) module_radsw_main::nspb
 
integer, dimension(nblow:nbhgh) module_radsw_main::idxsfc
 band index for sfc flux
 
integer, dimension(nblow:nbhgh) module_radsw_main::idxebc
 band index for cld prop
 
integer, parameter module_radsw_main::nuvb = 27
 uv-b band index
 

logical flags for optional output fields

logical module_radsw_main::lhswb = .false.
 
logical module_radsw_main::lhsw0 = .false.
 
logical module_radsw_main::lflxprf = .false.
 
logical module_radsw_main::lfdncmp = .false.
 
real(kind=kind_phys), dimension(0:ntbmx) module_radsw_main::exp_tbl
 those data will be set up only once by "rswinit"
 
real(kind=kind_phys) module_radsw_main::heatfac
 the factor for heating rates (in k/day, or k/sec set by subroutine 'rswinit')
 
integer, parameter module_radsw_main::ipsdsw0 = 1
 initial permutation seed used for sub-column cloud scheme
 
subroutine, public module_radsw_main::swrad (plyr, plvl, tlyr, tlvl, qlyr, olyr, gasvmr, clouds, icseed, aerosols, sfcalb, cosz, solcon, NDAY, idxday, npts, nlay, nlp1, lprnt, hswc, topflx, sfcflx, HSW0, HSWB, FLXPRF, FDNCMP )
 This subroutine is the main SW radiation routine. More...
 

Detailed Description

This file contains NCEP's modifications of the rrtmg-sw radiation code from AER.

Definition in file radsw_main.f.

Go to the source code of this file.