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.
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.
subroutine	solar (jd, fjd, con_pi, r1, dlt, alp)
	This subroutine computes radius vector, declination and right ascension of sun, and equation of time.
subroutine, public	coszmn (xlon, sinlat, coslat, solhr, im, me, coszen, coszdg)
	This subroutine computes mean cos solar zenith angle over SW calling interval.
subroutine	prtime (jd, fjd, dlt, alp, r1, solc)
	This subroutine prints out forecast date, time, and astronomy quantities.

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