deg.asv

来自「修正的euclid算法matlab程序」· ASV 代码 · 共 22 行

%%%%求多项式的度和最高项系数
%m=[1,1,0,1;1,1,1,1;0,0,1,1;1,1,1,1;1,0,0,1;1,0,0,1;0,0,0,0;];
m=[false,true,true,true;false,false,true,false;false,true,true,false;false,true,true,false;false,false,true,true;false,false,false,false;false,false,false,false;];
r=7;l=4;
%function deg_m=deg(m,r,l)%r行，l列
sum=0;
deg_m=0;
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,:);
           break; 
        end
       
    end
    if sum~=0
        break;
    end
    %sum=0;
end