subordinatepass.m

这是利用matlab所写的ezw影像压缩法

function S = subordinatepass(sublist,threshold) 

S=[];

[m,n]=size(sublist);

 for i=1:n;
     
    if bitand(round(sublist(1,i)),threshold)==threshold,
        
     %if sublist(1,i)>=threshold,
     
         S=[S,1];
         
         %sublist(1,i)=sublist(1,i)-threshold;
     else S=[S,0]; 
         
     end
     
 end