Function: sqr
Section: transcendental
C-Name: gsqr
Prototype: G
Help: sqr(x): square of x. NOT identical to x*x
Description: 
 (int):int	sqri($1)
 (mp):mp	gsqr($1)
 (gen):gen	gsqr($1)

