Northern Airplane

   {  Exmpl8.1-2_NorthAirplane.mpl  }

   {  Hillier and Lieberman, Introduction to Operations Research, 9th ed.  }

   {  Chapter 8.1,  Example 2, Transportation, Size 9x20, Page 313  }


TITLE
   NorthernAirplane;

INDEX
   produce := 1..4;
   install := 1..5;

DATA
   M := 999;
   DistCost[produce, install] := (1.080, 1.095, 1.110, 1.125, 0,
                                  M,     1.110, 1.125, 1.140, 0,
                                  M,     M,     1.100, 1.115, 0,
                                  M,     M,     M      1.130, 0);
   Supply[produce] := (25, 35, 30, 10);
   Demand[install] := (10, 15, 25, 20, 30);

VARIABLE
   Engines[produce, install] -> Eng;

MODEL
   MIN TotalCost = SUM(produce, install: DistCost * Engines);

SUBJECT TO
   Production[produce] : SUM(install: Engines) = Supply;
   Installations[install] : SUM(produce : Engines) = Demand;

END