\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{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 - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\
\mathbf{elif}\;b \le 6.092401246928180338651406165764155275885 \cdot 10^{90}:\\
\;\;\;\;\frac{\frac{1}{1}}{\left(\frac{2}{4} \cdot \frac{1}{c}\right) \cdot \left(\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right)}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r96144 = b;
double r96145 = -r96144;
double r96146 = r96144 * r96144;
double r96147 = 4.0;
double r96148 = a;
double r96149 = r96147 * r96148;
double r96150 = c;
double r96151 = r96149 * r96150;
double r96152 = r96146 - r96151;
double r96153 = sqrt(r96152);
double r96154 = r96145 + r96153;
double r96155 = 2.0;
double r96156 = r96155 * r96148;
double r96157 = r96154 / r96156;
return r96157;
}
double f(double a, double b, double c) {
double r96158 = b;
double r96159 = -4.739386840053889e+131;
bool r96160 = r96158 <= r96159;
double r96161 = 1.0;
double r96162 = c;
double r96163 = r96162 / r96158;
double r96164 = a;
double r96165 = r96158 / r96164;
double r96166 = r96163 - r96165;
double r96167 = r96161 * r96166;
double r96168 = -2.1023086245622604e-293;
bool r96169 = r96158 <= r96168;
double r96170 = -r96158;
double r96171 = r96158 * r96158;
double r96172 = 4.0;
double r96173 = r96172 * r96164;
double r96174 = r96173 * r96162;
double r96175 = r96171 - r96174;
double r96176 = sqrt(r96175);
double r96177 = r96170 + r96176;
double r96178 = 1.0;
double r96179 = 2.0;
double r96180 = r96179 * r96164;
double r96181 = r96178 / r96180;
double r96182 = r96177 * r96181;
double r96183 = 6.09240124692818e+90;
bool r96184 = r96158 <= r96183;
double r96185 = r96178 / r96178;
double r96186 = r96179 / r96172;
double r96187 = r96178 / r96162;
double r96188 = r96186 * r96187;
double r96189 = r96170 - r96176;
double r96190 = r96188 * r96189;
double r96191 = r96185 / r96190;
double r96192 = -1.0;
double r96193 = r96192 * r96163;
double r96194 = r96184 ? r96191 : r96193;
double r96195 = r96169 ? r96182 : r96194;
double r96196 = r96160 ? r96167 : r96195;
return r96196;
}




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 *-un-lft-identity16.0
Applied *-un-lft-identity16.0
Applied times-frac16.0
Applied associate-/l*16.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
(FPCore (a b c)
:name "The quadratic formula (r1)"
: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)))