l2g_1d

INTERFACE:

   subroutine l2g_1d(lbl, ubl, lbg, ubg, larr, garr, l2g_scale_type)

DESCRIPTION:

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

ARGUMENTS:

     implicit none
     integer , intent(in)  :: lbl, ubl       ! beginning and ending sub landunit indices
     integer , intent(in)  :: lbg, ubg       ! beginning and ending gridcell indices
     real(r8), intent(in)  :: larr(lbl:ubl)  ! input landunit array
     real(r8), intent(out) :: garr(lbg:ubg)  ! output gridcell array
     character(len=*), intent(in) :: l2g_scale_type ! scale factor type for averaging

REVISION HISTORY:

   Created by Mariana Vertenstein 12/03

LOCAL VARIABLES: