sol_update()

subroutine, public module_radiation_astronomy::sol_update	(	integer, dimension(:), intent(in)	jdate,
		integer, intent(in)	kyear,
		real (kind=kind_phys), intent(in)	deltsw,
		real (kind=kind_phys), intent(in)	deltim,
		logical, intent(in)	lsol_chg,
		integer, intent(in)	me,
		real (kind=kind_phys), intent(out)	slag,
		real (kind=kind_phys), intent(out)	sdec,
		real (kind=kind_phys), intent(out)	cdec,
		real (kind=kind_phys), intent(out)	solcon,
		real (kind=kind_phys), intent(in)	con_pi,
		character(len=*), intent(out)	errmsg,
		integer, intent(out)	errflg )

Parameters

jdate	ncep absolute date and time at fcst time (yr, mon, day, t-zone, hr, min, sec, mil-sec)
kyear	usually kyear=jdate(1). if not, it is for hindcast mode, and it is usually the init cond time and serves as the upper limit of data can be used.
deltsw	time duration in seconds per sw calculation
deltim	timestep in seconds
lsol_chg	logical flags for change solar constant
me	print message control flag
slag	equation of time in radians
sdec,cdec	sin and cos of the solar declination angle
solcon	sun-earth distance adjusted solar constant \((w/m^2)\)

sol_update General Algorithm

1. Call solar()

1. Call prtime()

Definition at line 328 of file radiation_astronomy.f.

References anginc, cosdec, f3600, isolflg, iyr_sav, nstp, pid12, prtime(), sindec, smon_sav, solar(), solar_fname, solc0, and sollag.

Here is the call graph for this function: