\sqrt{x \cdot x + x \cdot x}\begin{array}{l}
\mathbf{if}\;x \leq -6.8685384582662 \cdot 10^{-311}:\\
\;\;\;\;\sqrt[3]{\sqrt[3]{\sqrt{2}}} \cdot \left(x \cdot \left({\left(\sqrt[3]{\sqrt{2}}\right)}^{2} \cdot \left(\sqrt[3]{\sqrt[3]{\sqrt{2}}} \cdot \left(-\sqrt[3]{\sqrt[3]{\sqrt{2}}}\right)\right)\right)\right)\\
\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 -6.8685384582662e-311)
(*
(cbrt (cbrt (sqrt 2.0)))
(*
x
(*
(pow (cbrt (sqrt 2.0)) 2.0)
(* (cbrt (cbrt (sqrt 2.0))) (- (cbrt (cbrt (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 <= -6.8685384582662e-311)) {
tmp = ((double) (((double) cbrt(((double) cbrt(((double) sqrt(2.0)))))) * ((double) (x * ((double) (((double) pow(((double) cbrt(((double) sqrt(2.0)))), 2.0)) * ((double) (((double) cbrt(((double) cbrt(((double) sqrt(2.0)))))) * ((double) -(((double) cbrt(((double) cbrt(((double) sqrt(2.0))))))))))))))));
} else {
tmp = ((double) (((double) sqrt(x)) * ((double) sqrt(((double) (x + x))))));
}
return tmp;
}



Bits error versus x
Results
if x < -6.8685384582662e-311Initial program Error: 30.9 bits
SimplifiedError: 30.9 bits
Taylor expanded around -inf Error: 0.4 bits
SimplifiedError: 0.4 bits
rmApplied add-cube-cbrtError: 0.4 bits
Applied distribute-lft-neg-inError: 0.4 bits
Applied associate-*r*Error: 0.4 bits
SimplifiedError: 0.4 bits
rmApplied add-cube-cbrtError: 0.4 bits
Applied associate-*r*Error: 0.4 bits
SimplifiedError: 0.4 bits
if -6.8685384582662e-311 < x Initial program Error: 31.1 bits
SimplifiedError: 31.0 bits
rmApplied sqrt-prodError: 0.3 bits
Final simplificationError: 0.3 bits
herbie shell --seed 2020203
(FPCore (x)
:name "sqrt A"
:precision binary64
(sqrt (+ (* x x) (* x x))))