landuse_land2mpx Subroutine

subroutine landuse_land2mpx(luc, lucmp, mpx, cstart, cend, nap)

Maps luc%var_y(mland,mvmax) to lucmp%var(mp)

Arguments

Type IntentOptional Attributes Name
type(landuse_mland) :: luc
type(landuse_mp) :: lucmp
integer :: mpx
integer, dimension(mland) :: cstart
integer, dimension(mland) :: cend
integer, dimension(mland) :: nap