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



Bits error versus x
Results
if x < 6.02633953173012e-311Initial program 30.6
Taylor expanded around -inf 0.4
Simplified0.4
rmApplied add-sqr-sqrt0.4
Applied sqrt-prod0.6
Applied distribute-lft-neg-in0.6
Applied associate-*r*0.4
rmApplied add-sqr-sqrt0.4
Applied sqrt-prod0.4
Applied sqrt-prod0.4
Applied associate-*r*0.4
Simplified0.3
if 6.02633953173012e-311 < x Initial program 30.3
rmApplied sqrt-prod0.3
Final simplification0.3
herbie shell --seed 2020198
(FPCore (x)
:name "sqrt B"
:precision binary64
(sqrt (* (* 2.0 x) x)))