CCPP SciDoc for UFS-SRW v3.0.0  SRW v3.0.0
Common Community Physics Package Developed at DTC
module_radiation_astronomy Module Reference

This module sets up astronomy quantities for solar radiation calculations.

Functions/Subroutines

subroutine, public sol_init (me, isolar, solar_file, con_solr, con_solr_old, con_pi)
 This subroutine initializes astronomy process, and set up module constants. More...
 
subroutine, public sol_update (jdate, kyear, deltsw, deltim, lsol_chg, me, slag, sdec, cdec, solcon, con_pi, errmsg, errflg)
 This subroutine computes solar parameters at forecast time. More...
 
subroutine solar (jd, fjd, con_pi, r1, dlt, alp)
 This subroutine computes radius vector, declination and right ascension of sun, and equation of time. More...
 
subroutine, public coszmn (xlon, sinlat, coslat, solhr, IM, me, coszen, coszdg)
 This subroutine computes mean cos solar zenith angle over SW calling interval. More...
 
subroutine prtime (jd, fjd, dlt, alp, r1, solc)
 This subroutine prints out forecast date, time, and astronomy quantities. More...
 

Variables

character(40), parameter vtagast ='NCEP-Radiation_astronomy v5.2 Jan 2013 '
 
real(kind=kind_phys) degrad
 
real(kind=kind_phys) tpi
 
real(kind=kind_phys) hpi
 
real(kind=kind_phys) pid12
 
real(kind=kind_phys), parameter f12 = 12.0
 
real(kind=kind_phys), parameter f3600 = 3600.0
 
real(kind=kind_phys), parameter czlimt = 0.0001
 
real(kind=kind_phys), public solc0
 
integer isolflg = 10
 
character(26) solar_fname = ' '
 
real(kind=kind_phys) sollag =0.0
 
real(kind=kind_phys) sindec =0.0
 
real(kind=kind_phys) cosdec =0.0
 
real(kind=kind_phys) anginc =0.0
 
real(kind=kind_phys), dimension(12) smon_sav
 
integer iyr_sav =0
 
integer nstp =6