\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 -7.93152454634661985 \cdot 10^{153}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 2.0569776426586135 \cdot 10^{-106}:\\
\;\;\;\;\frac{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}{\frac{a}{\frac{1}{2}}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r100415 = b;
double r100416 = -r100415;
double r100417 = r100415 * r100415;
double r100418 = 4.0;
double r100419 = a;
double r100420 = c;
double r100421 = r100419 * r100420;
double r100422 = r100418 * r100421;
double r100423 = r100417 - r100422;
double r100424 = sqrt(r100423);
double r100425 = r100416 + r100424;
double r100426 = 2.0;
double r100427 = r100426 * r100419;
double r100428 = r100425 / r100427;
return r100428;
}
double f(double a, double b, double c) {
double r100429 = b;
double r100430 = -7.93152454634662e+153;
bool r100431 = r100429 <= r100430;
double r100432 = 1.0;
double r100433 = c;
double r100434 = r100433 / r100429;
double r100435 = a;
double r100436 = r100429 / r100435;
double r100437 = r100434 - r100436;
double r100438 = r100432 * r100437;
double r100439 = 2.0569776426586135e-106;
bool r100440 = r100429 <= r100439;
double r100441 = r100429 * r100429;
double r100442 = 4.0;
double r100443 = r100435 * r100433;
double r100444 = r100442 * r100443;
double r100445 = r100441 - r100444;
double r100446 = sqrt(r100445);
double r100447 = r100446 - r100429;
double r100448 = 1.0;
double r100449 = 2.0;
double r100450 = r100448 / r100449;
double r100451 = r100435 / r100450;
double r100452 = r100447 / r100451;
double r100453 = -1.0;
double r100454 = r100453 * r100434;
double r100455 = r100440 ? r100452 : r100454;
double r100456 = r100431 ? r100438 : r100455;
return r100456;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 33.8 |
|---|---|
| Target | 21.2 |
| Herbie | 9.8 |
if b < -7.93152454634662e+153Initial program 63.8
Simplified63.8
Taylor expanded around -inf 1.9
Simplified1.9
if -7.93152454634662e+153 < b < 2.0569776426586135e-106Initial program 11.2
Simplified11.2
rmApplied *-un-lft-identity11.2
Applied *-un-lft-identity11.2
Applied times-frac11.2
Applied associate-/l*11.3
rmApplied div-inv11.3
Applied *-un-lft-identity11.3
Applied times-frac11.4
Applied associate-/r*11.3
Simplified11.2
if 2.0569776426586135e-106 < b Initial program 52.0
Simplified52.0
Taylor expanded around inf 10.3
Final simplification9.8
herbie shell --seed 2020043 +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)))