\frac{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\begin{array}{l}
\mathbf{if}\;b \le -4.30101840923646093 \cdot 10^{98}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.37577225186574925 \cdot 10^{-260}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{elif}\;b \le 6.66645678090455348 \cdot 10^{68}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r103050 = b;
double r103051 = -r103050;
double r103052 = r103050 * r103050;
double r103053 = 4.0;
double r103054 = a;
double r103055 = c;
double r103056 = r103054 * r103055;
double r103057 = r103053 * r103056;
double r103058 = r103052 - r103057;
double r103059 = sqrt(r103058);
double r103060 = r103051 + r103059;
double r103061 = 2.0;
double r103062 = r103061 * r103054;
double r103063 = r103060 / r103062;
return r103063;
}
double f(double a, double b, double c) {
double r103064 = b;
double r103065 = -4.301018409236461e+98;
bool r103066 = r103064 <= r103065;
double r103067 = 1.0;
double r103068 = c;
double r103069 = r103068 / r103064;
double r103070 = a;
double r103071 = r103064 / r103070;
double r103072 = r103069 - r103071;
double r103073 = r103067 * r103072;
double r103074 = -2.3757722518657493e-260;
bool r103075 = r103064 <= r103074;
double r103076 = -r103064;
double r103077 = r103064 * r103064;
double r103078 = 4.0;
double r103079 = r103070 * r103068;
double r103080 = r103078 * r103079;
double r103081 = r103077 - r103080;
double r103082 = sqrt(r103081);
double r103083 = r103076 + r103082;
double r103084 = 1.0;
double r103085 = 2.0;
double r103086 = r103085 * r103070;
double r103087 = r103084 / r103086;
double r103088 = r103083 * r103087;
double r103089 = 6.6664567809045535e+68;
bool r103090 = r103064 <= r103089;
double r103091 = r103085 * r103068;
double r103092 = r103076 - r103082;
double r103093 = r103091 / r103092;
double r103094 = -1.0;
double r103095 = r103094 * r103069;
double r103096 = r103090 ? r103093 : r103095;
double r103097 = r103075 ? r103088 : r103096;
double r103098 = r103066 ? r103073 : r103097;
return r103098;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.4 |
|---|---|
| Target | 21.5 |
| Herbie | 6.8 |
if b < -4.301018409236461e+98Initial program 47.2
Taylor expanded around -inf 3.9
Simplified3.9
if -4.301018409236461e+98 < b < -2.3757722518657493e-260Initial program 8.5
rmApplied div-inv8.7
if -2.3757722518657493e-260 < b < 6.6664567809045535e+68Initial program 29.1
rmApplied flip-+29.1
Simplified16.2
rmApplied clear-num16.4
Simplified15.9
rmApplied associate-/r*15.8
Simplified9.6
Taylor expanded around 0 9.5
if 6.6664567809045535e+68 < b Initial program 58.7
Taylor expanded around inf 3.5
Final simplification6.8
herbie shell --seed 2020020
(FPCore (a b c)
:name "quadp (p42, positive)"
:precision binary64
:herbie-target
(if (< b 0.0) (/ (+ (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)) (/ c (* a (/ (- (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))))
(/ (+ (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))