TV Spots

   {  Exmpl11.4-2b_TVSpots.mpl  }

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

   {  Chapter 11.4,  Example 2b, Marketing, Size 7x12, Page 482  }


TITLE
   TVSpots;

INDEX
   product:= 1..3;
   spots := 0..3;

DATA
   Slope[product, spots] :=    (0,  1, 2, 0,
                0,  0, 2, 1,
                0, -1, 3, 2);

BINARY VARIABLE
   y[product, spots];

MODEL
   MAX TotProfit = SUM(product, spots: Slope * y);

SUBJECT TO
   Cnst [product, spots=2..3] : y[product, spots] - y[product, spots-1] <=0;
   Tot : SUM(product>0, spots>0: y) =5;

END