\frac{x}{\left(y - z\right) \cdot \left(t - z\right)}\begin{array}{l}
\mathbf{if}\;\left(t - z\right) \cdot \left(y - z\right) \le -3.493689169084776416276579812094604550093 \cdot 10^{288} \lor \neg \left(\left(t - z\right) \cdot \left(y - z\right) \le 8.429748856735242084599883914763475834359 \cdot 10^{216}\right):\\
\;\;\;\;\frac{\frac{x}{y - z}}{t - z}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{\left(t - z\right) \cdot \left(y - z\right)}\\
\end{array}double f(double x, double y, double z, double t) {
double r909838 = x;
double r909839 = y;
double r909840 = z;
double r909841 = r909839 - r909840;
double r909842 = t;
double r909843 = r909842 - r909840;
double r909844 = r909841 * r909843;
double r909845 = r909838 / r909844;
return r909845;
}
double f(double x, double y, double z, double t) {
double r909846 = t;
double r909847 = z;
double r909848 = r909846 - r909847;
double r909849 = y;
double r909850 = r909849 - r909847;
double r909851 = r909848 * r909850;
double r909852 = -3.4936891690847764e+288;
bool r909853 = r909851 <= r909852;
double r909854 = 8.429748856735242e+216;
bool r909855 = r909851 <= r909854;
double r909856 = !r909855;
bool r909857 = r909853 || r909856;
double r909858 = x;
double r909859 = r909858 / r909850;
double r909860 = r909859 / r909848;
double r909861 = r909858 / r909851;
double r909862 = r909857 ? r909860 : r909861;
return r909862;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t
Results
| Original | 7.8 |
|---|---|
| Target | 8.7 |
| Herbie | 0.7 |
if (* (- y z) (- t z)) < -3.4936891690847764e+288 or 8.429748856735242e+216 < (* (- y z) (- t z)) Initial program 14.0
rmApplied associate-/r*0.1
if -3.4936891690847764e+288 < (* (- y z) (- t z)) < 8.429748856735242e+216Initial program 1.4
Final simplification0.7
herbie shell --seed 2019174
(FPCore (x y z t)
:name "Data.Random.Distribution.Triangular:triangularCDF from random-fu-0.2.6.2, B"
:herbie-target
(if (< (/ x (* (- y z) (- t z))) 0.0) (/ (/ x (- y z)) (- t z)) (* x (/ 1.0 (* (- y z) (- t z)))))
(/ x (* (- y z) (- t z))))