moved some code here
moved macro square_L2_fmpz()