FUNCTION :  ETA[Fricke] -  Fricke involution

CALLING SEQUENCE :  Fricke(GP,N)

PARAMETERS :      

GLOBAL VARIABLES : 

SYNOPSIS :   
    Fricke involution tau->-1/(N*tau)

EXAMPLES :   

DISCUSSION :

SEE ALSO :