AMPL_运输模型

今天来分享基于AMPL的运输模型是如何建模的。
题目是这样的：
有三个供应商，给四个客户提供产品，其中经过好几条线路，每条线路的成本都不一样，下面是相应数据：
渔场 吨
A1 80
A2 60
A3 60

客户 需求
D1 30
D2 30
D3 60
D4 50

线路 路线成本
A1-B 100
A2-B 130
A3-B 120
B-D1 500
B-C1 100
B-C2 140
C1-D1 100
C1-D2 120
C1-D3 120
C1-D4 150
C2-D1 120
C2-D2 120
C2-D3 160
C2-D4 130

这其实也是一个网络图的问题，学过运筹学的都应该能够根据给出的路线画出网络图。
下面是我根据上面给出数据画的网络图：

从图就可以很清楚的看出整个运作的流程了，那接下来我们就用AMPL来建模吧。

模型部分：

set city;
set link within(city cross city);

param supply{city};#A1 A2 A3
param demand{city};#D1 D2 D3 D4
#param time{link};
param cost{link};

var capacity{link}>=0;
minimize total_cost:
sum{(i,j)