BuildNatVegFilter

INTERFACE:

   subroutine BuildNatVegFilter(lbp, ubp, num_natvegp, filter_natvegp)

DESCRIPTION:

Reconstruct a filter of naturally-vegetated PFTs for use in DGVM

USES:

     use clmtype

ARGUMENTS:

     implicit none
     integer, intent(in)  :: lbp, ubp                   ! pft bounds
     integer, intent(out) :: num_natvegp                ! number of pfts in naturally-vegetated filter
     integer, intent(out) :: filter_natvegp(ubp-lbp+1)  ! pft filter for naturally-vegetated points

CALLED FROM:

   subroutine lpj in this module

REVISION HISTORY:

   Author: Forrest Hoffman

LOCAL VARIABLES:

   local pointers to implicit in arguments
     logical , pointer :: present(:)     ! whether this pft present in patch