Radiation Scheme in CCPP
radiation_astronomy.f File Reference

Go to the source code of this file.

Modules

module  module_radiation_astronomy
 This module sets up astronomy quantities for solar radiation calculations.
 

Functions/Subroutines

subroutine, public module_radiation_astronomy::sol_update
 This subroutine computes solar parameters at forecast time. More...
 
subroutine module_radiation_astronomy::solar
 This subroutine computes radius vector, declination and right ascension of sun, and equation of time. More...
 
subroutine, public module_radiation_astronomy::coszmn
 This subroutine computes mean cos solar zenith angle over SW calling interval. More...
 
subroutine module_radiation_astronomy::prtime
 This subroutine prints out forecast date, time, and astronomy quantities. More...
 
subroutine, public module_radiation_astronomy::sol_init
 This subroutine initializes astronomy process, and set up module constants. More...
 

Variables

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