Single and double LAPY2.
While avoiding overflow, computes:
float slapy2(const float *X, const float *Y); double dlapy2(const double *X, const double *Y);