p2l_1d

INTERFACE:

   subroutine p2l_1d (lbp, ubp, lbc, ubc, lbl, ubl, parr, larr, &
        p2c_scale_type, c2l_scale_type)

DESCRIPTION:

Perfrom subgrid-average from pfts to landunits Averaging is only done for points that are not equal to "spval".

USES:

     use clm_varpar, only : max_pft_per_lu

ARGUMENTS:

     implicit none
     integer , intent(in)  :: lbp, ubp              ! beginning and ending pft indices
     integer , intent(in)  :: lbc, ubc              ! beginning and ending column indices
     integer , intent(in)  :: lbl, ubl              ! beginning and ending landunit indices
     real(r8), intent(in)  :: parr(lbp:ubp)         ! input column array
     real(r8), intent(out) :: larr(lbl:ubl)         ! output landunit array
     character(len=*), intent(in) :: p2c_scale_type ! scale factor type for averaging
     character(len=*), intent(in) :: c2l_scale_type ! scale factor type for averaging

REVISION HISTORY:

   Created by Mariana Vertenstein 12/03

LOCAL VARIABLES: