prim最小树调试 哪里出错了 求高手指点

李芳

function[T c]=Primf(Z)
8 q$ V7 n& N# F8 j6 j% 表示邻接矩阵
5 q7 e% o" e6 {6 r%c表示生成树的权和
; c* a: G# |" T1 b, S/ W% M% T表示生成树的边集合
l=length(Z);
' k% Q8 Y7 t1 z, o7 r' M+ Fa(a==0)=inf;
9 H  v) v6 o5 p1 A! N% sk=1:l;
listV(k)=0;
/ ~( R( u! p: u* M% N$ }, klistV(l)=l;
1 W+ |: }' M) l6 `- Ae=1;
; |1 v. J4 F) D# F1 \, cwhile(e<1)
    min=inf;
( S) C, l) P0 i8 {/ r8 a    for i=1:l
+ U/ I+ C' ?' O  k- A/ p        if listV(i)==1
            for j=1:l
                if listV(j)==0 & min>Z(i,j)
                    min=a(i,j);
                    b=a(i,j);
                    s=i;
                    d=j;
( A2 x9 E& c$ ?' S7 N                end
            end
% z6 g4 b2 O$ N, c0 s- {4 V) h3 Y        end
    end
    listV(d)=l;
    distance(e)=b;
    source(e)=s;
' Y& D. r; D6 G( `    destinantion(e)=d;
    e=e+1;
+ s" _$ {" n! v1 Vend

T=[source;destination];
for g=1:e-1
    c(g)=Z(T(1,g),T(2,g));
5 E! B+ p7 v& k. O& `5 }; tend
$ z0 `1 q' |" Q+ A. N- `c;
; {4 c! X" b3 }: X$ c; m9 X
$ x; U% v5 l6 Y
: o7 r9 C6 Y% a+ W

李芳