Average Error: 33.9 → 11.3
Time: 16.5s
Precision: 64
\[\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.869662346631121401645595393947635525169 \cdot 10^{101}:\\ \;\;\;\;-1 \cdot \frac{c}{b}\\ \mathbf{elif}\;b \le 7.455592343308264166675918758902222662503 \cdot 10^{-170}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{\mathsf{fma}\left(b, b, -4 \cdot \left(a \cdot c\right)\right)} - b}\\ \mathbf{else}:\\ \;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\ \end{array}\]
\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.869662346631121401645595393947635525169 \cdot 10^{101}:\\
\;\;\;\;-1 \cdot \frac{c}{b}\\

\mathbf{elif}\;b \le 7.455592343308264166675918758902222662503 \cdot 10^{-170}:\\
\;\;\;\;\frac{2 \cdot c}{\sqrt{\mathsf{fma}\left(b, b, -4 \cdot \left(a \cdot c\right)\right)} - b}\\

\mathbf{else}:\\
\;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\

\end{array}
double f(double a, double b, double c) {
        double r57508 = b;
        double r57509 = -r57508;
        double r57510 = r57508 * r57508;
        double r57511 = 4.0;
        double r57512 = a;
        double r57513 = c;
        double r57514 = r57512 * r57513;
        double r57515 = r57511 * r57514;
        double r57516 = r57510 - r57515;
        double r57517 = sqrt(r57516);
        double r57518 = r57509 - r57517;
        double r57519 = 2.0;
        double r57520 = r57519 * r57512;
        double r57521 = r57518 / r57520;
        return r57521;
}
↓
double f(double a, double b, double c) {
        double r57522 = b;
        double r57523 = -1.8696623466311214e+101;
        bool r57524 = r57522 <= r57523;
        double r57525 = -1.0;
        double r57526 = c;
        double r57527 = r57526 / r57522;
        double r57528 = r57525 * r57527;
        double r57529 = 7.455592343308264e-170;
        bool r57530 = r57522 <= r57529;
        double r57531 = 2.0;
        double r57532 = r57531 * r57526;
        double r57533 = 4.0;
        double r57534 = a;
        double r57535 = r57534 * r57526;
        double r57536 = r57533 * r57535;
        double r57537 = -r57536;
        double r57538 = fma(r57522, r57522, r57537);
        double r57539 = sqrt(r57538);
        double r57540 = r57539 - r57522;
        double r57541 = r57532 / r57540;
        double r57542 = 1.0;
        double r57543 = r57522 / r57534;
        double r57544 = r57527 - r57543;
        double r57545 = r57542 * r57544;
        double r57546 = r57530 ? r57541 : r57545;
        double r57547 = r57524 ? r57528 : r57546;
        return r57547;
}

Error

Bits error versus a

Bits error versus b

Bits error versus c

Target

Original33.9
Target21.1
Herbie11.3
\[\begin{array}{l} \mathbf{if}\;b \lt 0.0:\\ \;\;\;\;\frac{c}{a \cdot \frac{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \end{array}\]

Derivation

  1. Split input into 3 regimes

  2. if b < -1.8696623466311214e+101

    1. Initial program 59.8

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

    2. Taylor expanded around -inf 2.5

      \[\leadsto \color{blue}{-1 \cdot \frac{c}{b}}\]

    if -1.8696623466311214e+101 < b < 7.455592343308264e-170

    1. Initial program 28.9

      \[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]
    2. Using strategy rm

    3. Applied flip--29.1

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

    4. Simplified16.7

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

    5. Simplified16.7

      \[\leadsto \frac{\frac{0 + \left(a \cdot c\right) \cdot 4}{\color{blue}{\sqrt{\mathsf{fma}\left(b, b, -4 \cdot \left(a \cdot c\right)\right)} - b}}}{2 \cdot a}\]
    6. Using strategy rm

    7. Applied div-inv16.7

      \[\leadsto \color{blue}{\frac{0 + \left(a \cdot c\right) \cdot 4}{\sqrt{\mathsf{fma}\left(b, b, -4 \cdot \left(a \cdot c\right)\right)} - b} \cdot \frac{1}{2 \cdot a}}\]
    8. Using strategy rm

    9. Applied associate-*l/16.2

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

    10. Simplified16.1

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

    11. Taylor expanded around 0 11.1

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

    if 7.455592343308264e-170 < b

    1. Initial program 23.0

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

    2. Taylor expanded around inf 17.1

      \[\leadsto \color{blue}{1 \cdot \frac{c}{b} - 1 \cdot \frac{b}{a}}\]

    3. Simplified17.1

      \[\leadsto \color{blue}{1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)}\]
  3. Recombined 3 regimes into one program.

  4. Final simplification11.3

    \[\leadsto \begin{array}{l} \mathbf{if}\;b \le -1.869662346631121401645595393947635525169 \cdot 10^{101}:\\ \;\;\;\;-1 \cdot \frac{c}{b}\\ \mathbf{elif}\;b \le 7.455592343308264166675918758902222662503 \cdot 10^{-170}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{\mathsf{fma}\left(b, b, -4 \cdot \left(a \cdot c\right)\right)} - b}\\ \mathbf{else}:\\ \;\;\;\;1 \cdot \left(\frac{c}{b} - \frac{b}{a}\right)\\ \end{array}\]

Reproduce

herbie shell --seed 2019323 +o rules:numerics
(FPCore (a b c)
  :name "quadm (p42, negative)"
  :precision binary64

  :herbie-target
  (if (< b 0.0) (/ c (* a (/ (+ (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))) (/ (- (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))

  (/ (- (- b) (sqrt (- (* b b) (* 4 (* a c))))) (* 2 a)))