INTERFACE:
subroutine CNiniSpecial () #ifdef CNDESCRIPTION:
One-time initialization of CN variables for special landunits
USES:
use shr_kind_mod, only: r8 => shr_kind_r8 use pftvarcon , only: noveg use decompMod , only: get_proc_bounds use clm_varcon , only: spval use clm_varctl , only: iulog use clmtype use CNSetValueModARGUMENTS:
implicit noneCALLED FROM:
subroutine iniTimeConst in file iniTimeConst.F90REVISION HISTORY:
11/13/03: Created by Peter Thornton local pointers to implicit in arguments integer , pointer :: clandunit(:) ! landunit index of corresponding column integer , pointer :: plandunit(:) ! landunit index of corresponding pft logical , pointer :: ifspecial(:) ! BOOL: true=>landunit is wetland,ice,lake, or urban local pointers to implicit out argumentsLOCAL VARIABLES: