00001 #include "arith.h" 00002 00003 int rank(n,p,s) 00004 int n,p; 00005 MATRIX s; 00006 { 00007 int i,full,rank,min0(); 00008 00009 full=min0(2,n,p); 00010 rank=0; 00011 00012 for(i=0; i<full; i++){ 00013 if(s[i][i]<NSPACE) 00014 break; 00015 else 00016 rank += 1; 00017 } 00018 00019 return(rank); 00020 } 00021