landuse_land2mpx Subroutine

subroutine landuse_land2mpx(luc, lucmp, mpx)

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