Transportation

    {  Exmpl3.2-1_Transport.mpl  }

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

    {  Chapter 3.2,  Transportation,  Size: 10x21,  Page 45 }


TITLE
    Transport;

INDEX
    origin := (gary,clev,pitt);
    dest   := (fra,det,lan,win,stl,fre,laf)

DATA
    Supply[origin]    := (1400,2600,2900);
    Demand[dest]      := ( 900,1200, 600, 400,1700,1100,1000)
    Cost[origin,dest] := (39,14,11,14,16,82, 8,
                          27, 9,12, 9,26,95,17,
                          24,14,17,13,28,99,20);

VARIABLE
    Trans[origin,dest];

MODEL

    MIN TotalCost = SUM(origin,dest: Cost * Trans);

SUBJECT TO

    Supplying[origin] -> SUP:
         SUM(dest: Trans) = Supply;

    Meetdemand[dest] -> DEM:
         SUM(origin: Trans) = Demand;

END