\frac{x \cdot y}{z}
\begin{array}{l}
t_0 := \frac{x \cdot y}{z}\\
\mathbf{if}\;t_0 \leq 0:\\
\;\;\;\;\frac{\sqrt[3]{y} \cdot \sqrt[3]{y}}{\sqrt[3]{z} \cdot \sqrt[3]{z}} \cdot \frac{x}{\frac{\sqrt[3]{z}}{\sqrt[3]{y}}}\\
\mathbf{elif}\;t_0 \leq 3.951917573061312 \cdot 10^{+304}:\\
\;\;\;\;t_0\\
\mathbf{else}:\\
\;\;\;\;x \cdot \frac{y}{z}\\
\end{array}
(FPCore (x y z) :precision binary64 (/ (* x y) z))
(FPCore (x y z)
:precision binary64
(let* ((t_0 (/ (* x y) z)))
(if (<= t_0 0.0)
(*
(/ (* (cbrt y) (cbrt y)) (* (cbrt z) (cbrt z)))
(/ x (/ (cbrt z) (cbrt y))))
(if (<= t_0 3.951917573061312e+304) t_0 (* x (/ y z))))))double code(double x, double y, double z) {
return (x * y) / z;
}
double code(double x, double y, double z) {
double t_0 = (x * y) / z;
double tmp;
if (t_0 <= 0.0) {
tmp = ((cbrt(y) * cbrt(y)) / (cbrt(z) * cbrt(z))) * (x / (cbrt(z) / cbrt(y)));
} else if (t_0 <= 3.951917573061312e+304) {
tmp = t_0;
} else {
tmp = x * (y / z);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 6.4 |
|---|---|
| Target | 6.3 |
| Herbie | 1.3 |
if (/.f64 (*.f64 x y) z) < -0.0Initial program 7.3
Applied associate-/l*_binary644.9
Applied add-cube-cbrt_binary645.6
Applied add-cube-cbrt_binary645.8
Applied times-frac_binary645.8
Applied *-un-lft-identity_binary645.8
Applied times-frac_binary641.8
Simplified1.8
if -0.0 < (/.f64 (*.f64 x y) z) < 3.9519175730613121e304Initial program 0.5
if 3.9519175730613121e304 < (/.f64 (*.f64 x y) z) Initial program 62.2
Applied *-un-lft-identity_binary6462.2
Applied times-frac_binary640.8
Simplified0.8
Final simplification1.3
herbie shell --seed 2022067
(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))