FUNCTION :  numcuspequiv1 - Number of inequivalent cusps  of of Gamma[1](N)

CALLING SEQUENCE :  numcuspequiv1(N)                                         

PARAMETERS :      N - positive integer

SYNOPSIS :   Returns the number of inequivalent cusps              
             of Gamma[1](N).    
   
EXAMPLES :   

> numcuspequiv1(50);
                                             56

DISCUSSION : Gamma[1](50) has 56 inequivalent cusps.

SEE ALSO :