AMPL -- Eine kurze Einführung - M1

Transportproblem mit mehreren Produkten
# prodtransport.txt
set M; # Menge von Bedarfsorten
set N; # Menge von Produktionsorten
set P; # Menge von Produkten
param a {N,P} >= 0; # Angebotsmengen
param b {M,P} >= 0; # Bedarfsmengen
param c {N,M} >= 0; # Kosten
param s {N,M} >= 0; # Schranken
var x {N,M,P} >= 0;
minimize kosten: sum{i in N,j in M,p in P} x[i,j,p]*c[i,j];
subject to bedarf {j in M,p in P}: sum{i in N} x[i,j,p]=b[j,p];
subject to angebot {i in N,p in P}: sum{j in M} x[i,j,p]=a[i,p];
subject to kap {i in N,j in M}: sum{p in P} x[i,j,p]