\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.4270583274198304 \cdot 10^{68}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -1.8135608595479747 \cdot 10^{-242}:\\
\;\;\;\;\frac{1 \cdot \left(\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b\right)}{2 \cdot a}\\
\mathbf{elif}\;b \le 3.0781255133678807 \cdot 10^{124}:\\
\;\;\;\;\frac{\frac{c}{0.5}}{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r82316 = b;
double r82317 = -r82316;
double r82318 = r82316 * r82316;
double r82319 = 4.0;
double r82320 = a;
double r82321 = c;
double r82322 = r82320 * r82321;
double r82323 = r82319 * r82322;
double r82324 = r82318 - r82323;
double r82325 = sqrt(r82324);
double r82326 = r82317 + r82325;
double r82327 = 2.0;
double r82328 = r82327 * r82320;
double r82329 = r82326 / r82328;
return r82329;
}
double f(double a, double b, double c) {
double r82330 = b;
double r82331 = -5.42705832741983e+68;
bool r82332 = r82330 <= r82331;
double r82333 = 1.0;
double r82334 = c;
double r82335 = r82334 / r82330;
double r82336 = a;
double r82337 = r82330 / r82336;
double r82338 = r82335 - r82337;
double r82339 = r82333 * r82338;
double r82340 = -1.8135608595479747e-242;
bool r82341 = r82330 <= r82340;
double r82342 = 1.0;
double r82343 = r82330 * r82330;
double r82344 = 4.0;
double r82345 = r82336 * r82334;
double r82346 = r82344 * r82345;
double r82347 = r82343 - r82346;
double r82348 = sqrt(r82347);
double r82349 = r82348 - r82330;
double r82350 = r82342 * r82349;
double r82351 = 2.0;
double r82352 = r82351 * r82336;
double r82353 = r82350 / r82352;
double r82354 = 3.0781255133678807e+124;
bool r82355 = r82330 <= r82354;
double r82356 = 0.5;
double r82357 = r82334 / r82356;
double r82358 = -r82330;
double r82359 = r82358 - r82348;
double r82360 = r82357 / r82359;
double r82361 = -1.0;
double r82362 = r82361 * r82335;
double r82363 = r82355 ? r82360 : r82362;
double r82364 = r82341 ? r82353 : r82363;
double r82365 = r82332 ? r82339 : r82364;
return r82365;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.2 |
|---|---|
| Target | 21.1 |
| Herbie | 6.9 |
if b < -5.42705832741983e+68Initial program 41.1
Taylor expanded around -inf 4.6
Simplified4.6
if -5.42705832741983e+68 < b < -1.8135608595479747e-242Initial program 9.0
rmApplied *-un-lft-identity9.0
Applied *-un-lft-identity9.0
Applied distribute-lft-out9.0
Simplified9.0
if -1.8135608595479747e-242 < b < 3.0781255133678807e+124Initial program 31.6
rmApplied flip-+31.7
Simplified16.0
rmApplied clear-num16.2
Simplified15.4
Taylor expanded around 0 9.9
rmApplied associate-/r*9.5
Simplified9.4
if 3.0781255133678807e+124 < b Initial program 61.3
Taylor expanded around inf 2.2
Final simplification6.9
herbie shell --seed 2020033 +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)))