\frac{x \cdot y}{z}\begin{array}{l}
\mathbf{if}\;x \cdot y \leq 1.3289674181225 \cdot 10^{-318}:\\
\;\;\;\;\left(\left(\sqrt[3]{x} \cdot \sqrt[3]{x}\right) \cdot \left(\sqrt[3]{y} \cdot \sqrt[3]{y}\right)\right) \cdot \frac{\sqrt[3]{x}}{\frac{z}{\sqrt[3]{y}}}\\
\mathbf{elif}\;x \cdot y \leq 5.36460452411368 \cdot 10^{+147}:\\
\;\;\;\;\frac{x \cdot y}{z}\\
\mathbf{else}:\\
\;\;\;\;y \cdot \frac{x}{z}\\
\end{array}(FPCore (x y z) :precision binary64 (/ (* x y) z))
(FPCore (x y z)
:precision binary64
(if (<= (* x y) 1.3289674181225e-318)
(*
(* (* (cbrt x) (cbrt x)) (* (cbrt y) (cbrt y)))
(/ (cbrt x) (/ z (cbrt y))))
(if (<= (* x y) 5.36460452411368e+147) (/ (* x y) z) (* y (/ x z)))))double code(double x, double y, double z) {
return (x * y) / z;
}
double code(double x, double y, double z) {
double tmp;
if ((x * y) <= 1.3289674181225e-318) {
tmp = ((cbrt(x) * cbrt(x)) * (cbrt(y) * cbrt(y))) * (cbrt(x) / (z / cbrt(y)));
} else if ((x * y) <= 5.36460452411368e+147) {
tmp = (x * y) / z;
} else {
tmp = y * (x / z);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 6.2 |
|---|---|
| Target | 6.2 |
| Herbie | 2.1 |
if (*.f64 x y) < 1.3289674e-318Initial program 7.6
rmApplied associate-/l*_binary64_129815.3
rmApplied add-cube-cbrt_binary64_130716.1
Applied *-un-lft-identity_binary64_130366.1
Applied times-frac_binary64_130426.1
Applied add-cube-cbrt_binary64_130716.3
Applied times-frac_binary64_130422.9
Simplified2.9
if 1.3289674e-318 < (*.f64 x y) < 5.36460452411368e147Initial program 0.3
if 5.36460452411368e147 < (*.f64 x y) Initial program 19.4
rmApplied associate-/l*_binary64_129812.5
rmApplied associate-/r/_binary64_129823.4
Final simplification2.1
herbie shell --seed 2020354
(FPCore (x y z)
:name "Diagrams.Solve.Tridiagonal:solveCyclicTriDiagonal from diagrams-solve-0.1, A"
:precision binary64
:herbie-target
(if (< z -4.262230790519429e-138) (/ (* x y) z) (if (< z 1.7042130660650472e-164) (/ x (/ z y)) (* (/ x z) y)))
(/ (* x y) z))