Ford-Fulkerson算法计算如下网络中的最大流

晒个小太阳。

用Ford-Fulkerson算法计算如下网络中的最大流，每条弧上的两个数字分别表示容量和当前流量。

编写程序如下：
clc,clear,M=1000;
6 f& z( ?" u* I- ]) T6 uu(1,2)=1;u(1,3)=1;u(1,4)=2;
2 u3 O/ s" ^( W6 s1 f; l. Y- V* c8 su(2,3)=1;u(2,5)=2;
u(3,5)=1;
u(4,3)=3;u(4,5)=3;
( x7 g; ~8 B* C/ }0 k8 zf(1,2)=1;f(1,3)=0;f(1,4)=1;
f(2,3)=0;f(2,5)=1;
2 [$ I; E7 w3 lf(3,5)=1;
f(4,3)=1;f(4,5)=0;
n=length(u);
list=[];
' _$ X) D9 f8 d* k; imaxf=zeros(1:n);maxf(n)=1;
while maxf(n)>0
   maxf=zeros(1,n);pred=zeros(1,n);
   list=1;record=list;maxf(1)=M;
' ^  j5 b# p5 s! y+ i2 ]   while (~isempty(list))&(maxf(n)==0)
      flag=list(1);list(1)=[];
      index1=(find(u(flag,:)~=0));
      label1=index1(find(u(flag,index1)...
      -f(flag,index1)~=0));
      label1=setdiff(label1,record);
      list=union(list,label1);
      pred(label1(find(pred(label1)==0)))=flag;
; B' ?8 n1 a6 k: B8 [# t7 V      maxf(label1)=min(maxf(flag),u(flag,label1)...
      -f(flag,label1));
- i% `2 Z% L& t9 k      record=union(record,label1);
      label2=find(f(:,flag)~=0);
! O* E: z$ `$ U8 U      label2=label2';
# w* ^8 H, @: }1 M# |) q; q8 C$ l      label2=setdiff(label2,record);
      list=union(list,label2);
" w, K; F1 W+ C2 a      pred(label2(find(pred(label2)==0)))=-flag;
      maxf(label2)=min(maxf(flag),f(label2,flag));
      record=union(record,label2);
   end
      if maxf(n)>0
         v2=n;
         v1=pred(v2);
         while v2~=1
           if v1>0
2 i5 p9 J& c! {5 g. ^              f(v1,v2)=f(v1,v2)+maxf(n);
           else
           v1=abs(v1);
           f(v2,v1)=f(v2,v1)-maxf(n);
           end
         v2=v1;
5 x- s+ |6 z9 s$ h1 q( s8 H: g         v1=pred(v2);
        end
      end
   end
6 t) o( o. E+ `0 b: n$ f' p" J/ t+ zf
7 Q/ \4 M! d, N0 P$ S: m9 |+ r. T我想知道这个程序中：

1.什么是当前流量？这个应该不是求最大流的通用程序吧，因为有的题目里没有当前流量这个东西。
: h" j$ I9 b; M" d" l) F2.还有那个输出f是什么东东？？可行流矩阵式什么意思？？矩阵的含义完全不懂。比如说这个程序运行出来的那个矩阵我就不清楚他的意思。郁闷。

谢谢啦。

木兆木风

f表示当前流量，u表示容量