coe.asv

修正的euclid算法matlab程序

%%%%求多项式的最高项系数
%m=[1,1,0,1;1,1,1,1;0,0,1,1;1,1,1,1;1,0,0,1;1,0,0,0;0,0,0,0;];
%r=7;l=4;
function coeff=coe(m,r,l)%r行，l列
sum=0;
coeff=zeros(1,l);
for i=r:-1:1
    for j=1:l
        sum=xor(sum,m(i,j));
        if sum~=0
           % deg_m=i-1;
         coeff=m(i,:);
        end
        break;
    end
    if sum~=0
        break;
    end
    %sum=0;
end