Function: quadregulator
Section: number_theoretical
C-Name: gregula
Prototype: Gp
Help: quadregulator(x): regulator of the real quadratic field of
 discriminant x
Description: 
 (int):mp:prec	regula($1, prec)
 (gen):gen:prec	gregula($1, prec)

