\sqrt{\frac{\left(x \cdot x + y \cdot y\right) + z \cdot z}{3}}\begin{array}{l}
\mathbf{if}\;x \leq -1.123597247650645 \cdot 10^{+88}:\\
\;\;\;\;-x \cdot \sqrt{0.3333333333333333}\\
\mathbf{elif}\;x \leq 2.608580135401658 \cdot 10^{+75}:\\
\;\;\;\;\sqrt{0.3333333333333333} \cdot \sqrt{\left(x \cdot x + y \cdot y\right) + z \cdot z}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{\sqrt{3}}\\
\end{array}(FPCore (x y z) :precision binary64 (sqrt (/ (+ (+ (* x x) (* y y)) (* z z)) 3.0)))
(FPCore (x y z)
:precision binary64
(if (<= x -1.123597247650645e+88)
(- (* x (sqrt 0.3333333333333333)))
(if (<= x 2.608580135401658e+75)
(* (sqrt 0.3333333333333333) (sqrt (+ (+ (* x x) (* y y)) (* z z))))
(/ x (sqrt 3.0)))))double code(double x, double y, double z) {
return sqrt((((x * x) + (y * y)) + (z * z)) / 3.0);
}
double code(double x, double y, double z) {
double tmp;
if (x <= -1.123597247650645e+88) {
tmp = -(x * sqrt(0.3333333333333333));
} else if (x <= 2.608580135401658e+75) {
tmp = sqrt(0.3333333333333333) * sqrt(((x * x) + (y * y)) + (z * z));
} else {
tmp = x / sqrt(3.0);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 38.2 |
|---|---|
| Target | 25.7 |
| Herbie | 26.4 |
if x < -1.123597247650645e88Initial program 53.0
Taylor expanded around -inf 19.2
Simplified19.2
if -1.123597247650645e88 < x < 2.60858013540165785e75Initial program 30.2
rmApplied div-inv_binary6430.2
Applied sqrt-prod_binary6430.3
Simplified30.3
if 2.60858013540165785e75 < x Initial program 51.3
rmApplied sqrt-div_binary6451.3
Taylor expanded around inf 20.4
Final simplification26.4
herbie shell --seed 2020219
(FPCore (x y z)
:name "Data.Array.Repa.Algorithms.Pixel:doubleRmsOfRGB8 from repa-algorithms-3.4.0.1"
:precision binary64
:herbie-target
(if (< z -6.396479394109776e+136) (/ (- z) (sqrt 3.0)) (if (< z 7.320293694404182e+117) (/ (sqrt (+ (+ (* z z) (* x x)) (* y y))) (sqrt 3.0)) (* (sqrt 0.3333333333333333) z)))
(sqrt (/ (+ (+ (* x x) (* y y)) (* z z)) 3.0)))