clm_map

INTERFACE:

   subroutine clm_map (vegxy, wtxy)

DESCRIPTION:

   Initialize sub-grid mapping and allocates space for derived type hierarchy.
   !USES
 #if (!defined COUP_CAM)
     use clmtype
 #endif
     use lnd_grid, only : surface_grid_init, get_clump_info
 #if (defined COUP_CAM)
     use lp_coupling, only : lp_coupling_init
 #endif 
     use pftvarcon, only : noveg
 #if (defined SPMD)
     use spmdMod, only : masterproc, spmd_init_arrays, gather_data_to_master, &
          proc_gridtot, proc_landtot, proc_coltot, proc_pfttot, npes
 #else
     use spmdMod, only : masterproc
 #endif

ARGUMENTS:

     implicit none
     integer , intent(in) :: vegxy(lsmlon,lsmlat,maxpatch) !PFT type 
     real(r8), intent(in) :: wtxy(lsmlon,lsmlat,maxpatch)  !subgrid patch weights

REVISION HISTORY:

   Created by Peter Thornton and Mariana Vertenstein