\sqrt{\left(x \cdot x + y \cdot y\right) + z \cdot z}\begin{array}{l}
\mathbf{if}\;z \leq 1.284493305231087 \cdot 10^{-60}:\\
\;\;\;\;-x\\
\mathbf{elif}\;z \leq 7.352417871382931 \cdot 10^{+31}:\\
\;\;\;\;\sqrt{\left(x \cdot x + y \cdot y\right) + z \cdot z}\\
\mathbf{elif}\;z \leq 5.302561758271932 \cdot 10^{+51}:\\
\;\;\;\;-x\\
\mathbf{elif}\;z \leq 5.672285693809099 \cdot 10^{+140}:\\
\;\;\;\;\sqrt{\left(x \cdot x + y \cdot y\right) + z \cdot z}\\
\mathbf{else}:\\
\;\;\;\;z\\
\end{array}(FPCore (x y z) :precision binary64 (sqrt (+ (+ (* x x) (* y y)) (* z z))))
(FPCore (x y z)
:precision binary64
(if (<= z 1.284493305231087e-60)
(- x)
(if (<= z 7.352417871382931e+31)
(sqrt (+ (+ (* x x) (* y y)) (* z z)))
(if (<= z 5.302561758271932e+51)
(- x)
(if (<= z 5.672285693809099e+140)
(sqrt (+ (+ (* x x) (* y y)) (* z z)))
z)))))double code(double x, double y, double z) {
return sqrt(((x * x) + (y * y)) + (z * z));
}
double code(double x, double y, double z) {
double tmp;
if (z <= 1.284493305231087e-60) {
tmp = -x;
} else if (z <= 7.352417871382931e+31) {
tmp = sqrt(((x * x) + (y * y)) + (z * z));
} else if (z <= 5.302561758271932e+51) {
tmp = -x;
} else if (z <= 5.672285693809099e+140) {
tmp = sqrt(((x * x) + (y * y)) + (z * z));
} else {
tmp = z;
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 37.8 |
|---|---|
| Target | 19.5 |
| Herbie | 11.2 |
if z < 1.284493305231087e-60 or 7.35241787138293115e31 < z < 5.30256175827193219e51Initial program 29.8
Taylor expanded around -inf 8.2
Simplified8.2
if 1.284493305231087e-60 < z < 7.35241787138293115e31 or 5.30256175827193219e51 < z < 5.67228569380909876e140Initial program 18.7
if 5.67228569380909876e140 < z Initial program 61.1
Taylor expanded around inf 8.8
Final simplification11.2
herbie shell --seed 2021044
(FPCore (x y z)
:name "FRP.Yampa.Vector3:vector3Rho from Yampa-0.10.2"
:precision binary64
:herbie-target
(if (< z -6.396479394109776e+136) (- z) (if (< z 7.320293694404182e+117) (sqrt (+ (+ (* z z) (* x x)) (* y y))) z))
(sqrt (+ (+ (* x x) (* y y)) (* z z))))