Repeat
队列置空；
所有点设为未标号；
将源点加入队列，并标号为（0，+∞）；
while 队列非空
{
头指针+1
依次检查与头指针指向的元素相连的边
if 另一点没有标号 and 流量可改进
{
尾指针+1,该点入队
a[另一点]<-队列头指针元素
b[另一点]<-Min{b[头指针元素],边的最大流量};
}
}
if 汇点已标号
{
从汇点出发依次修改各条边的流量
}
Until 汇点未标号；
答案<-所有与汇点相连的边的流量