wam_climo_data.f90 File Reference

Process vertical profile climatologic data for WAM. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	gettemp (iday, xlat, pr, np, pf, temp, n_o, n_o2, n_n2)
	Routine that computes temperature and neutral density values utilizing MSIS 2.1. More...
subroutine	ghp8 (day, utsec, z0, glat, glon, f107a, f107, ap, pres, alt, dn, tn)
	Wrapper routine for calls to MSIS 2.1 for computing temperature and neutral density at a given pressure level. More...

Detailed Description

Process vertical profile climatologic data for WAM.

This software incorporates the MSIS empirical atmospheric model software designed and provided by NRL. Use is governed by the Open Source Academic research License Agreement contained in the file msis2.1/nrlmsis2.1_license.txt

Author

Adam Kubaryk NCEP/SWPC

Definition in file wam_climo_data.f90.

Function/Subroutine Documentation

subroutine gettemp	(	integer, intent(in)	iday,
		real(kind=esmf_kind_r8), intent(in)	xlat,
		real(kind=esmf_kind_r8), dimension(np), intent(in)	pr,
		integer, intent(in)	np,
		character(*), intent(in)	pf,
		real(kind=esmf_kind_r8), dimension(np), intent(out)	temp,
		real(kind=esmf_kind_r8), dimension(np), intent(out)	n_o,
		real(kind=esmf_kind_r8), dimension(np), intent(out)	n_o2,
		real(kind=esmf_kind_r8), dimension(np), intent(out)	n_n2
	)

Routine that computes temperature and neutral density values utilizing MSIS 2.1.

Parameters

[in]	iday	Calendar day.
[in]	xlat	Latitude (degrees).
[in]	pr	Pressure in hPa.
[in]	pf	Path to parmfile for msisinit.
[in]	np	Number of pressure layers.
[out]	temp	Temperature (K).
[out]	n_o	Number density of o.
[out]	n_o2	Number density of o2.
[out]	n_n2	Number density of n2

Author

Adam Kubaryk NCEP/SWPC

Definition at line 23 of file wam_climo_data.f90.

References ghp8().

Referenced by atmosphere::vintg_wam().

subroutine ghp8	(	real(kind=rp), intent(in)	day,
		real(kind=rp), intent(in)	utsec,
		real(kind=rp), intent(in)	z0,
		real(kind=rp), intent(in)	glat,
		real(kind=rp), intent(in)	glon,
		real(kind=rp), intent(in)	f107a,
		real(kind=rp), intent(in)	f107,
		real(kind=rp), dimension(7), intent(in)	ap,
		real(kind=rp), intent(in)	pres,
		real(kind=rp), intent(out)	alt,
		real(kind=rp), dimension(10), intent(out)	dn,
		real(kind=rp), intent(out)	tn
	)

Wrapper routine for calls to MSIS 2.1 for computing temperature and neutral density at a given pressure level.

Parameters

[in]	day	Calendar day.
[in]	utsec	Seconds into UTC day.
[in]	z0	Initial guess for altitude in km.
[in]	glat	Latitude in degrees east.
[in]	glon	Longitude in degrees north.
[in]	f107a	41-day average of F10.7 Solar Flux.
[in]	f107	Current day F10.7 Solar Flux.
[in]	ap	Array of Ap inputs to MSIS 2.1, documented within MSIS 2.1.
[in]	pres	Pressure level at which to solve for temp/den values.
[out]	alt	Altitude at which the outputs are valid.
[out]	dn	Array of neutral density values, documented within MSIS 2.1.
[out]	tn	Temperature in K.

Author

Adam Kubaryk NCEP/SWPC

Definition at line 85 of file wam_climo_data.f90.

Referenced by gettemp().