radiation_glacier()

subroutine, private noahmp_glacier_routines::radiation_glacier ( real (kind=kind_phys), intent(in) dt, real (kind=kind_phys), intent(in) tg, real (kind=kind_phys), intent(in) sneqvo, real (kind=kind_phys), intent(in) sneqv, real (kind=kind_phys), intent(in) cosz, real (kind=kind_phys), intent(in) qsnow, real (kind=kind_phys), dimension(1:2), intent(in) solad, real (kind=kind_phys), dimension(1:2), intent(in) solai, real (kind=kind_phys), intent(inout) albold, real (kind=kind_phys), intent(inout) tauss, real (kind=kind_phys), intent(out) sag, real (kind=kind_phys), intent(out) fsr, real (kind=kind_phys), intent(out) fsa, real (kind=kind_phys), dimension(1:2) albsnd, real (kind=kind_phys), dimension(1:2) albsni )

private

Parameters

[in]	dt	time step [s]
[in]	tg	ground temperature (k)
[in]	sneqvo	snow mass at last time step(mm)
[in]	sneqv	snow mass (mm)
[in]	cosz	cosine solar zenith angle (0-1)
[in]	qsnow	snowfall (mm/s)
[in]	solad	incoming direct solar radiation (w/m2)
[in]	solai	incoming diffuse solar radiation (w/m2)
[in,out]	albold	snow albedo at last time step (class type)
[in,out]	tauss	non-dimensional snow age
	albsnd	snow albedo (direct)
	albsni	snow albedo (diffuse)
[out]	sag	solar radiation absorbed by ground (w/m2)
[out]	fsr	total reflected solar radiation (w/m2)
[out]	fsa	total absorbed solar radiation (w/m2)

Definition at line 795 of file module_sf_noahmp_glacier.F90.

References snow_age_glacier(), snowalb_bats_glacier(), and snowalb_class_glacier().

Referenced by energy_glacier().

Here is the call graph for this function:

Here is the caller graph for this function: