c2l_2d

INTERFACE:

   subroutine c2l_2d (lbc, ubc, lbl, ubl, num2d, carr, larr, c2l_scale_type)

DESCRIPTION:

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

ARGUMENTS:

     implicit none
     integer , intent(in)  :: lbc, ubc            ! beginning and ending column indices
     integer , intent(in)  :: lbl, ubl            ! beginning and ending landunit indices
     integer , intent(in)  :: num2d               ! size of second dimension
     real(r8), intent(in)  :: carr(lbc:ubc,num2d) ! input column array
     real(r8), intent(out) :: larr(lbl:ubl,num2d) ! output landunit array
     character(len=*), intent(in) :: c2l_scale_type ! scale factor type for averaging

REVISION HISTORY:

   Created by Mariana Vertenstein 12/03

LOCAL VARIABLES: