\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.739386840053888999010128333992752158317 \cdot 10^{131}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.102308624562260429751103075089775725609 \cdot 10^{-293}:\\
\;\;\;\;\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.092401246928180338651406165764155275885 \cdot 10^{90}:\\
\;\;\;\;\frac{1}{\left(\frac{2}{4} \cdot \frac{1}{c}\right) \cdot \left(\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}\right)}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r154667 = b;
double r154668 = -r154667;
double r154669 = r154667 * r154667;
double r154670 = 4.0;
double r154671 = a;
double r154672 = c;
double r154673 = r154671 * r154672;
double r154674 = r154670 * r154673;
double r154675 = r154669 - r154674;
double r154676 = sqrt(r154675);
double r154677 = r154668 + r154676;
double r154678 = 2.0;
double r154679 = r154678 * r154671;
double r154680 = r154677 / r154679;
return r154680;
}
double f(double a, double b, double c) {
double r154681 = b;
double r154682 = -4.739386840053889e+131;
bool r154683 = r154681 <= r154682;
double r154684 = 1.0;
double r154685 = c;
double r154686 = r154685 / r154681;
double r154687 = a;
double r154688 = r154681 / r154687;
double r154689 = r154686 - r154688;
double r154690 = r154684 * r154689;
double r154691 = -2.1023086245622604e-293;
bool r154692 = r154681 <= r154691;
double r154693 = -r154681;
double r154694 = r154681 * r154681;
double r154695 = 4.0;
double r154696 = r154687 * r154685;
double r154697 = r154695 * r154696;
double r154698 = r154694 - r154697;
double r154699 = sqrt(r154698);
double r154700 = r154693 + r154699;
double r154701 = 1.0;
double r154702 = 2.0;
double r154703 = r154702 * r154687;
double r154704 = r154701 / r154703;
double r154705 = r154700 * r154704;
double r154706 = 6.09240124692818e+90;
bool r154707 = r154681 <= r154706;
double r154708 = r154702 / r154695;
double r154709 = r154701 / r154685;
double r154710 = r154708 * r154709;
double r154711 = r154693 - r154699;
double r154712 = r154710 * r154711;
double r154713 = r154701 / r154712;
double r154714 = -1.0;
double r154715 = r154714 * r154686;
double r154716 = r154707 ? r154713 : r154715;
double r154717 = r154692 ? r154705 : r154716;
double r154718 = r154683 ? r154690 : r154717;
return r154718;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.2 |
|---|---|
| Target | 21.2 |
| Herbie | 6.7 |
if b < -4.739386840053889e+131Initial program 55.7
Taylor expanded around -inf 2.4
Simplified2.4
if -4.739386840053889e+131 < b < -2.1023086245622604e-293Initial program 9.2
rmApplied div-inv9.4
if -2.1023086245622604e-293 < b < 6.09240124692818e+90Initial program 31.3
rmApplied flip-+31.3
Simplified16.0
rmApplied clear-num16.2
Simplified15.6
rmApplied times-frac15.6
Simplified8.8
if 6.09240124692818e+90 < b Initial program 59.2
Taylor expanded around inf 3.0
Final simplification6.7
herbie shell --seed 2019354 +o rules:numerics
(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)))