resetTimeConstDGVM

INTERFACE:

   subroutine resetTimeConstDGVM(lbp, ubp)

DESCRIPTION:

Initialize/reset time invariant DGVM variables

USES:

     use clmtype
     use pftvarcon , only : roota_par, rootb_par, noveg
     use clm_varcon, only : spval

ARGUMENTS:

     implicit none
     integer, intent(in) :: lbp, ubp       ! pft bounds

CALLED FROM:

   lpjreset1() in this module
   initialize() in initializeMod.F90
   iniTimeVar() in iniTimeVar.F90

REVISION HISTORY:

   Author: Gordon Bonan

LOCAL VARIABLES:

   local pointers to implicit in arguments
    real(r8), pointer :: zi(:,:)        ! interface level below a "z" level (m
    integer , pointer :: ivt(:)         ! pft vegetation
    integer , pointer :: pcolumn(:)     ! column of corresponding pft
    real(r8), pointer :: rootfr(:,:)    ! fraction of roots in each soil layer