Dorian Auto Media

   {  Exmpl9.2-8_DorianAutoMedia.mpl  }

   {  Winston, Operations Research, Applications and Algorithms, 4th ed.  }

   {  Chapter 9.2,  Example 8, Piecewise Linear (MIP),  Size: 1x6,  Page 494  }


TITLE
    DorianAutoMedia;

INDEX
    mag := (Jocks,Family);
    adlevel := 1..3;

DATA
    Exposure[mag,adlevel]   := 1000 * (10, 3,2.5,
                                        8, 6,  2);
    AdsInLevel[mag,adlevel] := ( 6, 4, 5,
                                 4, 8, 3);
    Budget := 20000;
    AdCost := 1000;

INTEGER VARIABLES
    Advertise[mag,adlevel];

MODEL

    MAX TotalExposure = SUM(mag,adlevel: Advertise * Exposure);

SUBJECT TO

    BudgetLimit -> BUDL:

        SUM(mag,adlevel: Advertise * AdCost) <= Budget;

BOUNDS
    Advertise <= AdsInLevel;

END