\frac{x \cdot y}{z}\begin{array}{l}
\mathbf{if}\;x \cdot y \leq 6.9555476588821 \cdot 10^{-310}:\\
\;\;\;\;\left(x \cdot \frac{\sqrt[3]{y} \cdot \sqrt[3]{y}}{\sqrt[3]{z} \cdot \sqrt[3]{z}}\right) \cdot \frac{\sqrt[3]{y}}{\sqrt[3]{z}}\\
\mathbf{elif}\;x \cdot y \leq 2.168540545821934 \cdot 10^{+185}:\\
\;\;\;\;\frac{x \cdot y}{z}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{\frac{z}{y}}\\
\end{array}(FPCore (x y z) :precision binary64 (/ (* x y) z))
(FPCore (x y z)
:precision binary64
(if (<= (* x y) 6.9555476588821e-310)
(*
(* x (/ (* (cbrt y) (cbrt y)) (* (cbrt z) (cbrt z))))
(/ (cbrt y) (cbrt z)))
(if (<= (* x y) 2.168540545821934e+185) (/ (* x y) z) (/ x (/ z y)))))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) <= 6.9555476588821e-310) {
tmp = (x * ((cbrt(y) * cbrt(y)) / (cbrt(z) * cbrt(z)))) * (cbrt(y) / cbrt(z));
} else if ((x * y) <= 2.168540545821934e+185) {
tmp = (x * y) / z;
} else {
tmp = x / (z / y);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 6.3 |
|---|---|
| Target | 6.2 |
| Herbie | 1.2 |
if (*.f64 x y) < 6.955547658882119e-310Initial program 7.9
rmApplied *-un-lft-identity_binary647.9
Applied times-frac_binary645.1
Simplified5.1
rmApplied add-cube-cbrt_binary645.9
Applied add-cube-cbrt_binary646.0
Applied times-frac_binary646.0
Applied associate-*r*_binary641.8
if 6.955547658882119e-310 < (*.f64 x y) < 2.1685405458219339e185Initial program 0.2
if 2.1685405458219339e185 < (*.f64 x y) Initial program 24.0
rmApplied associate-/l*_binary641.6
Final simplification1.2
herbie shell --seed 2021118
(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))