Steel Production

    {  Exmpl1.4-4_ProdPlanning.mpl  }

    {  AMPL A Modeling Language for Mathematical Programming, 2nd Edition }

    {  Chapter 1.6,  Production Planning,  Size: 2x3,  Page 15 }


TITLE
    ProductionPlanning4;

INDEX
    product := (bands, coils, plate);
    stge   := (reheat, roll)

DATA
    ProdRate[product,stge]  := (200, 200,
                                 200, 140,
                                 200, 160);
    Profit[product]          := (25, 30, 29);
    ProdCapacity[product]    := (6000, 4000, 3500);
    Commit[product]          := (1000, 500, 750);
    AvailHours[stge]        := (35, 40);

VARIABLE
    Produce[product];

MODEL

    MAX TotalProfit = SUM(product: Produce * Profit);

SUBJECT TO

    Time[stge]: SUM(product: Produce / ProdRate) <= AvailHours;

BOUNDS
    ProdLimit: Produce <= ProdCapacity;
    MinProd:   Commit  <= Produce;

END