Computes initial surface albedo calculation - Initialization of ecosystem dynamics is needed for this
USES:
use shr_kind_mod, only : r8 => shr_kind_r8 use abortutils, only : endrun use clm_varctl, only : iulogPUBLIC TYPES:
implicit none logical, public :: do_initsurfalb savePUBLIC MEMBER FUNCTIONS:
public :: InitSurfAlbREVISION HISTORY:
2005-06-12: Created by Mariana Vertenstein 2008-02-29: Revised snow cover fraction from Niu and Yang, 2007