sq
static void sq(double_t *hi, double_t *lo, double x)
static void sq(long double *hi, long double *lo, long double x)