\frac{x \cdot y - z \cdot t}{a}\begin{array}{l}
\mathbf{if}\;x \cdot y - z \cdot t = -\infty \lor \neg \left(x \cdot y - z \cdot t \le 6.497493813302603510632657495546742303414 \cdot 10^{194}\right):\\
\;\;\;\;x \cdot \frac{y}{a} - \frac{t}{a} \cdot z\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot y - z \cdot t}{a}\\
\end{array}double f(double x, double y, double z, double t, double a) {
double r665630 = x;
double r665631 = y;
double r665632 = r665630 * r665631;
double r665633 = z;
double r665634 = t;
double r665635 = r665633 * r665634;
double r665636 = r665632 - r665635;
double r665637 = a;
double r665638 = r665636 / r665637;
return r665638;
}
double f(double x, double y, double z, double t, double a) {
double r665639 = x;
double r665640 = y;
double r665641 = r665639 * r665640;
double r665642 = z;
double r665643 = t;
double r665644 = r665642 * r665643;
double r665645 = r665641 - r665644;
double r665646 = -inf.0;
bool r665647 = r665645 <= r665646;
double r665648 = 6.497493813302604e+194;
bool r665649 = r665645 <= r665648;
double r665650 = !r665649;
bool r665651 = r665647 || r665650;
double r665652 = a;
double r665653 = r665640 / r665652;
double r665654 = r665639 * r665653;
double r665655 = r665643 / r665652;
double r665656 = r665655 * r665642;
double r665657 = r665654 - r665656;
double r665658 = r665645 / r665652;
double r665659 = r665651 ? r665657 : r665658;
return r665659;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 7.9 |
|---|---|
| Target | 5.8 |
| Herbie | 0.7 |
if (- (* x y) (* z t)) < -inf.0 or 6.497493813302604e+194 < (- (* x y) (* z t)) Initial program 38.5
rmApplied div-sub38.5
Simplified22.2
Simplified0.8
rmApplied div-inv0.9
Simplified0.9
rmApplied div-inv0.9
Applied associate-*l*1.0
Simplified1.0
if -inf.0 < (- (* x y) (* z t)) < 6.497493813302604e+194Initial program 0.7
Final simplification0.7
herbie shell --seed 2019174
(FPCore (x y z t a)
:name "Data.Colour.Matrix:inverse from colour-2.3.3, B"
:herbie-target
(if (< z -2.468684968699548e+170) (- (* (/ y a) x) (* (/ t a) z)) (if (< z 6.309831121978371e-71) (/ (- (* x y) (* z t)) a) (- (* (/ y a) x) (* (/ t a) z))))
(/ (- (* x y) (* z t)) a))