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



Bits error versus x
Results
if x < -4.884949114924196e-310Initial program 31.0
Simplified30.9
Taylor expanded around -inf 0.4
Simplified0.4
rmApplied add-cube-cbrt_binary64_1130.4
Applied associate-*r*_binary64_180.4
Taylor expanded around 0 0.4
if -4.884949114924196e-310 < x Initial program 30.0
Simplified29.9
rmApplied sqrt-prod_binary64_940.4
Final simplification0.4
herbie shell --seed 2021045
(FPCore (x)
:name "sqrt A"
:precision binary64
(sqrt (+ (* x x) (* x x))))