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



Bits error versus x
Results
if x < -1.35203774644527e-310Initial program 29.6
Taylor expanded around -inf 0.4
Simplified0.4
if -1.35203774644527e-310 < x Initial program 30.9
Taylor expanded around 0 0.4
rmApplied add-sqr-sqrt_binary64_980.6
Applied associate-*r*_binary64_190.4
rmApplied add-sqr-sqrt_binary64_980.4
Applied associate-*r*_binary64_190.4
Final simplification0.4
herbie shell --seed 2020303
(FPCore (x)
:name "sqrt B"
:precision binary64
(sqrt (* (* 2.0 x) x)))