INTERFACE:
subroutine BiogeophysRest( ncid, flag )DESCRIPTION:
Read/Write biogeophysics information to/from restart file.
USES:
use ncdio_pio
use clmtype
use decompMod , only : get_proc_bounds
use clm_varpar , only : nlevgrnd, nlevsno, nlevlak, nlevurb
use clm_varcon , only : istcrop
use clm_varcon , only : denice, denh2o, istdlak, istslak, isturb, &
istsoil, pondmx, watmin, spval
use clm_varctl , only : allocate_all_vegpfts, nsrest, fpftdyn, &
pertlim, iulog, nsrContinue, nsrStartup, &
nsrBranch
use initSurfAlbMod , only : do_initsurfalb
use clm_time_manager, only : is_first_step
use SNICARMod , only : snw_rds_min
use shr_infnan_mod , only : shr_infnan_isnan
use mkarbinitMod , only : perturbIC
use clm_time_manager, only : is_restart
ARGUMENTS:
implicit none
type(file_desc_t), intent(inout) :: ncid ! netcdf id
character(len=*), intent(in) :: flag ! 'read' or 'write'
CALLED FROM:
REVISION HISTORY:
Author: Mariana Vertenstein
12/11/2003, Peter Thornton: Added cps%coszen, pps%gdir, and pps%omega
for new sunlit/shaded canopy algorithm (in SUNSHA ifdef block)
4/25/2005, Peter Thornton: Removed the SUNSHA ifdefs, since this is now the
default code behavior.
6/12/2005, Moved to netcdf format and renamed file
LOCAL VARIABLES: