FUNCTION :  phiset  - Relatively prime integers

CALLING SEQUENCE :  phiset()                                                
                    phiset(m)                                                
                    

PARAMETERS :      m - positive integer

SYNOPSIS :   Thus proc returns the integers between 1 and m that are
             relatively prime to m.    
             This function is sued by Acmake

EXAMPLES :   

> with(thetaids):

> phiset();
---------------------------------------------------------
phiset(m)                                                
   Thus proc returns the integers between 1 and m that are
   relatively prime to m.                                
---------------------------------------------------------

> phiset(12);
                                        {1, 5, 7, 11}

DISCUSSION :

SEE ALSO :  Acmake