Cane Sugar Production

    {  Exmpl6.4-1_Canesugar.mpl  }

    {  Applications of Optimization with Xpress-MP  }

    {  Chapter 6.4,  Cane Sugar Production,  Size: 3x5,  Page 100 }


TITLE
    CaneSugar;

DATA
    NW := 11;
    NL := 3;

INDEX
    wagon := 1..NW;
    slot := 1..CEIL(count(wagon)/NL);

DATA
    Loss[wagon]     := (43,26,37,28,13,54,62,49,19,28,30);
    Lifespan[wagon] := ( 8. 8, 2, 8, 4, 8, 8, 8, 8, 8, 8); !Correct data as in book but in thier datafile 9th element is 6
    Dur := 2;  !dur value not given in book
    Ordslot[slot] := (1,2,3,4);

VARIABLE
    Process[slot,wagon];

MODEL

    MIN TotalLoss = SUM(wagon,slot: Loss * Ordslot * Dur * Process);

SUBJECT TO

    Assignment[wagon]: SUM(slot: Process) = 1;

    WagonLoads[slot]: SUM(wagon: Process) <= NL;

    ProdLifeLimit[wagon]: SUM(slot: Ordslot * Process) <= Lifespan / Dur;

BINARY
    Process;

END