\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 -2.223763057046510327568967152287533282505 \cdot 10^{109}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\
\mathbf{elif}\;b \le -2.351742539702864616278805005197483152899 \cdot 10^{-186}:\\
\;\;\;\;\frac{\sqrt{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}{\frac{2 \cdot a}{\sqrt{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}}}\\
\mathbf{elif}\;b \le 1.458057835821772074616178333218437979276 \cdot 10^{144}:\\
\;\;\;\;\frac{\left(\frac{1}{2} \cdot 4\right) \cdot c}{\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 r93110 = b;
double r93111 = -r93110;
double r93112 = r93110 * r93110;
double r93113 = 4.0;
double r93114 = a;
double r93115 = c;
double r93116 = r93114 * r93115;
double r93117 = r93113 * r93116;
double r93118 = r93112 - r93117;
double r93119 = sqrt(r93118);
double r93120 = r93111 + r93119;
double r93121 = 2.0;
double r93122 = r93121 * r93114;
double r93123 = r93120 / r93122;
return r93123;
}
double f(double a, double b, double c) {
double r93124 = b;
double r93125 = -2.2237630570465103e+109;
bool r93126 = r93124 <= r93125;
double r93127 = 1.0;
double r93128 = c;
double r93129 = r93128 / r93124;
double r93130 = a;
double r93131 = r93124 / r93130;
double r93132 = r93129 - r93131;
double r93133 = r93127 * r93132;
double r93134 = -2.3517425397028646e-186;
bool r93135 = r93124 <= r93134;
double r93136 = -r93124;
double r93137 = r93124 * r93124;
double r93138 = 4.0;
double r93139 = r93130 * r93128;
double r93140 = r93138 * r93139;
double r93141 = r93137 - r93140;
double r93142 = sqrt(r93141);
double r93143 = r93136 + r93142;
double r93144 = sqrt(r93143);
double r93145 = 2.0;
double r93146 = r93145 * r93130;
double r93147 = r93146 / r93144;
double r93148 = r93144 / r93147;
double r93149 = 1.458057835821772e+144;
bool r93150 = r93124 <= r93149;
double r93151 = 1.0;
double r93152 = r93151 / r93145;
double r93153 = r93152 * r93138;
double r93154 = r93153 * r93128;
double r93155 = r93136 - r93142;
double r93156 = r93154 / r93155;
double r93157 = -1.0;
double r93158 = r93157 * r93129;
double r93159 = r93150 ? r93156 : r93158;
double r93160 = r93135 ? r93148 : r93159;
double r93161 = r93126 ? r93133 : r93160;
return r93161;
}




Bits error versus a




Bits error versus b




Bits error versus c
Results
| Original | 34.1 |
|---|---|
| Target | 20.9 |
| Herbie | 6.7 |
if b < -2.2237630570465103e+109Initial program 48.6
Taylor expanded around -inf 3.3
Simplified3.3
if -2.2237630570465103e+109 < b < -2.3517425397028646e-186Initial program 6.9
rmApplied add-sqr-sqrt7.3
Applied associate-/l*7.3
if -2.3517425397028646e-186 < b < 1.458057835821772e+144Initial program 31.3
rmApplied flip-+31.5
Simplified16.1
rmApplied clear-num16.3
Simplified15.3
rmApplied associate-/l*15.3
Simplified10.2
rmApplied associate-/r*9.9
Simplified9.8
if 1.458057835821772e+144 < b Initial program 62.9
Taylor expanded around inf 1.5
Final simplification6.7
herbie shell --seed 2020001 +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)))