\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c}\begin{array}{l}
\mathbf{if}\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c} \le -2.4069368282600107 \cdot 10^{79}:\\
\;\;\;\;\mathsf{fma}\left(-4, \frac{t}{\frac{c}{a}}, \frac{\mathsf{fma}\left(x, 9 \cdot y, b\right)}{z \cdot c}\right)\\
\mathbf{elif}\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c} \le -0.0:\\
\;\;\;\;\mathsf{fma}\left(-4, \frac{t \cdot a}{c}, \frac{\frac{\mathsf{fma}\left(9 \cdot x, y, b\right)}{z}}{c}\right)\\
\mathbf{elif}\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c} \le 2.54913893229468986 \cdot 10^{295}:\\
\;\;\;\;\frac{\left(\left(x \cdot 9\right) \cdot y - \left(\left(z \cdot 4\right) \cdot t\right) \cdot a\right) + b}{z \cdot c}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(-4, t \cdot \frac{a}{c}, \frac{1}{z} \cdot \frac{\mathsf{fma}\left(9 \cdot x, y, b\right)}{c}\right)\\
\end{array}double f(double x, double y, double z, double t, double a, double b, double c) {
double r669037 = x;
double r669038 = 9.0;
double r669039 = r669037 * r669038;
double r669040 = y;
double r669041 = r669039 * r669040;
double r669042 = z;
double r669043 = 4.0;
double r669044 = r669042 * r669043;
double r669045 = t;
double r669046 = r669044 * r669045;
double r669047 = a;
double r669048 = r669046 * r669047;
double r669049 = r669041 - r669048;
double r669050 = b;
double r669051 = r669049 + r669050;
double r669052 = c;
double r669053 = r669042 * r669052;
double r669054 = r669051 / r669053;
return r669054;
}
double f(double x, double y, double z, double t, double a, double b, double c) {
double r669055 = x;
double r669056 = 9.0;
double r669057 = r669055 * r669056;
double r669058 = y;
double r669059 = r669057 * r669058;
double r669060 = z;
double r669061 = 4.0;
double r669062 = r669060 * r669061;
double r669063 = t;
double r669064 = r669062 * r669063;
double r669065 = a;
double r669066 = r669064 * r669065;
double r669067 = r669059 - r669066;
double r669068 = b;
double r669069 = r669067 + r669068;
double r669070 = c;
double r669071 = r669060 * r669070;
double r669072 = r669069 / r669071;
double r669073 = -2.4069368282600107e+79;
bool r669074 = r669072 <= r669073;
double r669075 = -r669061;
double r669076 = r669070 / r669065;
double r669077 = r669063 / r669076;
double r669078 = r669056 * r669058;
double r669079 = fma(r669055, r669078, r669068);
double r669080 = r669079 / r669071;
double r669081 = fma(r669075, r669077, r669080);
double r669082 = -0.0;
bool r669083 = r669072 <= r669082;
double r669084 = r669063 * r669065;
double r669085 = r669084 / r669070;
double r669086 = r669056 * r669055;
double r669087 = fma(r669086, r669058, r669068);
double r669088 = r669087 / r669060;
double r669089 = r669088 / r669070;
double r669090 = fma(r669075, r669085, r669089);
double r669091 = 2.54913893229469e+295;
bool r669092 = r669072 <= r669091;
double r669093 = r669065 / r669070;
double r669094 = r669063 * r669093;
double r669095 = 1.0;
double r669096 = r669095 / r669060;
double r669097 = r669087 / r669070;
double r669098 = r669096 * r669097;
double r669099 = fma(r669075, r669094, r669098);
double r669100 = r669092 ? r669072 : r669099;
double r669101 = r669083 ? r669090 : r669100;
double r669102 = r669074 ? r669081 : r669101;
return r669102;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a




Bits error versus b




Bits error versus c
| Original | 20.4 |
|---|---|
| Target | 14.6 |
| Herbie | 7.6 |
if (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < -2.4069368282600107e+79Initial program 19.6
Simplified11.8
rmApplied associate-/l*10.7
if -2.4069368282600107e+79 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < -0.0Initial program 16.5
Simplified10.6
rmApplied associate-/r*1.7
Simplified1.7
if -0.0 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) < 2.54913893229469e+295Initial program 0.6
if 2.54913893229469e+295 < (/ (+ (- (* (* x 9.0) y) (* (* (* z 4.0) t) a)) b) (* z c)) Initial program 61.5
Simplified30.9
rmApplied *-un-lft-identity30.9
Applied times-frac29.1
Simplified29.3
rmApplied *-un-lft-identity29.3
Applied times-frac24.2
Simplified24.2
Final simplification7.6
herbie shell --seed 2020100 +o rules:numerics
(FPCore (x y z t a b c)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, J"
:precision binary64
:herbie-target
(if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) -1.1001567408041051e-171) (/ (+ (- (* (* x 9) y) (* (* z 4) (* t a))) b) (* z c)) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) -0.0) (/ (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) z) c) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) 1.1708877911747488e-53) (/ (+ (- (* (* x 9) y) (* (* z 4) (* t a))) b) (* z c)) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) 2.876823679546137e+130) (- (+ (* (* 9 (/ y c)) (/ x z)) (/ b (* c z))) (* 4 (/ (* a t) c))) (if (< (/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)) 1.3838515042456319e+158) (/ (+ (- (* (* x 9) y) (* (* z 4) (* t a))) b) (* z c)) (- (+ (* 9 (* (/ y (* c z)) x)) (/ b (* c z))) (* 4 (/ (* a t) c))))))))
(/ (+ (- (* (* x 9) y) (* (* (* z 4) t) a)) b) (* z c)))