\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 -5.2389466313579672 \cdot 10^{127}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 1.6670468245058271 \cdot 10^{-85}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot a}{\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 r89423 = b;
double r89424 = -r89423;
double r89425 = r89423 * r89423;
double r89426 = 4.0;
double r89427 = a;
double r89428 = c;
double r89429 = r89427 * r89428;
double r89430 = r89426 * r89429;
double r89431 = r89425 - r89430;
double r89432 = sqrt(r89431);
double r89433 = r89424 + r89432;
double r89434 = 2.0;
double r89435 = r89434 * r89427;
double r89436 = r89433 / r89435;
return r89436;
}
double f(double a, double b, double c) {
double r89437 = b;
double r89438 = -5.238946631357967e+127;
bool r89439 = r89437 <= r89438;
double r89440 = 1.0;
double r89441 = c;
double r89442 = r89441 / r89437;
double r89443 = a;
double r89444 = r89437 / r89443;
double r89445 = r89442 - r89444;
double r89446 = r89440 * r89445;
double r89447 = 1.667046824505827e-85;
bool r89448 = r89437 <= r89447;
double r89449 = 1.0;
double r89450 = 2.0;
double r89451 = r89450 * r89443;
double r89452 = -r89437;
double r89453 = r89437 * r89437;
double r89454 = 4.0;
double r89455 = r89443 * r89441;
double r89456 = r89454 * r89455;
double r89457 = r89453 - r89456;
double r89458 = sqrt(r89457);
double r89459 = r89452 + r89458;
double r89460 = r89451 / r89459;
double r89461 = r89449 / r89460;
double r89462 = -1.0;
double r89463 = r89462 * r89442;
double r89464 = r89448 ? r89461 : r89463;
double r89465 = r89439 ? r89446 : r89464;
return r89465;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.2 |
|---|---|
| Target | 21.6 |
| Herbie | 10.0 |
if b < -5.238946631357967e+127Initial program 54.2
Taylor expanded around -inf 3.3
Simplified3.3
if -5.238946631357967e+127 < b < 1.667046824505827e-85Initial program 12.2
rmApplied clear-num12.3
if 1.667046824505827e-85 < b Initial program 52.8
Taylor expanded around inf 9.7
Final simplification10.0
herbie shell --seed 2020056
(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)))