next up previous contents
Next: CNiniTimeVar Up: Fortran: Module Interface clm_varsur Previous: Fortran: Module Interface clm_varsur   Contents

CNiniSpecial


INTERFACE:

 subroutine CNiniSpecial ()
 
 #ifdef CN
DESCRIPTION:

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 CNSetValueMod
ARGUMENTS:
    implicit none
CALLED FROM:
   subroutine iniTimeConst in file iniTimeConst.F90
REVISION 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 arguments
LOCAL VARIABLES:




Erik Kluzek 2011-06-15