\sqrt{x \cdot x + x \cdot x}\begin{array}{l}
\mathbf{if}\;x \leq -3.9001145064361 \cdot 10^{-310}:\\
\;\;\;\;-x \cdot \sqrt{2}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{x} \cdot \sqrt{x + x}\\
\end{array}(FPCore (x) :precision binary64 (sqrt (+ (* x x) (* x x))))
(FPCore (x) :precision binary64 (if (<= x -3.9001145064361e-310) (- (* x (sqrt 2.0))) (* (sqrt x) (sqrt (+ x x)))))
double code(double x) {
return ((double) sqrt(((double) (((double) (x * x)) + ((double) (x * x))))));
}
double code(double x) {
double tmp;
if ((x <= -3.9001145064361e-310)) {
tmp = ((double) -(((double) (x * ((double) sqrt(2.0))))));
} else {
tmp = ((double) (((double) sqrt(x)) * ((double) sqrt(((double) (x + x))))));
}
return tmp;
}



Bits error versus x
Results
if x < -3.90011450643612e-310Initial program 30.8
Simplified30.8
Taylor expanded around -inf 0.4
Simplified0.4
if -3.90011450643612e-310 < x Initial program 30.9
Simplified30.9
rmApplied sqrt-prod_binary640.4
Final simplification0.4
herbie shell --seed 2020205
(FPCore (x)
:name "sqrt A"
:precision binary64
(sqrt (+ (* x x) (* x x))))