\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 -1.566577234736048594271680252121402983446 \cdot 10^{69}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 2.649990358912618894034395734880511734682 \cdot 10^{-53}:\\
\;\;\;\;\frac{1}{\frac{2 \cdot a}{\sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)} - b}}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r58158 = b;
double r58159 = -r58158;
double r58160 = r58158 * r58158;
double r58161 = 4.0;
double r58162 = a;
double r58163 = c;
double r58164 = r58162 * r58163;
double r58165 = r58161 * r58164;
double r58166 = r58160 - r58165;
double r58167 = sqrt(r58166);
double r58168 = r58159 + r58167;
double r58169 = 2.0;
double r58170 = r58169 * r58162;
double r58171 = r58168 / r58170;
return r58171;
}
double f(double a, double b, double c) {
double r58172 = b;
double r58173 = -1.5665772347360486e+69;
bool r58174 = r58172 <= r58173;
double r58175 = 1.0;
double r58176 = c;
double r58177 = r58176 / r58172;
double r58178 = a;
double r58179 = r58172 / r58178;
double r58180 = r58177 - r58179;
double r58181 = r58175 * r58180;
double r58182 = 2.649990358912619e-53;
bool r58183 = r58172 <= r58182;
double r58184 = 1.0;
double r58185 = 2.0;
double r58186 = r58185 * r58178;
double r58187 = r58172 * r58172;
double r58188 = 4.0;
double r58189 = r58178 * r58176;
double r58190 = r58188 * r58189;
double r58191 = r58187 - r58190;
double r58192 = sqrt(r58191);
double r58193 = r58192 - r58172;
double r58194 = r58186 / r58193;
double r58195 = r58184 / r58194;
double r58196 = -1.0;
double r58197 = r58196 * r58177;
double r58198 = r58183 ? r58195 : r58197;
double r58199 = r58174 ? r58181 : r58198;
return r58199;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.3 |
|---|---|
| Target | 21.2 |
| Herbie | 10.5 |
if b < -1.5665772347360486e+69Initial program 41.7
Simplified41.7
Taylor expanded around -inf 4.4
Simplified4.4
if -1.5665772347360486e+69 < b < 2.649990358912619e-53Initial program 14.6
Simplified14.6
rmApplied clear-num14.7
if 2.649990358912619e-53 < b Initial program 54.0
Simplified54.0
Taylor expanded around inf 8.4
Final simplification10.5
herbie shell --seed 2019306 +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)))