\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 -2.46337219442650475190360405115215330559 \cdot 10^{111}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 6.26844514409972828090140298620599613013 \cdot 10^{-106}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r73385 = b;
double r73386 = -r73385;
double r73387 = r73385 * r73385;
double r73388 = 4.0;
double r73389 = a;
double r73390 = c;
double r73391 = r73389 * r73390;
double r73392 = r73388 * r73391;
double r73393 = r73387 - r73392;
double r73394 = sqrt(r73393);
double r73395 = r73386 + r73394;
double r73396 = 2.0;
double r73397 = r73396 * r73389;
double r73398 = r73395 / r73397;
return r73398;
}
double f(double a, double b, double c) {
double r73399 = b;
double r73400 = -2.463372194426505e+111;
bool r73401 = r73399 <= r73400;
double r73402 = 1.0;
double r73403 = c;
double r73404 = r73403 / r73399;
double r73405 = a;
double r73406 = r73399 / r73405;
double r73407 = r73404 - r73406;
double r73408 = r73402 * r73407;
double r73409 = 6.268445144099728e-106;
bool r73410 = r73399 <= r73409;
double r73411 = -r73399;
double r73412 = r73399 * r73399;
double r73413 = 4.0;
double r73414 = r73405 * r73403;
double r73415 = r73413 * r73414;
double r73416 = r73412 - r73415;
double r73417 = sqrt(r73416);
double r73418 = r73411 + r73417;
double r73419 = 1.0;
double r73420 = 2.0;
double r73421 = r73420 * r73405;
double r73422 = r73419 / r73421;
double r73423 = r73418 * r73422;
double r73424 = -1.0;
double r73425 = r73424 * r73404;
double r73426 = r73410 ? r73423 : r73425;
double r73427 = r73401 ? r73408 : r73426;
return r73427;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.1 |
|---|---|
| Target | 21.0 |
| Herbie | 10.1 |
if b < -2.463372194426505e+111Initial program 48.7
Taylor expanded around -inf 3.0
Simplified3.0
if -2.463372194426505e+111 < b < 6.268445144099728e-106Initial program 11.5
rmApplied div-inv11.6
if 6.268445144099728e-106 < b Initial program 52.4
Taylor expanded around inf 10.9
Final simplification10.1
herbie shell --seed 2019326
(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)))