\frac{x \cdot y}{z}\begin{array}{l}
\mathbf{if}\;x \cdot y \le -1.479973884495300604070714800261381475132 \cdot 10^{167}:\\
\;\;\;\;y \cdot \frac{x}{z}\\
\mathbf{elif}\;x \cdot y \le -1.416209028111420696434446461734804676286 \cdot 10^{-165} \lor \neg \left(x \cdot y \le 6.735758574504119133242399316181506457656 \cdot 10^{-122}\right):\\
\;\;\;\;\frac{1}{z} \cdot \left(x \cdot y\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{\frac{z}{y}}\\
\end{array}double f(double x, double y, double z) {
double r523651 = x;
double r523652 = y;
double r523653 = r523651 * r523652;
double r523654 = z;
double r523655 = r523653 / r523654;
return r523655;
}
double f(double x, double y, double z) {
double r523656 = x;
double r523657 = y;
double r523658 = r523656 * r523657;
double r523659 = -1.4799738844953006e+167;
bool r523660 = r523658 <= r523659;
double r523661 = z;
double r523662 = r523656 / r523661;
double r523663 = r523657 * r523662;
double r523664 = -1.4162090281114207e-165;
bool r523665 = r523658 <= r523664;
double r523666 = 6.735758574504119e-122;
bool r523667 = r523658 <= r523666;
double r523668 = !r523667;
bool r523669 = r523665 || r523668;
double r523670 = 1.0;
double r523671 = r523670 / r523661;
double r523672 = r523671 * r523658;
double r523673 = r523661 / r523657;
double r523674 = r523656 / r523673;
double r523675 = r523669 ? r523672 : r523674;
double r523676 = r523660 ? r523663 : r523675;
return r523676;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 6.3 |
|---|---|
| Target | 6.3 |
| Herbie | 2.7 |
if (* x y) < -1.4799738844953006e+167Initial program 19.6
rmApplied associate-/l*1.7
rmApplied clear-num1.7
Taylor expanded around 0 19.6
Simplified2.4
if -1.4799738844953006e+167 < (* x y) < -1.4162090281114207e-165 or 6.735758574504119e-122 < (* x y) Initial program 3.2
rmApplied associate-/l*9.9
rmApplied div-inv10.0
Applied *-un-lft-identity10.0
Applied times-frac3.4
Simplified3.3
if -1.4162090281114207e-165 < (* x y) < 6.735758574504119e-122Initial program 8.6
rmApplied associate-/l*1.6
Final simplification2.7
herbie shell --seed 2019323
(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))