Better Products Company

   {  Exmpl8.3-2a_BetterProdCo.mpl  }

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

   {  Chapter 8.3,  Example 2a, Transportation, Size 8x15 , Page 339  }


TITLE
   BetterProdCo_Option1;

INDEX
   plant := 1..3;
   product := 1..5;

DATA
   M := 999;
   DistCost[plant, product] := (41, 27, 28, 24, 0,
                                40, 29,  M, 23, 0,
                                37, 30, 27, 21, 0);
   Supply[plant] := (75, 75, 45);
   Demand[product] := (20, 30, 30, 40, 75);

VARIABLE
   Assign[plant, product];

MODEL
   MIN TotalCost = SUM(plant, product: DistCost * Assign);

SUBJECT TO
   Source[plant] : SUM(product: Assign) = Supply;
   Destination[product] : SUM(plant: Assign) = Demand;

END