Calculate solar fluxes absorbed by vegetation and ground surface
use shr_kind_mod, only: r8 => shr_kind_r8 use clm_varctl , only: iulogPUBLIC TYPES:
implicit none savePUBLIC MEMBER FUNCTIONS:
public :: SurfaceRadiation ! Solar fluxes absorbed by veg and ground surfaceREVISION HISTORY:
Created by Mariana Vertenstein 11/26/03, Peter Thornton: Added new routine for improved treatment of sunlit/shaded canopy radiation. 4/26/05, Peter Thornton: Adopted the sun/shade algorithm as the default, removed the old SurfaceRadiation(), and renamed SurfaceRadiationSunShade() as SurfaceRadiation().