qiu_d.m

用MATLAB编的配电网自动化的一些程序

function  [d]=qiu_d(z)
[r,s]=size(z);
for i=1:r
    d(z(i,1),z(i,2))=1;
     d(z(i,2),z(i,1))=1;
end