\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 -1.244774291407710824026233990502584030865 \cdot 10^{109}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 6.485606601696406255086078549712143397431 \cdot 10^{-71}:\\
\;\;\;\;\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 r97632 = b;
double r97633 = -r97632;
double r97634 = r97632 * r97632;
double r97635 = 4.0;
double r97636 = a;
double r97637 = c;
double r97638 = r97636 * r97637;
double r97639 = r97635 * r97638;
double r97640 = r97634 - r97639;
double r97641 = sqrt(r97640);
double r97642 = r97633 + r97641;
double r97643 = 2.0;
double r97644 = r97643 * r97636;
double r97645 = r97642 / r97644;
return r97645;
}
double f(double a, double b, double c) {
double r97646 = b;
double r97647 = -1.2447742914077108e+109;
bool r97648 = r97646 <= r97647;
double r97649 = 1.0;
double r97650 = c;
double r97651 = r97650 / r97646;
double r97652 = a;
double r97653 = r97646 / r97652;
double r97654 = r97651 - r97653;
double r97655 = r97649 * r97654;
double r97656 = 6.485606601696406e-71;
bool r97657 = r97646 <= r97656;
double r97658 = -r97646;
double r97659 = r97646 * r97646;
double r97660 = 4.0;
double r97661 = r97652 * r97650;
double r97662 = r97660 * r97661;
double r97663 = r97659 - r97662;
double r97664 = sqrt(r97663);
double r97665 = r97658 + r97664;
double r97666 = 1.0;
double r97667 = 2.0;
double r97668 = r97667 * r97652;
double r97669 = r97666 / r97668;
double r97670 = r97665 * r97669;
double r97671 = -1.0;
double r97672 = r97671 * r97651;
double r97673 = r97657 ? r97670 : r97672;
double r97674 = r97648 ? r97655 : r97673;
return r97674;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.7 |
|---|---|
| Target | 21.5 |
| Herbie | 10.1 |
if b < -1.2447742914077108e+109Initial program 49.3
Taylor expanded around -inf 4.0
Simplified4.0
if -1.2447742914077108e+109 < b < 6.485606601696406e-71Initial program 13.5
rmApplied div-inv13.6
if 6.485606601696406e-71 < b Initial program 53.3
Taylor expanded around inf 8.4
Final simplification10.1
herbie shell --seed 2019353
(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)))