\frac{x - y \cdot z}{t - a \cdot z}\mathsf{fma}\left(z, y, -x\right) \cdot \frac{1}{\mathsf{fma}\left(z, a, -t\right)}double f(double x, double y, double z, double t, double a) {
double r759559 = x;
double r759560 = y;
double r759561 = z;
double r759562 = r759560 * r759561;
double r759563 = r759559 - r759562;
double r759564 = t;
double r759565 = a;
double r759566 = r759565 * r759561;
double r759567 = r759564 - r759566;
double r759568 = r759563 / r759567;
return r759568;
}
double f(double x, double y, double z, double t, double a) {
double r759569 = z;
double r759570 = y;
double r759571 = x;
double r759572 = -r759571;
double r759573 = fma(r759569, r759570, r759572);
double r759574 = 1.0;
double r759575 = a;
double r759576 = t;
double r759577 = -r759576;
double r759578 = fma(r759569, r759575, r759577);
double r759579 = r759574 / r759578;
double r759580 = r759573 * r759579;
return r759580;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
| Original | 10.7 |
|---|---|
| Target | 1.7 |
| Herbie | 10.8 |
Initial program 10.7
rmApplied frac-2neg10.7
Simplified10.7
Simplified10.7
rmApplied div-inv10.8
Final simplification10.8
herbie shell --seed 2020060 +o rules:numerics
(FPCore (x y z t a)
:name "Diagrams.Solve.Tridiagonal:solveTriDiagonal from diagrams-solve-0.1, A"
:precision binary64
:herbie-target
(if (< z -32113435955957344) (- (/ x (- t (* a z))) (/ y (- (/ t z) a))) (if (< z 3.5139522372978296e-86) (* (- x (* y z)) (/ 1 (- t (* a z)))) (- (/ x (- t (* a z))) (/ y (- (/ t z) a)))))
(/ (- x (* y z)) (- t (* a z))))