function   result = checkdescendants1(j,X,threshold,result)

% initial set result=0

% if the result=1, means that a coefficient has at least 

% 1 significant descendant.

global N

[m,n]=size(N);



for i=(4*j-3):4*j;

      if result==1 | i>m, 

         break;

      end;

         

     if abs(X(N(i,1),N(i,2)))>=threshold     

        result=1;

        break; 

     else 

       

     result=checkdescendants1(i,X,threshold,result);

    

     end;

   

end;