Average Error: 34.7 → 10.1
Time: 5.9s
Precision: 64
\[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\]
\[\begin{array}{l} \mathbf{if}\;b \le -1.244774291407710824026233990502584030865 \cdot 10^{109}:\\ \;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\ \mathbf{elif}\;b \le 6.485606601696406255086078549712143397431 \cdot 10^{-71}:\\ \;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;-1 \cdot \frac{c}{b}\\ \end{array}\]
\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}
\begin{array}{l}
\mathbf{if}\;b \le -1.244774291407710824026233990502584030865 \cdot 10^{109}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\

\mathbf{elif}\;b \le 6.485606601696406255086078549712143397431 \cdot 10^{-71}:\\
\;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\

\mathbf{else}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\

\end{array}
double f(double a, double b, double c) {
        double r55099 = b;
        double r55100 = -r55099;
        double r55101 = r55099 * r55099;
        double r55102 = 4.0;
        double r55103 = a;
        double r55104 = r55102 * r55103;
        double r55105 = c;
        double r55106 = r55104 * r55105;
        double r55107 = r55101 - r55106;
        double r55108 = sqrt(r55107);
        double r55109 = r55100 + r55108;
        double r55110 = 2.0;
        double r55111 = r55110 * r55103;
        double r55112 = r55109 / r55111;
        return r55112;
}

double f(double a, double b, double c) {
        double r55113 = b;
        double r55114 = -1.2447742914077108e+109;
        bool r55115 = r55113 <= r55114;
        double r55116 = 1.0;
        double r55117 = c;
        double r55118 = r55117 / r55113;
        double r55119 = a;
        double r55120 = r55113 / r55119;
        double r55121 = r55118 - r55120;
        double r55122 = r55116 * r55121;
        double r55123 = 6.485606601696406e-71;
        bool r55124 = r55113 <= r55123;
        double r55125 = -r55113;
        double r55126 = r55113 * r55113;
        double r55127 = 4.0;
        double r55128 = r55127 * r55119;
        double r55129 = r55128 * r55117;
        double r55130 = r55126 - r55129;
        double r55131 = sqrt(r55130);
        double r55132 = r55125 + r55131;
        double r55133 = 1.0;
        double r55134 = 2.0;
        double r55135 = r55134 * r55119;
        double r55136 = r55133 / r55135;
        double r55137 = r55132 * r55136;
        double r55138 = -1.0;
        double r55139 = r55138 * r55118;
        double r55140 = r55124 ? r55137 : r55139;
        double r55141 = r55115 ? r55122 : r55140;
        return r55141;
}

Error

Bits error versus a

Bits error versus b

Bits error versus c

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Split input into 3 regimes
  2. if b < -1.2447742914077108e+109

    1. Initial program 49.3

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\]
    2. Taylor expanded around -inf 4.0

      \[\leadsto \color{blue}{1 \cdot \frac{c}{b} - 1 \cdot \frac{b}{a}}\]
    3. Simplified4.0

      \[\leadsto \color{blue}{1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)}\]

    if -1.2447742914077108e+109 < b < 6.485606601696406e-71

    1. Initial program 13.5

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\]
    2. Using strategy rm
    3. Applied div-inv13.6

      \[\leadsto \color{blue}{\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}}\]

    if 6.485606601696406e-71 < b

    1. Initial program 53.3

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\]
    2. Taylor expanded around inf 8.4

      \[\leadsto \color{blue}{-1 \cdot \frac{c}{b}}\]
  3. Recombined 3 regimes into one program.
  4. Final simplification10.1

    \[\leadsto \begin{array}{l} \mathbf{if}\;b \le -1.244774291407710824026233990502584030865 \cdot 10^{109}:\\ \;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\ \mathbf{elif}\;b \le 6.485606601696406255086078549712143397431 \cdot 10^{-71}:\\ \;\;\;\;\left(\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\right) \cdot \frac{1}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;-1 \cdot \frac{c}{b}\\ \end{array}\]

Reproduce

herbie shell --seed 2019353 
(FPCore (a b c)
  :name "Quadratic roots, full range"
  :precision binary64
  (/ (+ (- b) (sqrt (- (* b b) (* (* 4 a) c)))) (* 2 a)))