Average Error: 28.8 → 16.5
Time: 16.5s
Precision: 64
\[1.0536712127723509 \cdot 10^{-08} \lt a \lt 94906265.62425156 \land 1.0536712127723509 \cdot 10^{-08} \lt b \lt 94906265.62425156 \land 1.0536712127723509 \cdot 10^{-08} \lt c \lt 94906265.62425156\]
\[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\]
↓
\[\begin{array}{l} \mathbf{if}\;b \le 4913.34068026232:\\ \;\;\;\;\frac{\frac{\left(\left(a \cdot c\right) \cdot -3 + b \cdot b\right) \cdot \sqrt{\left(a \cdot c\right) \cdot -3 + b \cdot b} - b \cdot \left(b \cdot b\right)}{\left(\left(a \cdot c\right) \cdot -3 + b \cdot b\right) + \left(b \cdot b + b \cdot \sqrt{\left(a \cdot c\right) \cdot -3 + b \cdot b}\right)}}{a \cdot 3}\\ \mathbf{else}:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{c}{b}\\ \end{array}\]
\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}
↓
\begin{array}{l}
\mathbf{if}\;b \le 4913.34068026232:\\
\;\;\;\;\frac{\frac{\left(\left(a \cdot c\right) \cdot -3 + b \cdot b\right) \cdot \sqrt{\left(a \cdot c\right) \cdot -3 + b \cdot b} - b \cdot \left(b \cdot b\right)}{\left(\left(a \cdot c\right) \cdot -3 + b \cdot b\right) + \left(b \cdot b + b \cdot \sqrt{\left(a \cdot c\right) \cdot -3 + b \cdot b}\right)}}{a \cdot 3}\\

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

\end{array}
double f(double a, double b, double c, double __attribute__((unused)) d) {
        double r2425146 = b;
        double r2425147 = -r2425146;
        double r2425148 = r2425146 * r2425146;
        double r2425149 = 3.0;
        double r2425150 = a;
        double r2425151 = r2425149 * r2425150;
        double r2425152 = c;
        double r2425153 = r2425151 * r2425152;
        double r2425154 = r2425148 - r2425153;
        double r2425155 = sqrt(r2425154);
        double r2425156 = r2425147 + r2425155;
        double r2425157 = r2425156 / r2425151;
        return r2425157;
}
↓
double f(double a, double b, double c, double __attribute__((unused)) d) {
        double r2425158 = b;
        double r2425159 = 4913.34068026232;
        bool r2425160 = r2425158 <= r2425159;
        double r2425161 = a;
        double r2425162 = c;
        double r2425163 = r2425161 * r2425162;
        double r2425164 = -3.0;
        double r2425165 = r2425163 * r2425164;
        double r2425166 = r2425158 * r2425158;
        double r2425167 = r2425165 + r2425166;
        double r2425168 = sqrt(r2425167);
        double r2425169 = r2425167 * r2425168;
        double r2425170 = r2425158 * r2425166;
        double r2425171 = r2425169 - r2425170;
        double r2425172 = r2425158 * r2425168;
        double r2425173 = r2425166 + r2425172;
        double r2425174 = r2425167 + r2425173;
        double r2425175 = r2425171 / r2425174;
        double r2425176 = 3.0;
        double r2425177 = r2425161 * r2425176;
        double r2425178 = r2425175 / r2425177;
        double r2425179 = -0.5;
        double r2425180 = r2425162 / r2425158;
        double r2425181 = r2425179 * r2425180;
        double r2425182 = r2425160 ? r2425178 : r2425181;
        return r2425182;
}

Error

Bits error versus a

Bits error versus b

Bits error versus c

Bits error versus d

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Split input into 2 regimes

  2. if b < 4913.34068026232

    1. Initial program 18.8

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\]

    2. Simplified18.8

      \[\leadsto \color{blue}{\frac{\sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c} - b}{3 \cdot a}}\]
    3. Using strategy rm

    4. Applied flip3--18.9

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

    5. Simplified18.2

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

    6. Simplified18.2

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

    if 4913.34068026232 < b

    1. Initial program 38.2

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}\]

    2. Simplified38.2

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

    3. Taylor expanded around inf 14.8

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

  4. Final simplification16.5

    \[\leadsto \begin{array}{l} \mathbf{if}\;b \le 4913.34068026232:\\ \;\;\;\;\frac{\frac{\left(\left(a \cdot c\right) \cdot -3 + b \cdot b\right) \cdot \sqrt{\left(a \cdot c\right) \cdot -3 + b \cdot b} - b \cdot \left(b \cdot b\right)}{\left(\left(a \cdot c\right) \cdot -3 + b \cdot b\right) + \left(b \cdot b + b \cdot \sqrt{\left(a \cdot c\right) \cdot -3 + b \cdot b}\right)}}{a \cdot 3}\\ \mathbf{else}:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{c}{b}\\ \end{array}\]

Reproduce

herbie shell --seed 2019129 
(FPCore (a b c d)
  :name "Cubic critical, narrow range"
  :pre (and (< 1.0536712127723509e-08 a 94906265.62425156) (< 1.0536712127723509e-08 b 94906265.62425156) (< 1.0536712127723509e-08 c 94906265.62425156))
  (/ (+ (- b) (sqrt (- (* b b) (* (* 3 a) c)))) (* 3 a)))