p2c_1d

INTERFACE:

   subroutine p2c_1d (lbp, ubp, lbc, ubc, parr, carr, p2c_scale_type)

DESCRIPTION:

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

USES:

     use clm_varpar, only : max_pft_per_col

ARGUMENTS:

     implicit none
     integer , intent(in)  :: lbp, ubp              ! beginning and ending pft
     integer , intent(in)  :: lbc, ubc              ! beginning and ending column
     real(r8), intent(in)  :: parr(lbp:ubp)         ! pft array
     real(r8), intent(out) :: carr(lbc:ubc)         ! column array
     character(len=*), intent(in) :: p2c_scale_type ! scale type

REVISION HISTORY:

   Created by Mariana Vertenstein 12/03

LOCAL VARIABLES: