radiation()

subroutine __module_sf_noahmplsm_f90__::radiation ( type (noahmp_parameters), intent(in) parameters, integer, intent(in) vegtyp, integer, intent(in) ist, integer, intent(in) ice, integer, intent(in) nsoil, real (kind=kind_phys), intent(in) sneqvo, real (kind=kind_phys), intent(in) sneqv, real (kind=kind_phys), intent(in) dt, real (kind=kind_phys), intent(in) cosz, real (kind=kind_phys), intent(in) snowh, real (kind=kind_phys), intent(in) tg, real (kind=kind_phys), intent(in) tv, real (kind=kind_phys), intent(in) fsno, real (kind=kind_phys), intent(in) qsnow, real (kind=kind_phys), intent(in) fwet, real (kind=kind_phys), intent(in) elai, real (kind=kind_phys), intent(in) esai, real (kind=kind_phys), dimension(1:nsoil), intent(in) smc, 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(in) fveg, integer, intent(in) iloc, integer, intent(in) jloc, real (kind=kind_phys), intent(inout) albold, real (kind=kind_phys), intent(inout) tauss, real (kind=kind_phys), intent(out) fsun, real (kind=kind_phys), intent(out) laisun, real (kind=kind_phys), intent(out) laisha, real (kind=kind_phys), intent(out) parsun, real (kind=kind_phys), intent(out) parsha, real (kind=kind_phys), intent(out) sav, 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), intent(out) fsrv, real (kind=kind_phys), intent(out) fsrg, real (kind=kind_phys), dimension(1:2) albd, real (kind=kind_phys), dimension(1:2) albi, real (kind=kind_phys), dimension(1:2), intent(out) albsnd, real (kind=kind_phys), dimension(1:2), intent(out) albsni, real (kind=kind_phys), intent(out) bgap, real (kind=kind_phys), intent(out) wgap )

private

Parameters

[in]	vegtyp	vegetation type
[in]	ist	surface type
[in]	ice	ice (ice = 1)
[in]	nsoil	number of soil layers
[in]	dt	time step [s]
[in]	qsnow	snowfall (mm/s)
[in]	sneqvo	snow mass at last time step(mm)
[in]	sneqv	snow mass (mm)
[in]	snowh	snow height (mm)
[in]	cosz	cosine solar zenith angle (0-1)
[in]	tg	ground temperature (k)
[in]	tv	vegetation temperature (k)
[in]	elai	lai, one-sided, adjusted for burying by snow
[in]	esai	sai, one-sided, adjusted for burying by snow
[in]	fwet	fraction of canopy that is wet
[in]	smc	volumetric soil water [m3/m3]
[in]	solad	incoming direct solar radiation (w/m2)
[in]	solai	incoming diffuse solar radiation (w/m2)
[in]	fsno	snow cover fraction (-)
[in]	fveg	green vegetation fraction [0.0-1.0]
[in,out]	albold	snow albedo at last time step (class type)
[in,out]	tauss	non-dimensional snow age.
[out]	fsun	sunlit fraction of canopy (-)
[out]	laisun	sunlit leaf area (-)
[out]	laisha	shaded leaf area (-)
[out]	parsun	average absorbed par for sunlit leaves (w/m2)
[out]	parsha	average absorbed par for shaded leaves (w/m2)
[out]	sav	solar radiation absorbed by vegetation (w/m2)
[out]	sag	solar radiation absorbed by ground (w/m2)
[out]	fsa	total absorbed solar radiation (w/m2)
[out]	fsr	total reflected solar radiation (w/m2)
[out]	fsrv	veg. reflected solar radiation (w/m2)
[out]	fsrg	ground reflected solar radiation (w/m2)
[out]	albsnd	snow albedo (direct)
[out]	albsni	snow albedo (diffuse)

Definition at line 2759 of file module_sf_noahmplsm.F90.

References albedo(), and surrad().

Referenced by energy().

Here is the call graph for this function:

Here is the caller graph for this function: