\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.58543573862810322 \cdot 10^{150}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.3730540219645598 \cdot 10^{-278}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot a}{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}\\
\mathbf{elif}\;b \le 1.55563303224959 \cdot 10^{106}:\\
\;\;\;\;\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 r99098 = b;
double r99099 = -r99098;
double r99100 = r99098 * r99098;
double r99101 = 4.0;
double r99102 = a;
double r99103 = c;
double r99104 = r99102 * r99103;
double r99105 = r99101 * r99104;
double r99106 = r99100 - r99105;
double r99107 = sqrt(r99106);
double r99108 = r99099 + r99107;
double r99109 = 2.0;
double r99110 = r99109 * r99102;
double r99111 = r99108 / r99110;
return r99111;
}
double f(double a, double b, double c) {
double r99112 = b;
double r99113 = -5.585435738628103e+150;
bool r99114 = r99112 <= r99113;
double r99115 = 1.0;
double r99116 = c;
double r99117 = r99116 / r99112;
double r99118 = a;
double r99119 = r99112 / r99118;
double r99120 = r99117 - r99119;
double r99121 = r99115 * r99120;
double r99122 = -2.3730540219645598e-278;
bool r99123 = r99112 <= r99122;
double r99124 = 1.0;
double r99125 = 2.0;
double r99126 = r99125 * r99118;
double r99127 = -r99112;
double r99128 = r99112 * r99112;
double r99129 = 4.0;
double r99130 = r99118 * r99116;
double r99131 = r99129 * r99130;
double r99132 = r99128 - r99131;
double r99133 = sqrt(r99132);
double r99134 = r99127 + r99133;
double r99135 = r99126 / r99134;
double r99136 = r99124 / r99135;
double r99137 = 1.55563303224959e+106;
bool r99138 = r99112 <= r99137;
double r99139 = r99125 / r99129;
double r99140 = r99124 / r99116;
double r99141 = r99139 * r99140;
double r99142 = r99127 - r99133;
double r99143 = r99141 * r99142;
double r99144 = r99124 / r99143;
double r99145 = -1.0;
double r99146 = r99145 * r99117;
double r99147 = r99138 ? r99144 : r99146;
double r99148 = r99123 ? r99136 : r99147;
double r99149 = r99114 ? r99121 : r99148;
return r99149;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.9 |
|---|---|
| Target | 20.7 |
| Herbie | 6.9 |
if b < -5.585435738628103e+150Initial program 61.5
Taylor expanded around -inf 2.2
Simplified2.2
if -5.585435738628103e+150 < b < -2.3730540219645598e-278Initial program 8.2
rmApplied clear-num8.3
if -2.3730540219645598e-278 < b < 1.55563303224959e+106Initial program 31.3
rmApplied flip-+31.3
Simplified16.7
rmApplied clear-num16.9
Simplified16.2
rmApplied times-frac16.2
Simplified9.9
if 1.55563303224959e+106 < b Initial program 60.3
Taylor expanded around inf 2.7
Final simplification6.9
herbie shell --seed 2020062
(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)))