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