例17用FordFulkerso
算法计算如图6网络中的最大流，每条弧上的两个数字分别表示容量和当前流量。
图6最大流问题解编写程序如下：clcclearu121u131u142u231u252u351u433u453f121f130f141f230f251f351f431f450
le
gthulistmaxf
1whilemaxf
0maxfzeros1
predzeros1
list1recordlistmaxf1i
flist是未检查邻接点的标号点，record是已标号点whileisemptylistmaxf
0flaglist1list1label1fi
duflagfflaglabel1setdifflabel1recordlistu
io
listlabel1predlabel1flagmaxflabel1mi
maxfflaguflaglabel1fflaglabel1recordu
io
recordlabel1label2fi
dfflaglabel2label2label2setdifflabel2recordlistu
io
listlabel2predlabel2flagmaxflabel2mi
maxfflagflabel2flagrecordu
io
recordlabel2e
difmaxf
0v2
v1predv2whilev21
fifv10fv1v2fv1v2maxf
elsev1absv1fv2v1fv2v1maxf
e
dv2v1v1predv2e
de
de
df
fr