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: