atm_glacier()

subroutine, private noahmp_glacier_routines::atm_glacier ( real (kind=kind_phys), intent(in) ep_2, real (kind=kind_phys), intent(in) epsm1, real (kind=kind_phys), intent(in) sfcprs, real (kind=kind_phys), intent(in) sfctmp, real (kind=kind_phys), intent(in) q2, real (kind=kind_phys), intent(in) soldn, real (kind=kind_phys), intent(in) cosz, real (kind=kind_phys), intent(out) thair, real (kind=kind_phys), intent(out) qair, real (kind=kind_phys), intent(out) eair, real (kind=kind_phys), intent(out) rhoair, real (kind=kind_phys), dimension( 1: 2), intent(out) solad, real (kind=kind_phys), dimension( 1: 2), intent(out) solai, real (kind=kind_phys), intent(out) swdown )

private

Parameters

[in]	sfcprs	pressure (pa)
[in]	sfctmp	surface air temperature [k]
[in]	q2	mixing ratio (kg/kg)
[in]	soldn	downward shortwave radiation (w/m2)
[in]	cosz	cosine solar zenith angle [0-1]
[out]	thair	potential temperature (k)
[out]	qair	specific humidity (kg/kg) (q2/(1+q2))
[out]	eair	vapor pressure air (pa)
[out]	solad	incoming direct solar radiation (w/m2)
[out]	solai	incoming diffuse solar radiation (w/m2)
[out]	rhoair	density air (kg/m3)
[out]	swdown	downward solar filtered by sun angle [w/m2]

Referenced by noahmp_glacier().

Here is the caller graph for this function: