\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.98276540088900058 \cdot 10^{134}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le 1.1860189201379418 \cdot 10^{-161}:\\
\;\;\;\;\left(\sqrt{\mathsf{fma}\left(b, b, -4 \cdot \left(a \cdot c\right)\right)} - b\right) \cdot \frac{\frac{1}{2}}{a}\\
\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\
\end{array}double f(double a, double b, double c) {
double r81901 = b;
double r81902 = -r81901;
double r81903 = r81901 * r81901;
double r81904 = 4.0;
double r81905 = a;
double r81906 = c;
double r81907 = r81905 * r81906;
double r81908 = r81904 * r81907;
double r81909 = r81903 - r81908;
double r81910 = sqrt(r81909);
double r81911 = r81902 + r81910;
double r81912 = 2.0;
double r81913 = r81912 * r81905;
double r81914 = r81911 / r81913;
return r81914;
}
double f(double a, double b, double c) {
double r81915 = b;
double r81916 = -1.9827654008890006e+134;
bool r81917 = r81915 <= r81916;
double r81918 = 1.0;
double r81919 = c;
double r81920 = r81919 / r81915;
double r81921 = a;
double r81922 = r81915 / r81921;
double r81923 = r81920 - r81922;
double r81924 = r81918 * r81923;
double r81925 = 1.1860189201379418e-161;
bool r81926 = r81915 <= r81925;
double r81927 = 4.0;
double r81928 = r81921 * r81919;
double r81929 = r81927 * r81928;
double r81930 = -r81929;
double r81931 = fma(r81915, r81915, r81930);
double r81932 = sqrt(r81931);
double r81933 = r81932 - r81915;
double r81934 = 1.0;
double r81935 = 2.0;
double r81936 = r81934 / r81935;
double r81937 = r81936 / r81921;
double r81938 = r81933 * r81937;
double r81939 = -1.0;
double r81940 = r81939 * r81920;
double r81941 = r81926 ? r81938 : r81940;
double r81942 = r81917 ? r81924 : r81941;
return r81942;
}




Bits error versus a




Bits error versus b




Bits error versus c
| Original | 33.7 |
|---|---|
| Target | 21.0 |
| Herbie | 10.9 |
if b < -1.9827654008890006e+134Initial program 56.8
Simplified56.8
Taylor expanded around -inf 3.1
Simplified3.1
if -1.9827654008890006e+134 < b < 1.1860189201379418e-161Initial program 10.3
Simplified10.3
rmApplied *-un-lft-identity10.3
Applied div-inv10.3
Applied times-frac10.5
Simplified10.5
if 1.1860189201379418e-161 < b Initial program 49.6
Simplified49.6
Taylor expanded around inf 13.7
Final simplification10.9
herbie shell --seed 2020047 +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)))