(FPCore (x y) :precision binary64 (sqrt (+ (* x x) y)))
(FPCore (x y) :precision binary64 (if (<= x -1.2388136775436486e+154) (- x) (if (<= x 7.225728841507834e+87) (sqrt (fma x x y)) x)))
double code(double x, double y) {
return sqrt(((x * x) + y));
}
double code(double x, double y) {
double tmp;
if (x <= -1.2388136775436486e+154) {
tmp = -x;
} else if (x <= 7.225728841507834e+87) {
tmp = sqrt(fma(x, x, y));
} else {
tmp = x;
}
return tmp;
}
function code(x, y) return sqrt(Float64(Float64(x * x) + y)) end
function code(x, y) tmp = 0.0 if (x <= -1.2388136775436486e+154) tmp = Float64(-x); elseif (x <= 7.225728841507834e+87) tmp = sqrt(fma(x, x, y)); else tmp = x; end return tmp end
code[x_, y_] := N[Sqrt[N[(N[(x * x), $MachinePrecision] + y), $MachinePrecision]], $MachinePrecision]
code[x_, y_] := If[LessEqual[x, -1.2388136775436486e+154], (-x), If[LessEqual[x, 7.225728841507834e+87], N[Sqrt[N[(x * x + y), $MachinePrecision]], $MachinePrecision], x]]
\sqrt{x \cdot x + y}
\begin{array}{l}
\mathbf{if}\;x \leq -1.2388136775436486 \cdot 10^{+154}:\\
\;\;\;\;-x\\
\mathbf{elif}\;x \leq 7.225728841507834 \cdot 10^{+87}:\\
\;\;\;\;\sqrt{\mathsf{fma}\left(x, x, y\right)}\\
\mathbf{else}:\\
\;\;\;\;x\\
\end{array}




Bits error versus x




Bits error versus y
| Original | 21.5 |
|---|---|
| Target | 0.6 |
| Herbie | 0.4 |
if x < -1.23881367754364865e154Initial program 64.0
Simplified64.0
Taylor expanded in x around -inf 0.0
Simplified0.0
if -1.23881367754364865e154 < x < 7.22572884150783425e87Initial program 0.0
Simplified0.0
if 7.22572884150783425e87 < x Initial program 45.3
Simplified45.3
Taylor expanded in x around inf 1.5
Final simplification0.4
herbie shell --seed 2022130
(FPCore (x y)
:name "Linear.Quaternion:$clog from linear-1.19.1.3"
:precision binary64
:herbie-target
(if (< x -1.5097698010472593e+153) (- (+ (* 0.5 (/ y x)) x)) (if (< x 5.582399551122541e+57) (sqrt (+ (* x x) y)) (+ (* 0.5 (/ y x)) x)))
(sqrt (+ (* x x) y)))