FUNCTION :  cuspsetinequiv1 - determine Gamma[1](N)-inequivalence of given set of cusps 
     
CALLING SEQUENCE :  cuspsetinequiv1(cset,N)                                  

PARAMETERS :      cset - set of cusps
                  N - positive integer

GLOBAL VARIABLES:   equivpairs 

SYNOPSIS :   Determines whether the cusps in in cset are           
             Gamma[1](N)-inequivalent.                             
             This proc returns true or false. If equivalent pairs  
             are found they are stored in the global variable      
             equivpairs.                                           
   
EXAMPLES :   

DISCUSSION :

SEE ALSO :