Quadratic roots, narrow range

Percentage Accurate: 55.3% → 91.0%
Time: 16.0s
Alternatives: 13
Speedup: 29.0×

Specification

?
\[\left(\left(1.0536712127723509 \cdot 10^{-8} < a \land a < 94906265.62425156\right) \land \left(1.0536712127723509 \cdot 10^{-8} < b \land b < 94906265.62425156\right)\right) \land \left(1.0536712127723509 \cdot 10^{-8} < c \land c < 94906265.62425156\right)\]
\[\begin{array}{l} \\ \frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (/ (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)))
double code(double a, double b, double c) {
	return (-b + sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
}
real(8) function code(a, b, c)
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = (-b + sqrt(((b * b) - ((4.0d0 * a) * c)))) / (2.0d0 * a)
end function
public static double code(double a, double b, double c) {
	return (-b + Math.sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
}
def code(a, b, c):
	return (-b + math.sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a)
function code(a, b, c)
	return Float64(Float64(Float64(-b) + sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))) / Float64(2.0 * a))
end
function tmp = code(a, b, c)
	tmp = (-b + sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
end
code[a_, b_, c_] := N[(N[((-b) + N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(4.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}
\end{array}

Sampling outcomes in binary64 precision:

Local Percentage Accuracy vs ?

The average percentage accuracy by input value. Horizontal axis shows value of an input variable; the variable is choosen in the title. Vertical axis is accuracy; higher is better. Red represent the original program, while blue represents Herbie's suggestion. These can be toggled with buttons below the plot. The line is an average while dots represent individual samples.

Accuracy vs Speed?

Herbie found 13 alternatives:

AlternativeAccuracySpeedup
The accuracy (vertical axis) and speed (horizontal axis) of each alternatives. Up and to the right is better. The red square shows the initial program, and each blue circle shows an alternative.The line shows the best available speed-accuracy tradeoffs.

Initial Program: 55.3% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (/ (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)))
double code(double a, double b, double c) {
	return (-b + sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
}
real(8) function code(a, b, c)
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = (-b + sqrt(((b * b) - ((4.0d0 * a) * c)))) / (2.0d0 * a)
end function
public static double code(double a, double b, double c) {
	return (-b + Math.sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
}
def code(a, b, c):
	return (-b + math.sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a)
function code(a, b, c)
	return Float64(Float64(Float64(-b) + sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))) / Float64(2.0 * a))
end
function tmp = code(a, b, c)
	tmp = (-b + sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
end
code[a_, b_, c_] := N[(N[((-b) + N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(4.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}
\end{array}

Alternative 1: 91.0% accurate, 0.2× speedup?

\[\begin{array}{l} \\ a \cdot \left(a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right) - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (-
  (*
   a
   (-
    (*
     a
     (+
      (* -2.0 (/ (pow c 3.0) (pow b 5.0)))
      (* -5.0 (/ (* a (pow c 4.0)) (pow b 7.0)))))
    (/ (pow c 2.0) (pow b 3.0))))
  (/ c b)))
double code(double a, double b, double c) {
	return (a * ((a * ((-2.0 * (pow(c, 3.0) / pow(b, 5.0))) + (-5.0 * ((a * pow(c, 4.0)) / pow(b, 7.0))))) - (pow(c, 2.0) / pow(b, 3.0)))) - (c / b);
}
real(8) function code(a, b, c)
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = (a * ((a * (((-2.0d0) * ((c ** 3.0d0) / (b ** 5.0d0))) + ((-5.0d0) * ((a * (c ** 4.0d0)) / (b ** 7.0d0))))) - ((c ** 2.0d0) / (b ** 3.0d0)))) - (c / b)
end function
public static double code(double a, double b, double c) {
	return (a * ((a * ((-2.0 * (Math.pow(c, 3.0) / Math.pow(b, 5.0))) + (-5.0 * ((a * Math.pow(c, 4.0)) / Math.pow(b, 7.0))))) - (Math.pow(c, 2.0) / Math.pow(b, 3.0)))) - (c / b);
}
def code(a, b, c):
	return (a * ((a * ((-2.0 * (math.pow(c, 3.0) / math.pow(b, 5.0))) + (-5.0 * ((a * math.pow(c, 4.0)) / math.pow(b, 7.0))))) - (math.pow(c, 2.0) / math.pow(b, 3.0)))) - (c / b)
function code(a, b, c)
	return Float64(Float64(a * Float64(Float64(a * Float64(Float64(-2.0 * Float64((c ^ 3.0) / (b ^ 5.0))) + Float64(-5.0 * Float64(Float64(a * (c ^ 4.0)) / (b ^ 7.0))))) - Float64((c ^ 2.0) / (b ^ 3.0)))) - Float64(c / b))
end
function tmp = code(a, b, c)
	tmp = (a * ((a * ((-2.0 * ((c ^ 3.0) / (b ^ 5.0))) + (-5.0 * ((a * (c ^ 4.0)) / (b ^ 7.0))))) - ((c ^ 2.0) / (b ^ 3.0)))) - (c / b);
end
code[a_, b_, c_] := N[(N[(a * N[(N[(a * N[(N[(-2.0 * N[(N[Power[c, 3.0], $MachinePrecision] / N[Power[b, 5.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-5.0 * N[(N[(a * N[Power[c, 4.0], $MachinePrecision]), $MachinePrecision] / N[Power[b, 7.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[Power[c, 2.0], $MachinePrecision] / N[Power[b, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(c / b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
a \cdot \left(a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right) - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}
\end{array}
Derivation
  1. Initial program 56.3%

    \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
  2. Step-by-step derivation
    1. *-commutative56.3%

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

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

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

      \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
    5. sqr-neg56.3%

      \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
    6. fma-neg56.4%

      \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
    7. distribute-lft-neg-in56.4%

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

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

      \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
    10. distribute-rgt-neg-in56.4%

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

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

    \[\leadsto \color{blue}{\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}} \]
  4. Add Preprocessing
  5. Taylor expanded in a around 0 91.9%

    \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} + a \cdot \left(-1 \cdot \frac{{c}^{2}}{{b}^{3}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -0.25 \cdot \frac{a \cdot \left(4 \cdot \frac{{c}^{4}}{{b}^{6}} + 16 \cdot \frac{{c}^{4}}{{b}^{6}}\right)}{b}\right)\right)} \]
  6. Taylor expanded in c around 0 91.9%

    \[\leadsto -1 \cdot \frac{c}{b} + a \cdot \left(-1 \cdot \frac{{c}^{2}}{{b}^{3}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + \color{blue}{-5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}}\right)\right) \]
  7. Step-by-step derivation
    1. associate-*r/91.9%

      \[\leadsto \color{blue}{\frac{-1 \cdot c}{b}} + a \cdot \left(-1 \cdot \frac{{c}^{2}}{{b}^{3}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right)\right) \]
    2. neg-mul-191.9%

      \[\leadsto \frac{\color{blue}{-c}}{b} + a \cdot \left(-1 \cdot \frac{{c}^{2}}{{b}^{3}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right)\right) \]
  8. Applied egg-rr91.9%

    \[\leadsto \color{blue}{\frac{-c}{b}} + a \cdot \left(-1 \cdot \frac{{c}^{2}}{{b}^{3}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right)\right) \]
  9. Step-by-step derivation
    1. associate-*r/91.9%

      \[\leadsto \frac{-c}{b} + a \cdot \left(\color{blue}{\frac{-1 \cdot {c}^{2}}{{b}^{3}}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right)\right) \]
  10. Applied egg-rr91.9%

    \[\leadsto \frac{-c}{b} + a \cdot \left(\color{blue}{\frac{-1 \cdot {c}^{2}}{{b}^{3}}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right)\right) \]
  11. Step-by-step derivation
    1. mul-1-neg91.9%

      \[\leadsto \frac{-c}{b} + a \cdot \left(\frac{\color{blue}{-{c}^{2}}}{{b}^{3}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right)\right) \]
  12. Simplified91.9%

    \[\leadsto \frac{-c}{b} + a \cdot \left(\color{blue}{\frac{-{c}^{2}}{{b}^{3}}} + a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right)\right) \]
  13. Final simplification91.9%

    \[\leadsto a \cdot \left(a \cdot \left(-2 \cdot \frac{{c}^{3}}{{b}^{5}} + -5 \cdot \frac{a \cdot {c}^{4}}{{b}^{7}}\right) - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b} \]
  14. Add Preprocessing

Alternative 2: 90.1% accurate, 0.2× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := {b}^{2} - 4 \cdot \left(c \cdot a\right)\\ \mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -10:\\ \;\;\;\;\frac{\frac{t\_0 - {\left(-b\right)}^{2}}{b + \sqrt{t\_0}}}{a \cdot 2}\\ \mathbf{else}:\\ \;\;\;\;a \cdot \left(\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}\\ \end{array} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (let* ((t_0 (- (pow b 2.0) (* 4.0 (* c a)))))
   (if (<= (/ (- (sqrt (- (* b b) (* c (* a 4.0)))) b) (* a 2.0)) -10.0)
     (/ (/ (- t_0 (pow (- b) 2.0)) (+ b (sqrt t_0))) (* a 2.0))
     (-
      (*
       a
       (-
        (/ (* -2.0 (* a (pow c 3.0))) (pow b 5.0))
        (/ (pow c 2.0) (pow b 3.0))))
      (/ c b)))))
double code(double a, double b, double c) {
	double t_0 = pow(b, 2.0) - (4.0 * (c * a));
	double tmp;
	if (((sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0)) <= -10.0) {
		tmp = ((t_0 - pow(-b, 2.0)) / (b + sqrt(t_0))) / (a * 2.0);
	} else {
		tmp = (a * (((-2.0 * (a * pow(c, 3.0))) / pow(b, 5.0)) - (pow(c, 2.0) / pow(b, 3.0)))) - (c / b);
	}
	return tmp;
}
real(8) function code(a, b, c)
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_0
    real(8) :: tmp
    t_0 = (b ** 2.0d0) - (4.0d0 * (c * a))
    if (((sqrt(((b * b) - (c * (a * 4.0d0)))) - b) / (a * 2.0d0)) <= (-10.0d0)) then
        tmp = ((t_0 - (-b ** 2.0d0)) / (b + sqrt(t_0))) / (a * 2.0d0)
    else
        tmp = (a * ((((-2.0d0) * (a * (c ** 3.0d0))) / (b ** 5.0d0)) - ((c ** 2.0d0) / (b ** 3.0d0)))) - (c / b)
    end if
    code = tmp
end function
public static double code(double a, double b, double c) {
	double t_0 = Math.pow(b, 2.0) - (4.0 * (c * a));
	double tmp;
	if (((Math.sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0)) <= -10.0) {
		tmp = ((t_0 - Math.pow(-b, 2.0)) / (b + Math.sqrt(t_0))) / (a * 2.0);
	} else {
		tmp = (a * (((-2.0 * (a * Math.pow(c, 3.0))) / Math.pow(b, 5.0)) - (Math.pow(c, 2.0) / Math.pow(b, 3.0)))) - (c / b);
	}
	return tmp;
}
def code(a, b, c):
	t_0 = math.pow(b, 2.0) - (4.0 * (c * a))
	tmp = 0
	if ((math.sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0)) <= -10.0:
		tmp = ((t_0 - math.pow(-b, 2.0)) / (b + math.sqrt(t_0))) / (a * 2.0)
	else:
		tmp = (a * (((-2.0 * (a * math.pow(c, 3.0))) / math.pow(b, 5.0)) - (math.pow(c, 2.0) / math.pow(b, 3.0)))) - (c / b)
	return tmp
function code(a, b, c)
	t_0 = Float64((b ^ 2.0) - Float64(4.0 * Float64(c * a)))
	tmp = 0.0
	if (Float64(Float64(sqrt(Float64(Float64(b * b) - Float64(c * Float64(a * 4.0)))) - b) / Float64(a * 2.0)) <= -10.0)
		tmp = Float64(Float64(Float64(t_0 - (Float64(-b) ^ 2.0)) / Float64(b + sqrt(t_0))) / Float64(a * 2.0));
	else
		tmp = Float64(Float64(a * Float64(Float64(Float64(-2.0 * Float64(a * (c ^ 3.0))) / (b ^ 5.0)) - Float64((c ^ 2.0) / (b ^ 3.0)))) - Float64(c / b));
	end
	return tmp
end
function tmp_2 = code(a, b, c)
	t_0 = (b ^ 2.0) - (4.0 * (c * a));
	tmp = 0.0;
	if (((sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0)) <= -10.0)
		tmp = ((t_0 - (-b ^ 2.0)) / (b + sqrt(t_0))) / (a * 2.0);
	else
		tmp = (a * (((-2.0 * (a * (c ^ 3.0))) / (b ^ 5.0)) - ((c ^ 2.0) / (b ^ 3.0)))) - (c / b);
	end
	tmp_2 = tmp;
end
code[a_, b_, c_] := Block[{t$95$0 = N[(N[Power[b, 2.0], $MachinePrecision] - N[(4.0 * N[(c * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(c * N[(a * 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision], -10.0], N[(N[(N[(t$95$0 - N[Power[(-b), 2.0], $MachinePrecision]), $MachinePrecision] / N[(b + N[Sqrt[t$95$0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision], N[(N[(a * N[(N[(N[(-2.0 * N[(a * N[Power[c, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[Power[b, 5.0], $MachinePrecision]), $MachinePrecision] - N[(N[Power[c, 2.0], $MachinePrecision] / N[Power[b, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(c / b), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := {b}^{2} - 4 \cdot \left(c \cdot a\right)\\
\mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -10:\\
\;\;\;\;\frac{\frac{t\_0 - {\left(-b\right)}^{2}}{b + \sqrt{t\_0}}}{a \cdot 2}\\

\mathbf{else}:\\
\;\;\;\;a \cdot \left(\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)) < -10

    1. Initial program 83.1%

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
    2. Step-by-step derivation
      1. *-commutative83.1%

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

      \[\leadsto \color{blue}{\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot 2}} \]
    4. Add Preprocessing
    5. Step-by-step derivation
      1. pow283.1%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
      2. pow-to-exp80.1%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    6. Applied egg-rr80.1%

      \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    7. Step-by-step derivation
      1. flip-+79.6%

        \[\leadsto \frac{\color{blue}{\frac{\left(-b\right) \cdot \left(-b\right) - \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c} \cdot \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c}}{\left(-b\right) - \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c}}}}{a \cdot 2} \]
      2. pow279.6%

        \[\leadsto \frac{\frac{\color{blue}{{\left(-b\right)}^{2}} - \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c} \cdot \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c}}{\left(-b\right) - \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c}}}{a \cdot 2} \]
      3. add-sqr-sqrt79.7%

        \[\leadsto \frac{\frac{{\left(-b\right)}^{2} - \color{blue}{\left(e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c\right)}}{\left(-b\right) - \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c}}}{a \cdot 2} \]
      4. exp-to-pow84.4%

        \[\leadsto \frac{\frac{{\left(-b\right)}^{2} - \left(\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c\right)}{\left(-b\right) - \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c}}}{a \cdot 2} \]
      5. associate-*l*84.4%

        \[\leadsto \frac{\frac{{\left(-b\right)}^{2} - \left({b}^{2} - \color{blue}{4 \cdot \left(a \cdot c\right)}\right)}{\left(-b\right) - \sqrt{e^{\log b \cdot 2} - \left(4 \cdot a\right) \cdot c}}}{a \cdot 2} \]
      6. exp-to-pow84.5%

        \[\leadsto \frac{\frac{{\left(-b\right)}^{2} - \left({b}^{2} - 4 \cdot \left(a \cdot c\right)\right)}{\left(-b\right) - \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}}{a \cdot 2} \]
      7. associate-*l*84.5%

        \[\leadsto \frac{\frac{{\left(-b\right)}^{2} - \left({b}^{2} - 4 \cdot \left(a \cdot c\right)\right)}{\left(-b\right) - \sqrt{{b}^{2} - \color{blue}{4 \cdot \left(a \cdot c\right)}}}}{a \cdot 2} \]
    8. Applied egg-rr84.5%

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

    if -10 < (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a))

    1. Initial program 52.6%

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
    2. Step-by-step derivation
      1. *-commutative52.6%

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

      \[\leadsto \color{blue}{\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot 2}} \]
    4. Add Preprocessing
    5. Step-by-step derivation
      1. pow252.6%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
      2. pow-to-exp49.5%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    6. Applied egg-rr49.5%

      \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    7. Taylor expanded in a around 0 90.8%

      \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} + a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right)} \]
    8. Step-by-step derivation
      1. neg-mul-190.8%

        \[\leadsto \color{blue}{\left(-\frac{c}{b}\right)} + a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) \]
      2. distribute-frac-neg290.8%

        \[\leadsto \color{blue}{\frac{c}{-b}} + a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) \]
      3. +-commutative90.8%

        \[\leadsto \color{blue}{a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) + \frac{c}{-b}} \]
      4. distribute-frac-neg290.8%

        \[\leadsto a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) + \color{blue}{\left(-\frac{c}{b}\right)} \]
      5. unsub-neg90.8%

        \[\leadsto \color{blue}{a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}} \]
      6. mul-1-neg90.8%

        \[\leadsto a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + \color{blue}{\left(-\frac{{c}^{2}}{{b}^{3}}\right)}\right) - \frac{c}{b} \]
      7. unsub-neg90.8%

        \[\leadsto a \cdot \color{blue}{\left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right)} - \frac{c}{b} \]
      8. associate-*r/90.8%

        \[\leadsto a \cdot \left(\color{blue}{\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b} \]
    9. Simplified90.8%

      \[\leadsto \color{blue}{a \cdot \left(\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification90.1%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -10:\\ \;\;\;\;\frac{\frac{\left({b}^{2} - 4 \cdot \left(c \cdot a\right)\right) - {\left(-b\right)}^{2}}{b + \sqrt{{b}^{2} - 4 \cdot \left(c \cdot a\right)}}}{a \cdot 2}\\ \mathbf{else}:\\ \;\;\;\;a \cdot \left(\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}\\ \end{array} \]
  5. Add Preprocessing

Alternative 3: 88.0% accurate, 0.3× speedup?

\[\begin{array}{l} \\ \frac{\frac{{c}^{3} \cdot \left(-2 \cdot {a}^{2}\right)}{{b}^{4}} - c}{b} - \frac{a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (-
  (/ (- (/ (* (pow c 3.0) (* -2.0 (pow a 2.0))) (pow b 4.0)) c) b)
  (/ (* a (pow (/ c (- b)) 2.0)) b)))
double code(double a, double b, double c) {
	return ((((pow(c, 3.0) * (-2.0 * pow(a, 2.0))) / pow(b, 4.0)) - c) / b) - ((a * pow((c / -b), 2.0)) / b);
}
real(8) function code(a, b, c)
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = (((((c ** 3.0d0) * ((-2.0d0) * (a ** 2.0d0))) / (b ** 4.0d0)) - c) / b) - ((a * ((c / -b) ** 2.0d0)) / b)
end function
public static double code(double a, double b, double c) {
	return ((((Math.pow(c, 3.0) * (-2.0 * Math.pow(a, 2.0))) / Math.pow(b, 4.0)) - c) / b) - ((a * Math.pow((c / -b), 2.0)) / b);
}
def code(a, b, c):
	return ((((math.pow(c, 3.0) * (-2.0 * math.pow(a, 2.0))) / math.pow(b, 4.0)) - c) / b) - ((a * math.pow((c / -b), 2.0)) / b)
function code(a, b, c)
	return Float64(Float64(Float64(Float64(Float64((c ^ 3.0) * Float64(-2.0 * (a ^ 2.0))) / (b ^ 4.0)) - c) / b) - Float64(Float64(a * (Float64(c / Float64(-b)) ^ 2.0)) / b))
end
function tmp = code(a, b, c)
	tmp = (((((c ^ 3.0) * (-2.0 * (a ^ 2.0))) / (b ^ 4.0)) - c) / b) - ((a * ((c / -b) ^ 2.0)) / b);
end
code[a_, b_, c_] := N[(N[(N[(N[(N[(N[Power[c, 3.0], $MachinePrecision] * N[(-2.0 * N[Power[a, 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[Power[b, 4.0], $MachinePrecision]), $MachinePrecision] - c), $MachinePrecision] / b), $MachinePrecision] - N[(N[(a * N[Power[N[(c / (-b)), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\frac{{c}^{3} \cdot \left(-2 \cdot {a}^{2}\right)}{{b}^{4}} - c}{b} - \frac{a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b}
\end{array}
Derivation
  1. Initial program 56.3%

    \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
  2. Step-by-step derivation
    1. *-commutative56.3%

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

    \[\leadsto \color{blue}{\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot 2}} \]
  4. Add Preprocessing
  5. Step-by-step derivation
    1. pow256.3%

      \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    2. pow-to-exp53.2%

      \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
  6. Applied egg-rr53.2%

    \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
  7. Taylor expanded in b around inf 88.3%

    \[\leadsto \color{blue}{\frac{-2 \cdot \frac{{a}^{2} \cdot {c}^{3}}{{b}^{4}} + \left(-1 \cdot c + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{2}}\right)}{b}} \]
  8. Step-by-step derivation
    1. Simplified88.3%

      \[\leadsto \color{blue}{\frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b}} \]
    2. Step-by-step derivation
      1. div-sub88.4%

        \[\leadsto \color{blue}{\frac{-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c}{b} - \frac{a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b}} \]
      2. associate-*r/88.4%

        \[\leadsto \frac{\color{blue}{\frac{-2 \cdot \left({c}^{3} \cdot {a}^{2}\right)}{{b}^{4}}} - c}{b} - \frac{a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b} \]
      3. *-commutative88.4%

        \[\leadsto \frac{\frac{-2 \cdot \color{blue}{\left({a}^{2} \cdot {c}^{3}\right)}}{{b}^{4}} - c}{b} - \frac{a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b} \]
      4. associate-*r*88.4%

        \[\leadsto \frac{\frac{\color{blue}{\left(-2 \cdot {a}^{2}\right) \cdot {c}^{3}}}{{b}^{4}} - c}{b} - \frac{a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b} \]
    3. Applied egg-rr88.4%

      \[\leadsto \color{blue}{\frac{\frac{\left(-2 \cdot {a}^{2}\right) \cdot {c}^{3}}{{b}^{4}} - c}{b} - \frac{a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b}} \]
    4. Final simplification88.4%

      \[\leadsto \frac{\frac{{c}^{3} \cdot \left(-2 \cdot {a}^{2}\right)}{{b}^{4}} - c}{b} - \frac{a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b} \]
    5. Add Preprocessing

    Alternative 4: 88.0% accurate, 0.3× speedup?

    \[\begin{array}{l} \\ a \cdot \left(\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b} \end{array} \]
    (FPCore (a b c)
     :precision binary64
     (-
      (*
       a
       (- (/ (* -2.0 (* a (pow c 3.0))) (pow b 5.0)) (/ (pow c 2.0) (pow b 3.0))))
      (/ c b)))
    double code(double a, double b, double c) {
    	return (a * (((-2.0 * (a * pow(c, 3.0))) / pow(b, 5.0)) - (pow(c, 2.0) / pow(b, 3.0)))) - (c / b);
    }
    
    real(8) function code(a, b, c)
        real(8), intent (in) :: a
        real(8), intent (in) :: b
        real(8), intent (in) :: c
        code = (a * ((((-2.0d0) * (a * (c ** 3.0d0))) / (b ** 5.0d0)) - ((c ** 2.0d0) / (b ** 3.0d0)))) - (c / b)
    end function
    
    public static double code(double a, double b, double c) {
    	return (a * (((-2.0 * (a * Math.pow(c, 3.0))) / Math.pow(b, 5.0)) - (Math.pow(c, 2.0) / Math.pow(b, 3.0)))) - (c / b);
    }
    
    def code(a, b, c):
    	return (a * (((-2.0 * (a * math.pow(c, 3.0))) / math.pow(b, 5.0)) - (math.pow(c, 2.0) / math.pow(b, 3.0)))) - (c / b)
    
    function code(a, b, c)
    	return Float64(Float64(a * Float64(Float64(Float64(-2.0 * Float64(a * (c ^ 3.0))) / (b ^ 5.0)) - Float64((c ^ 2.0) / (b ^ 3.0)))) - Float64(c / b))
    end
    
    function tmp = code(a, b, c)
    	tmp = (a * (((-2.0 * (a * (c ^ 3.0))) / (b ^ 5.0)) - ((c ^ 2.0) / (b ^ 3.0)))) - (c / b);
    end
    
    code[a_, b_, c_] := N[(N[(a * N[(N[(N[(-2.0 * N[(a * N[Power[c, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[Power[b, 5.0], $MachinePrecision]), $MachinePrecision] - N[(N[Power[c, 2.0], $MachinePrecision] / N[Power[b, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(c / b), $MachinePrecision]), $MachinePrecision]
    
    \begin{array}{l}
    
    \\
    a \cdot \left(\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}
    \end{array}
    
    Derivation
    1. Initial program 56.3%

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
    2. Step-by-step derivation
      1. *-commutative56.3%

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

      \[\leadsto \color{blue}{\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot 2}} \]
    4. Add Preprocessing
    5. Step-by-step derivation
      1. pow256.3%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
      2. pow-to-exp53.2%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    6. Applied egg-rr53.2%

      \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    7. Taylor expanded in a around 0 88.4%

      \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} + a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right)} \]
    8. Step-by-step derivation
      1. neg-mul-188.4%

        \[\leadsto \color{blue}{\left(-\frac{c}{b}\right)} + a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) \]
      2. distribute-frac-neg288.4%

        \[\leadsto \color{blue}{\frac{c}{-b}} + a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) \]
      3. +-commutative88.4%

        \[\leadsto \color{blue}{a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) + \frac{c}{-b}} \]
      4. distribute-frac-neg288.4%

        \[\leadsto a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) + \color{blue}{\left(-\frac{c}{b}\right)} \]
      5. unsub-neg88.4%

        \[\leadsto \color{blue}{a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + -1 \cdot \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}} \]
      6. mul-1-neg88.4%

        \[\leadsto a \cdot \left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} + \color{blue}{\left(-\frac{{c}^{2}}{{b}^{3}}\right)}\right) - \frac{c}{b} \]
      7. unsub-neg88.4%

        \[\leadsto a \cdot \color{blue}{\left(-2 \cdot \frac{a \cdot {c}^{3}}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right)} - \frac{c}{b} \]
      8. associate-*r/88.4%

        \[\leadsto a \cdot \left(\color{blue}{\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b} \]
    9. Simplified88.4%

      \[\leadsto \color{blue}{a \cdot \left(\frac{-2 \cdot \left(a \cdot {c}^{3}\right)}{{b}^{5}} - \frac{{c}^{2}}{{b}^{3}}\right) - \frac{c}{b}} \]
    10. Add Preprocessing

    Alternative 5: 85.1% accurate, 0.3× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -2.2:\\ \;\;\;\;\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}\\ \end{array} \end{array} \]
    (FPCore (a b c)
     :precision binary64
     (if (<= (/ (- (sqrt (- (* b b) (* c (* a 4.0)))) b) (* a 2.0)) -2.2)
       (/ (- (sqrt (fma b b (* c (* a -4.0)))) b) (* a 2.0))
       (- (/ c (- b)) (* a (/ (pow c 2.0) (pow b 3.0))))))
    double code(double a, double b, double c) {
    	double tmp;
    	if (((sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0)) <= -2.2) {
    		tmp = (sqrt(fma(b, b, (c * (a * -4.0)))) - b) / (a * 2.0);
    	} else {
    		tmp = (c / -b) - (a * (pow(c, 2.0) / pow(b, 3.0)));
    	}
    	return tmp;
    }
    
    function code(a, b, c)
    	tmp = 0.0
    	if (Float64(Float64(sqrt(Float64(Float64(b * b) - Float64(c * Float64(a * 4.0)))) - b) / Float64(a * 2.0)) <= -2.2)
    		tmp = Float64(Float64(sqrt(fma(b, b, Float64(c * Float64(a * -4.0)))) - b) / Float64(a * 2.0));
    	else
    		tmp = Float64(Float64(c / Float64(-b)) - Float64(a * Float64((c ^ 2.0) / (b ^ 3.0))));
    	end
    	return tmp
    end
    
    code[a_, b_, c_] := If[LessEqual[N[(N[(N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(c * N[(a * 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision], -2.2], N[(N[(N[Sqrt[N[(b * b + N[(c * N[(a * -4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision], N[(N[(c / (-b)), $MachinePrecision] - N[(a * N[(N[Power[c, 2.0], $MachinePrecision] / N[Power[b, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    \mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -2.2:\\
    \;\;\;\;\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)) < -2.2000000000000002

      1. Initial program 82.3%

        \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
      2. Step-by-step derivation
        1. *-commutative82.3%

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

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

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

          \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
        5. sqr-neg82.3%

          \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
        6. fma-neg82.4%

          \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
        7. distribute-lft-neg-in82.4%

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

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

          \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
        10. distribute-rgt-neg-in82.4%

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

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

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

      if -2.2000000000000002 < (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a))

      1. Initial program 52.0%

        \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
      2. Step-by-step derivation
        1. *-commutative52.0%

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

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

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

          \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
        5. sqr-neg52.0%

          \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
        6. fma-neg52.1%

          \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
        7. distribute-lft-neg-in52.1%

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

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

          \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
        10. distribute-rgt-neg-in52.1%

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

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

        \[\leadsto \color{blue}{\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}} \]
      4. Add Preprocessing
      5. Taylor expanded in a around 0 84.8%

        \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
      6. Step-by-step derivation
        1. mul-1-neg84.8%

          \[\leadsto -1 \cdot \frac{c}{b} + \color{blue}{\left(-\frac{a \cdot {c}^{2}}{{b}^{3}}\right)} \]
        2. unsub-neg84.8%

          \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} - \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
        3. mul-1-neg84.8%

          \[\leadsto \color{blue}{\left(-\frac{c}{b}\right)} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
        4. distribute-neg-frac284.8%

          \[\leadsto \color{blue}{\frac{c}{-b}} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
        5. associate-/l*84.8%

          \[\leadsto \frac{c}{-b} - \color{blue}{a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
      7. Simplified84.8%

        \[\leadsto \color{blue}{\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
    3. Recombined 2 regimes into one program.
    4. Final simplification84.4%

      \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -2.2:\\ \;\;\;\;\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}\\ \end{array} \]
    5. Add Preprocessing

    Alternative 6: 87.9% accurate, 0.3× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{-1 - \left(c + -1\right)}{b}\\ \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \left(t\_0 \cdot t\_0\right)}{b} \end{array} \end{array} \]
    (FPCore (a b c)
     :precision binary64
     (let* ((t_0 (/ (- -1.0 (+ c -1.0)) b)))
       (/
        (-
         (- (* -2.0 (/ (* (pow c 3.0) (pow a 2.0)) (pow b 4.0))) c)
         (* a (* t_0 t_0)))
        b)))
    double code(double a, double b, double c) {
    	double t_0 = (-1.0 - (c + -1.0)) / b;
    	return (((-2.0 * ((pow(c, 3.0) * pow(a, 2.0)) / pow(b, 4.0))) - c) - (a * (t_0 * t_0))) / b;
    }
    
    real(8) function code(a, b, c)
        real(8), intent (in) :: a
        real(8), intent (in) :: b
        real(8), intent (in) :: c
        real(8) :: t_0
        t_0 = ((-1.0d0) - (c + (-1.0d0))) / b
        code = ((((-2.0d0) * (((c ** 3.0d0) * (a ** 2.0d0)) / (b ** 4.0d0))) - c) - (a * (t_0 * t_0))) / b
    end function
    
    public static double code(double a, double b, double c) {
    	double t_0 = (-1.0 - (c + -1.0)) / b;
    	return (((-2.0 * ((Math.pow(c, 3.0) * Math.pow(a, 2.0)) / Math.pow(b, 4.0))) - c) - (a * (t_0 * t_0))) / b;
    }
    
    def code(a, b, c):
    	t_0 = (-1.0 - (c + -1.0)) / b
    	return (((-2.0 * ((math.pow(c, 3.0) * math.pow(a, 2.0)) / math.pow(b, 4.0))) - c) - (a * (t_0 * t_0))) / b
    
    function code(a, b, c)
    	t_0 = Float64(Float64(-1.0 - Float64(c + -1.0)) / b)
    	return Float64(Float64(Float64(Float64(-2.0 * Float64(Float64((c ^ 3.0) * (a ^ 2.0)) / (b ^ 4.0))) - c) - Float64(a * Float64(t_0 * t_0))) / b)
    end
    
    function tmp = code(a, b, c)
    	t_0 = (-1.0 - (c + -1.0)) / b;
    	tmp = (((-2.0 * (((c ^ 3.0) * (a ^ 2.0)) / (b ^ 4.0))) - c) - (a * (t_0 * t_0))) / b;
    end
    
    code[a_, b_, c_] := Block[{t$95$0 = N[(N[(-1.0 - N[(c + -1.0), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]}, N[(N[(N[(N[(-2.0 * N[(N[(N[Power[c, 3.0], $MachinePrecision] * N[Power[a, 2.0], $MachinePrecision]), $MachinePrecision] / N[Power[b, 4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - c), $MachinePrecision] - N[(a * N[(t$95$0 * t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \frac{-1 - \left(c + -1\right)}{b}\\
    \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \left(t\_0 \cdot t\_0\right)}{b}
    \end{array}
    \end{array}
    
    Derivation
    1. Initial program 56.3%

      \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
    2. Step-by-step derivation
      1. *-commutative56.3%

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

      \[\leadsto \color{blue}{\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot 2}} \]
    4. Add Preprocessing
    5. Step-by-step derivation
      1. pow256.3%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
      2. pow-to-exp53.2%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    6. Applied egg-rr53.2%

      \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
    7. Taylor expanded in b around inf 88.3%

      \[\leadsto \color{blue}{\frac{-2 \cdot \frac{{a}^{2} \cdot {c}^{3}}{{b}^{4}} + \left(-1 \cdot c + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{2}}\right)}{b}} \]
    8. Step-by-step derivation
      1. Simplified88.3%

        \[\leadsto \color{blue}{\frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b}} \]
      2. Step-by-step derivation
        1. expm1-log1p-u53.1%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(-c\right)\right)}}{b}\right)}^{2}}{b} \]
        2. expm1-undefine53.1%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\color{blue}{e^{\mathsf{log1p}\left(-c\right)} - 1}}{b}\right)}^{2}}{b} \]
      3. Applied egg-rr53.1%

        \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\color{blue}{e^{\mathsf{log1p}\left(-c\right)} - 1}}{b}\right)}^{2}}{b} \]
      4. Step-by-step derivation
        1. sub-neg53.1%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\color{blue}{e^{\mathsf{log1p}\left(-c\right)} + \left(-1\right)}}{b}\right)}^{2}}{b} \]
        2. log1p-undefine53.1%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{e^{\color{blue}{\log \left(1 + \left(-c\right)\right)}} + \left(-1\right)}{b}\right)}^{2}}{b} \]
        3. rem-exp-log88.3%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\color{blue}{\left(1 + \left(-c\right)\right)} + \left(-1\right)}{b}\right)}^{2}}{b} \]
        4. unsub-neg88.3%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\color{blue}{\left(1 - c\right)} + \left(-1\right)}{b}\right)}^{2}}{b} \]
        5. metadata-eval88.3%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\left(1 - c\right) + \color{blue}{-1}}{b}\right)}^{2}}{b} \]
      5. Simplified88.3%

        \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{\color{blue}{\left(1 - c\right) + -1}}{b}\right)}^{2}}{b} \]
      6. Step-by-step derivation
        1. unpow288.3%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \color{blue}{\left(\frac{\left(1 - c\right) + -1}{b} \cdot \frac{\left(1 - c\right) + -1}{b}\right)}}{b} \]
      7. Applied egg-rr88.3%

        \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \color{blue}{\left(\frac{\left(1 - c\right) + -1}{b} \cdot \frac{\left(1 - c\right) + -1}{b}\right)}}{b} \]
      8. Final simplification88.3%

        \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \left(\frac{-1 - \left(c + -1\right)}{b} \cdot \frac{-1 - \left(c + -1\right)}{b}\right)}{b} \]
      9. Add Preprocessing

      Alternative 7: 85.1% accurate, 0.4× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2}\\ \mathbf{if}\;t\_0 \leq -2.2:\\ \;\;\;\;t\_0\\ \mathbf{else}:\\ \;\;\;\;\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}\\ \end{array} \end{array} \]
      (FPCore (a b c)
       :precision binary64
       (let* ((t_0 (/ (- (sqrt (- (* b b) (* c (* a 4.0)))) b) (* a 2.0))))
         (if (<= t_0 -2.2) t_0 (- (/ c (- b)) (* a (/ (pow c 2.0) (pow b 3.0)))))))
      double code(double a, double b, double c) {
      	double t_0 = (sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0);
      	double tmp;
      	if (t_0 <= -2.2) {
      		tmp = t_0;
      	} else {
      		tmp = (c / -b) - (a * (pow(c, 2.0) / pow(b, 3.0)));
      	}
      	return tmp;
      }
      
      real(8) function code(a, b, c)
          real(8), intent (in) :: a
          real(8), intent (in) :: b
          real(8), intent (in) :: c
          real(8) :: t_0
          real(8) :: tmp
          t_0 = (sqrt(((b * b) - (c * (a * 4.0d0)))) - b) / (a * 2.0d0)
          if (t_0 <= (-2.2d0)) then
              tmp = t_0
          else
              tmp = (c / -b) - (a * ((c ** 2.0d0) / (b ** 3.0d0)))
          end if
          code = tmp
      end function
      
      public static double code(double a, double b, double c) {
      	double t_0 = (Math.sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0);
      	double tmp;
      	if (t_0 <= -2.2) {
      		tmp = t_0;
      	} else {
      		tmp = (c / -b) - (a * (Math.pow(c, 2.0) / Math.pow(b, 3.0)));
      	}
      	return tmp;
      }
      
      def code(a, b, c):
      	t_0 = (math.sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0)
      	tmp = 0
      	if t_0 <= -2.2:
      		tmp = t_0
      	else:
      		tmp = (c / -b) - (a * (math.pow(c, 2.0) / math.pow(b, 3.0)))
      	return tmp
      
      function code(a, b, c)
      	t_0 = Float64(Float64(sqrt(Float64(Float64(b * b) - Float64(c * Float64(a * 4.0)))) - b) / Float64(a * 2.0))
      	tmp = 0.0
      	if (t_0 <= -2.2)
      		tmp = t_0;
      	else
      		tmp = Float64(Float64(c / Float64(-b)) - Float64(a * Float64((c ^ 2.0) / (b ^ 3.0))));
      	end
      	return tmp
      end
      
      function tmp_2 = code(a, b, c)
      	t_0 = (sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0);
      	tmp = 0.0;
      	if (t_0 <= -2.2)
      		tmp = t_0;
      	else
      		tmp = (c / -b) - (a * ((c ^ 2.0) / (b ^ 3.0)));
      	end
      	tmp_2 = tmp;
      end
      
      code[a_, b_, c_] := Block[{t$95$0 = N[(N[(N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(c * N[(a * 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -2.2], t$95$0, N[(N[(c / (-b)), $MachinePrecision] - N[(a * N[(N[Power[c, 2.0], $MachinePrecision] / N[Power[b, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2}\\
      \mathbf{if}\;t\_0 \leq -2.2:\\
      \;\;\;\;t\_0\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 2 regimes
      2. if (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)) < -2.2000000000000002

        1. Initial program 82.3%

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

        if -2.2000000000000002 < (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a))

        1. Initial program 52.0%

          \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
        2. Step-by-step derivation
          1. *-commutative52.0%

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

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

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

            \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
          5. sqr-neg52.0%

            \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
          6. fma-neg52.1%

            \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
          7. distribute-lft-neg-in52.1%

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

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

            \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
          10. distribute-rgt-neg-in52.1%

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

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

          \[\leadsto \color{blue}{\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}} \]
        4. Add Preprocessing
        5. Taylor expanded in a around 0 84.8%

          \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
        6. Step-by-step derivation
          1. mul-1-neg84.8%

            \[\leadsto -1 \cdot \frac{c}{b} + \color{blue}{\left(-\frac{a \cdot {c}^{2}}{{b}^{3}}\right)} \]
          2. unsub-neg84.8%

            \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} - \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
          3. mul-1-neg84.8%

            \[\leadsto \color{blue}{\left(-\frac{c}{b}\right)} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
          4. distribute-neg-frac284.8%

            \[\leadsto \color{blue}{\frac{c}{-b}} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
          5. associate-/l*84.8%

            \[\leadsto \frac{c}{-b} - \color{blue}{a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
        7. Simplified84.8%

          \[\leadsto \color{blue}{\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
      3. Recombined 2 regimes into one program.
      4. Final simplification84.4%

        \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -2.2:\\ \;\;\;\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}\\ \end{array} \]
      5. Add Preprocessing

      Alternative 8: 88.0% accurate, 0.4× speedup?

      \[\begin{array}{l} \\ \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \left(\frac{c}{b} \cdot \frac{c}{b}\right)}{b} \end{array} \]
      (FPCore (a b c)
       :precision binary64
       (/
        (-
         (- (* -2.0 (/ (* (pow c 3.0) (pow a 2.0)) (pow b 4.0))) c)
         (* a (* (/ c b) (/ c b))))
        b))
      double code(double a, double b, double c) {
      	return (((-2.0 * ((pow(c, 3.0) * pow(a, 2.0)) / pow(b, 4.0))) - c) - (a * ((c / b) * (c / b)))) / b;
      }
      
      real(8) function code(a, b, c)
          real(8), intent (in) :: a
          real(8), intent (in) :: b
          real(8), intent (in) :: c
          code = ((((-2.0d0) * (((c ** 3.0d0) * (a ** 2.0d0)) / (b ** 4.0d0))) - c) - (a * ((c / b) * (c / b)))) / b
      end function
      
      public static double code(double a, double b, double c) {
      	return (((-2.0 * ((Math.pow(c, 3.0) * Math.pow(a, 2.0)) / Math.pow(b, 4.0))) - c) - (a * ((c / b) * (c / b)))) / b;
      }
      
      def code(a, b, c):
      	return (((-2.0 * ((math.pow(c, 3.0) * math.pow(a, 2.0)) / math.pow(b, 4.0))) - c) - (a * ((c / b) * (c / b)))) / b
      
      function code(a, b, c)
      	return Float64(Float64(Float64(Float64(-2.0 * Float64(Float64((c ^ 3.0) * (a ^ 2.0)) / (b ^ 4.0))) - c) - Float64(a * Float64(Float64(c / b) * Float64(c / b)))) / b)
      end
      
      function tmp = code(a, b, c)
      	tmp = (((-2.0 * (((c ^ 3.0) * (a ^ 2.0)) / (b ^ 4.0))) - c) - (a * ((c / b) * (c / b)))) / b;
      end
      
      code[a_, b_, c_] := N[(N[(N[(N[(-2.0 * N[(N[(N[Power[c, 3.0], $MachinePrecision] * N[Power[a, 2.0], $MachinePrecision]), $MachinePrecision] / N[Power[b, 4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - c), $MachinePrecision] - N[(a * N[(N[(c / b), $MachinePrecision] * N[(c / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]
      
      \begin{array}{l}
      
      \\
      \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \left(\frac{c}{b} \cdot \frac{c}{b}\right)}{b}
      \end{array}
      
      Derivation
      1. Initial program 56.3%

        \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
      2. Step-by-step derivation
        1. *-commutative56.3%

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

        \[\leadsto \color{blue}{\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot 2}} \]
      4. Add Preprocessing
      5. Step-by-step derivation
        1. pow256.3%

          \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
        2. pow-to-exp53.2%

          \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
      6. Applied egg-rr53.2%

        \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
      7. Taylor expanded in b around inf 88.3%

        \[\leadsto \color{blue}{\frac{-2 \cdot \frac{{a}^{2} \cdot {c}^{3}}{{b}^{4}} + \left(-1 \cdot c + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{2}}\right)}{b}} \]
      8. Step-by-step derivation
        1. Simplified88.3%

          \[\leadsto \color{blue}{\frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b}} \]
        2. Step-by-step derivation
          1. unpow288.3%

            \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \color{blue}{\left(\frac{-c}{b} \cdot \frac{-c}{b}\right)}}{b} \]
        3. Applied egg-rr88.3%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \color{blue}{\left(\frac{-c}{b} \cdot \frac{-c}{b}\right)}}{b} \]
        4. Final simplification88.3%

          \[\leadsto \frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot \left(\frac{c}{b} \cdot \frac{c}{b}\right)}{b} \]
        5. Add Preprocessing

        Alternative 9: 87.8% accurate, 0.4× speedup?

        \[\begin{array}{l} \\ c \cdot \left(c \cdot \left(-2 \cdot \frac{c \cdot {a}^{2}}{{b}^{5}} - \frac{a}{{b}^{3}}\right) + \frac{-1}{b}\right) \end{array} \]
        (FPCore (a b c)
         :precision binary64
         (*
          c
          (+
           (* c (- (* -2.0 (/ (* c (pow a 2.0)) (pow b 5.0))) (/ a (pow b 3.0))))
           (/ -1.0 b))))
        double code(double a, double b, double c) {
        	return c * ((c * ((-2.0 * ((c * pow(a, 2.0)) / pow(b, 5.0))) - (a / pow(b, 3.0)))) + (-1.0 / b));
        }
        
        real(8) function code(a, b, c)
            real(8), intent (in) :: a
            real(8), intent (in) :: b
            real(8), intent (in) :: c
            code = c * ((c * (((-2.0d0) * ((c * (a ** 2.0d0)) / (b ** 5.0d0))) - (a / (b ** 3.0d0)))) + ((-1.0d0) / b))
        end function
        
        public static double code(double a, double b, double c) {
        	return c * ((c * ((-2.0 * ((c * Math.pow(a, 2.0)) / Math.pow(b, 5.0))) - (a / Math.pow(b, 3.0)))) + (-1.0 / b));
        }
        
        def code(a, b, c):
        	return c * ((c * ((-2.0 * ((c * math.pow(a, 2.0)) / math.pow(b, 5.0))) - (a / math.pow(b, 3.0)))) + (-1.0 / b))
        
        function code(a, b, c)
        	return Float64(c * Float64(Float64(c * Float64(Float64(-2.0 * Float64(Float64(c * (a ^ 2.0)) / (b ^ 5.0))) - Float64(a / (b ^ 3.0)))) + Float64(-1.0 / b)))
        end
        
        function tmp = code(a, b, c)
        	tmp = c * ((c * ((-2.0 * ((c * (a ^ 2.0)) / (b ^ 5.0))) - (a / (b ^ 3.0)))) + (-1.0 / b));
        end
        
        code[a_, b_, c_] := N[(c * N[(N[(c * N[(N[(-2.0 * N[(N[(c * N[Power[a, 2.0], $MachinePrecision]), $MachinePrecision] / N[Power[b, 5.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(a / N[Power[b, 3.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(-1.0 / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
        
        \begin{array}{l}
        
        \\
        c \cdot \left(c \cdot \left(-2 \cdot \frac{c \cdot {a}^{2}}{{b}^{5}} - \frac{a}{{b}^{3}}\right) + \frac{-1}{b}\right)
        \end{array}
        
        Derivation
        1. Initial program 56.3%

          \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
        2. Step-by-step derivation
          1. *-commutative56.3%

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

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

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

            \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
          5. sqr-neg56.3%

            \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
          6. fma-neg56.4%

            \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
          7. distribute-lft-neg-in56.4%

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

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

            \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
          10. distribute-rgt-neg-in56.4%

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

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

          \[\leadsto \color{blue}{\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}} \]
        4. Add Preprocessing
        5. Taylor expanded in c around 0 88.3%

          \[\leadsto \color{blue}{c \cdot \left(c \cdot \left(-2 \cdot \frac{{a}^{2} \cdot c}{{b}^{5}} + -1 \cdot \frac{a}{{b}^{3}}\right) - \frac{1}{b}\right)} \]
        6. Final simplification88.3%

          \[\leadsto c \cdot \left(c \cdot \left(-2 \cdot \frac{c \cdot {a}^{2}}{{b}^{5}} - \frac{a}{{b}^{3}}\right) + \frac{-1}{b}\right) \]
        7. Add Preprocessing

        Alternative 10: 87.8% accurate, 0.4× speedup?

        \[\begin{array}{l} \\ \frac{c \cdot \left(-1 + c \cdot \left(-2 \cdot \frac{c \cdot {a}^{2}}{{b}^{4}} - \frac{a}{{b}^{2}}\right)\right)}{b} \end{array} \]
        (FPCore (a b c)
         :precision binary64
         (/
          (*
           c
           (+
            -1.0
            (* c (- (* -2.0 (/ (* c (pow a 2.0)) (pow b 4.0))) (/ a (pow b 2.0))))))
          b))
        double code(double a, double b, double c) {
        	return (c * (-1.0 + (c * ((-2.0 * ((c * pow(a, 2.0)) / pow(b, 4.0))) - (a / pow(b, 2.0)))))) / b;
        }
        
        real(8) function code(a, b, c)
            real(8), intent (in) :: a
            real(8), intent (in) :: b
            real(8), intent (in) :: c
            code = (c * ((-1.0d0) + (c * (((-2.0d0) * ((c * (a ** 2.0d0)) / (b ** 4.0d0))) - (a / (b ** 2.0d0)))))) / b
        end function
        
        public static double code(double a, double b, double c) {
        	return (c * (-1.0 + (c * ((-2.0 * ((c * Math.pow(a, 2.0)) / Math.pow(b, 4.0))) - (a / Math.pow(b, 2.0)))))) / b;
        }
        
        def code(a, b, c):
        	return (c * (-1.0 + (c * ((-2.0 * ((c * math.pow(a, 2.0)) / math.pow(b, 4.0))) - (a / math.pow(b, 2.0)))))) / b
        
        function code(a, b, c)
        	return Float64(Float64(c * Float64(-1.0 + Float64(c * Float64(Float64(-2.0 * Float64(Float64(c * (a ^ 2.0)) / (b ^ 4.0))) - Float64(a / (b ^ 2.0)))))) / b)
        end
        
        function tmp = code(a, b, c)
        	tmp = (c * (-1.0 + (c * ((-2.0 * ((c * (a ^ 2.0)) / (b ^ 4.0))) - (a / (b ^ 2.0)))))) / b;
        end
        
        code[a_, b_, c_] := N[(N[(c * N[(-1.0 + N[(c * N[(N[(-2.0 * N[(N[(c * N[Power[a, 2.0], $MachinePrecision]), $MachinePrecision] / N[Power[b, 4.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(a / N[Power[b, 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]
        
        \begin{array}{l}
        
        \\
        \frac{c \cdot \left(-1 + c \cdot \left(-2 \cdot \frac{c \cdot {a}^{2}}{{b}^{4}} - \frac{a}{{b}^{2}}\right)\right)}{b}
        \end{array}
        
        Derivation
        1. Initial program 56.3%

          \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
        2. Step-by-step derivation
          1. *-commutative56.3%

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

          \[\leadsto \color{blue}{\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{a \cdot 2}} \]
        4. Add Preprocessing
        5. Step-by-step derivation
          1. pow256.3%

            \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{{b}^{2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
          2. pow-to-exp53.2%

            \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
        6. Applied egg-rr53.2%

          \[\leadsto \frac{\left(-b\right) + \sqrt{\color{blue}{e^{\log b \cdot 2}} - \left(4 \cdot a\right) \cdot c}}{a \cdot 2} \]
        7. Taylor expanded in b around inf 88.3%

          \[\leadsto \color{blue}{\frac{-2 \cdot \frac{{a}^{2} \cdot {c}^{3}}{{b}^{4}} + \left(-1 \cdot c + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{2}}\right)}{b}} \]
        8. Step-by-step derivation
          1. Simplified88.3%

            \[\leadsto \color{blue}{\frac{\left(-2 \cdot \frac{{c}^{3} \cdot {a}^{2}}{{b}^{4}} - c\right) - a \cdot {\left(\frac{-c}{b}\right)}^{2}}{b}} \]
          2. Taylor expanded in c around 0 88.2%

            \[\leadsto \frac{\color{blue}{c \cdot \left(c \cdot \left(-2 \cdot \frac{{a}^{2} \cdot c}{{b}^{4}} - \frac{a}{{b}^{2}}\right) - 1\right)}}{b} \]
          3. Final simplification88.2%

            \[\leadsto \frac{c \cdot \left(-1 + c \cdot \left(-2 \cdot \frac{c \cdot {a}^{2}}{{b}^{4}} - \frac{a}{{b}^{2}}\right)\right)}{b} \]
          4. Add Preprocessing

          Alternative 11: 85.1% accurate, 0.5× speedup?

          \[\begin{array}{l} \\ \begin{array}{l} t_0 := \frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2}\\ \mathbf{if}\;t\_0 \leq -2.2:\\ \;\;\;\;t\_0\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(-c\right) - a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b}\\ \end{array} \end{array} \]
          (FPCore (a b c)
           :precision binary64
           (let* ((t_0 (/ (- (sqrt (- (* b b) (* c (* a 4.0)))) b) (* a 2.0))))
             (if (<= t_0 -2.2) t_0 (/ (- (- c) (* a (pow (/ c (- b)) 2.0))) b))))
          double code(double a, double b, double c) {
          	double t_0 = (sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0);
          	double tmp;
          	if (t_0 <= -2.2) {
          		tmp = t_0;
          	} else {
          		tmp = (-c - (a * pow((c / -b), 2.0))) / b;
          	}
          	return tmp;
          }
          
          real(8) function code(a, b, c)
              real(8), intent (in) :: a
              real(8), intent (in) :: b
              real(8), intent (in) :: c
              real(8) :: t_0
              real(8) :: tmp
              t_0 = (sqrt(((b * b) - (c * (a * 4.0d0)))) - b) / (a * 2.0d0)
              if (t_0 <= (-2.2d0)) then
                  tmp = t_0
              else
                  tmp = (-c - (a * ((c / -b) ** 2.0d0))) / b
              end if
              code = tmp
          end function
          
          public static double code(double a, double b, double c) {
          	double t_0 = (Math.sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0);
          	double tmp;
          	if (t_0 <= -2.2) {
          		tmp = t_0;
          	} else {
          		tmp = (-c - (a * Math.pow((c / -b), 2.0))) / b;
          	}
          	return tmp;
          }
          
          def code(a, b, c):
          	t_0 = (math.sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0)
          	tmp = 0
          	if t_0 <= -2.2:
          		tmp = t_0
          	else:
          		tmp = (-c - (a * math.pow((c / -b), 2.0))) / b
          	return tmp
          
          function code(a, b, c)
          	t_0 = Float64(Float64(sqrt(Float64(Float64(b * b) - Float64(c * Float64(a * 4.0)))) - b) / Float64(a * 2.0))
          	tmp = 0.0
          	if (t_0 <= -2.2)
          		tmp = t_0;
          	else
          		tmp = Float64(Float64(Float64(-c) - Float64(a * (Float64(c / Float64(-b)) ^ 2.0))) / b);
          	end
          	return tmp
          end
          
          function tmp_2 = code(a, b, c)
          	t_0 = (sqrt(((b * b) - (c * (a * 4.0)))) - b) / (a * 2.0);
          	tmp = 0.0;
          	if (t_0 <= -2.2)
          		tmp = t_0;
          	else
          		tmp = (-c - (a * ((c / -b) ^ 2.0))) / b;
          	end
          	tmp_2 = tmp;
          end
          
          code[a_, b_, c_] := Block[{t$95$0 = N[(N[(N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(c * N[(a * 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$0, -2.2], t$95$0, N[(N[((-c) - N[(a * N[Power[N[(c / (-b)), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]]]
          
          \begin{array}{l}
          
          \\
          \begin{array}{l}
          t_0 := \frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2}\\
          \mathbf{if}\;t\_0 \leq -2.2:\\
          \;\;\;\;t\_0\\
          
          \mathbf{else}:\\
          \;\;\;\;\frac{\left(-c\right) - a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a)) < -2.2000000000000002

            1. Initial program 82.3%

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

            if -2.2000000000000002 < (/.f64 (+.f64 (neg.f64 b) (sqrt.f64 (-.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) a) c)))) (*.f64 #s(literal 2 binary64) a))

            1. Initial program 52.0%

              \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
            2. Step-by-step derivation
              1. *-commutative52.0%

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

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

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

                \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
              5. sqr-neg52.0%

                \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
              6. fma-neg52.1%

                \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
              7. distribute-lft-neg-in52.1%

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

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

                \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
              10. distribute-rgt-neg-in52.1%

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

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

              \[\leadsto \color{blue}{\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}} \]
            4. Add Preprocessing
            5. Taylor expanded in a around 0 84.8%

              \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
            6. Step-by-step derivation
              1. mul-1-neg84.8%

                \[\leadsto -1 \cdot \frac{c}{b} + \color{blue}{\left(-\frac{a \cdot {c}^{2}}{{b}^{3}}\right)} \]
              2. unsub-neg84.8%

                \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} - \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
              3. mul-1-neg84.8%

                \[\leadsto \color{blue}{\left(-\frac{c}{b}\right)} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
              4. distribute-neg-frac284.8%

                \[\leadsto \color{blue}{\frac{c}{-b}} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
              5. associate-/l*84.8%

                \[\leadsto \frac{c}{-b} - \color{blue}{a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
            7. Simplified84.8%

              \[\leadsto \color{blue}{\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
            8. Taylor expanded in b around inf 84.7%

              \[\leadsto \color{blue}{\frac{-1 \cdot c + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{2}}}{b}} \]
            9. Step-by-step derivation
              1. Simplified84.7%

                \[\leadsto \color{blue}{\frac{\left(-a\right) \cdot {\left(\frac{-c}{b}\right)}^{2} - c}{b}} \]
            10. Recombined 2 regimes into one program.
            11. Final simplification84.4%

              \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2} \leq -2.2:\\ \;\;\;\;\frac{\sqrt{b \cdot b - c \cdot \left(a \cdot 4\right)} - b}{a \cdot 2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(-c\right) - a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b}\\ \end{array} \]
            12. Add Preprocessing

            Alternative 12: 81.7% accurate, 1.0× speedup?

            \[\begin{array}{l} \\ \frac{\left(-c\right) - a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b} \end{array} \]
            (FPCore (a b c)
             :precision binary64
             (/ (- (- c) (* a (pow (/ c (- b)) 2.0))) b))
            double code(double a, double b, double c) {
            	return (-c - (a * pow((c / -b), 2.0))) / b;
            }
            
            real(8) function code(a, b, c)
                real(8), intent (in) :: a
                real(8), intent (in) :: b
                real(8), intent (in) :: c
                code = (-c - (a * ((c / -b) ** 2.0d0))) / b
            end function
            
            public static double code(double a, double b, double c) {
            	return (-c - (a * Math.pow((c / -b), 2.0))) / b;
            }
            
            def code(a, b, c):
            	return (-c - (a * math.pow((c / -b), 2.0))) / b
            
            function code(a, b, c)
            	return Float64(Float64(Float64(-c) - Float64(a * (Float64(c / Float64(-b)) ^ 2.0))) / b)
            end
            
            function tmp = code(a, b, c)
            	tmp = (-c - (a * ((c / -b) ^ 2.0))) / b;
            end
            
            code[a_, b_, c_] := N[(N[((-c) - N[(a * N[Power[N[(c / (-b)), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]
            
            \begin{array}{l}
            
            \\
            \frac{\left(-c\right) - a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b}
            \end{array}
            
            Derivation
            1. Initial program 56.3%

              \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
            2. Step-by-step derivation
              1. *-commutative56.3%

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

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

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

                \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
              5. sqr-neg56.3%

                \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
              6. fma-neg56.4%

                \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
              7. distribute-lft-neg-in56.4%

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

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

                \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
              10. distribute-rgt-neg-in56.4%

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

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

              \[\leadsto \color{blue}{\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}} \]
            4. Add Preprocessing
            5. Taylor expanded in a around 0 81.4%

              \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
            6. Step-by-step derivation
              1. mul-1-neg81.4%

                \[\leadsto -1 \cdot \frac{c}{b} + \color{blue}{\left(-\frac{a \cdot {c}^{2}}{{b}^{3}}\right)} \]
              2. unsub-neg81.4%

                \[\leadsto \color{blue}{-1 \cdot \frac{c}{b} - \frac{a \cdot {c}^{2}}{{b}^{3}}} \]
              3. mul-1-neg81.4%

                \[\leadsto \color{blue}{\left(-\frac{c}{b}\right)} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
              4. distribute-neg-frac281.4%

                \[\leadsto \color{blue}{\frac{c}{-b}} - \frac{a \cdot {c}^{2}}{{b}^{3}} \]
              5. associate-/l*81.4%

                \[\leadsto \frac{c}{-b} - \color{blue}{a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
            7. Simplified81.4%

              \[\leadsto \color{blue}{\frac{c}{-b} - a \cdot \frac{{c}^{2}}{{b}^{3}}} \]
            8. Taylor expanded in b around inf 81.3%

              \[\leadsto \color{blue}{\frac{-1 \cdot c + -1 \cdot \frac{a \cdot {c}^{2}}{{b}^{2}}}{b}} \]
            9. Step-by-step derivation
              1. Simplified81.3%

                \[\leadsto \color{blue}{\frac{\left(-a\right) \cdot {\left(\frac{-c}{b}\right)}^{2} - c}{b}} \]
              2. Final simplification81.3%

                \[\leadsto \frac{\left(-c\right) - a \cdot {\left(\frac{c}{-b}\right)}^{2}}{b} \]
              3. Add Preprocessing

              Alternative 13: 64.5% accurate, 29.0× speedup?

              \[\begin{array}{l} \\ \frac{c}{-b} \end{array} \]
              (FPCore (a b c) :precision binary64 (/ c (- b)))
              double code(double a, double b, double c) {
              	return c / -b;
              }
              
              real(8) function code(a, b, c)
                  real(8), intent (in) :: a
                  real(8), intent (in) :: b
                  real(8), intent (in) :: c
                  code = c / -b
              end function
              
              public static double code(double a, double b, double c) {
              	return c / -b;
              }
              
              def code(a, b, c):
              	return c / -b
              
              function code(a, b, c)
              	return Float64(c / Float64(-b))
              end
              
              function tmp = code(a, b, c)
              	tmp = c / -b;
              end
              
              code[a_, b_, c_] := N[(c / (-b)), $MachinePrecision]
              
              \begin{array}{l}
              
              \\
              \frac{c}{-b}
              \end{array}
              
              Derivation
              1. Initial program 56.3%

                \[\frac{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a} \]
              2. Step-by-step derivation
                1. *-commutative56.3%

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

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

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

                  \[\leadsto \frac{\color{blue}{\sqrt{\left(-b\right) \cdot \left(-b\right) - \left(4 \cdot a\right) \cdot c} - b}}{a \cdot 2} \]
                5. sqr-neg56.3%

                  \[\leadsto \frac{\sqrt{\color{blue}{b \cdot b} - \left(4 \cdot a\right) \cdot c} - b}{a \cdot 2} \]
                6. fma-neg56.4%

                  \[\leadsto \frac{\sqrt{\color{blue}{\mathsf{fma}\left(b, b, -\left(4 \cdot a\right) \cdot c\right)}} - b}{a \cdot 2} \]
                7. distribute-lft-neg-in56.4%

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

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

                  \[\leadsto \frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(-\color{blue}{a \cdot 4}\right)\right)} - b}{a \cdot 2} \]
                10. distribute-rgt-neg-in56.4%

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

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

                \[\leadsto \color{blue}{\frac{\sqrt{\mathsf{fma}\left(b, b, c \cdot \left(a \cdot -4\right)\right)} - b}{a \cdot 2}} \]
              4. Add Preprocessing
              5. Taylor expanded in b around inf 63.9%

                \[\leadsto \color{blue}{-1 \cdot \frac{c}{b}} \]
              6. Step-by-step derivation
                1. associate-*r/63.9%

                  \[\leadsto \color{blue}{\frac{-1 \cdot c}{b}} \]
                2. mul-1-neg63.9%

                  \[\leadsto \frac{\color{blue}{-c}}{b} \]
              7. Simplified63.9%

                \[\leadsto \color{blue}{\frac{-c}{b}} \]
              8. Final simplification63.9%

                \[\leadsto \frac{c}{-b} \]
              9. Add Preprocessing

              Reproduce

              ?
              herbie shell --seed 2024132 
              (FPCore (a b c)
                :name "Quadratic roots, narrow range"
                :precision binary64
                :pre (and (and (and (< 1.0536712127723509e-8 a) (< a 94906265.62425156)) (and (< 1.0536712127723509e-8 b) (< b 94906265.62425156))) (and (< 1.0536712127723509e-8 c) (< c 94906265.62425156)))
                (/ (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)))