jeff quadratic root 1

Percentage Accurate: 72.2% → 92.6%
Time: 4.7s
Alternatives: 20
Speedup: 1.2×

Specification

?
\[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\\ \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\ \end{array} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (let* ((t_0 (sqrt (- (* b b) (* (* 4.0 a) c)))))
   (if (>= b 0.0) (/ (- (- b) t_0) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) t_0)))))
double code(double a, double b, double c) {
	double t_0 = sqrt(((b * b) - ((4.0 * a) * c)));
	double tmp;
	if (b >= 0.0) {
		tmp = (-b - t_0) / (2.0 * a);
	} else {
		tmp = (2.0 * c) / (-b + t_0);
	}
	return tmp;
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(a, b, c)
use fmin_fmax_functions
    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) - ((4.0d0 * a) * c)))
    if (b >= 0.0d0) then
        tmp = (-b - t_0) / (2.0d0 * a)
    else
        tmp = (2.0d0 * c) / (-b + t_0)
    end if
    code = tmp
end function
public static double code(double a, double b, double c) {
	double t_0 = Math.sqrt(((b * b) - ((4.0 * a) * c)));
	double tmp;
	if (b >= 0.0) {
		tmp = (-b - t_0) / (2.0 * a);
	} else {
		tmp = (2.0 * c) / (-b + t_0);
	}
	return tmp;
}
def code(a, b, c):
	t_0 = math.sqrt(((b * b) - ((4.0 * a) * c)))
	tmp = 0
	if b >= 0.0:
		tmp = (-b - t_0) / (2.0 * a)
	else:
		tmp = (2.0 * c) / (-b + t_0)
	return tmp
function code(a, b, c)
	t_0 = sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))
	tmp = 0.0
	if (b >= 0.0)
		tmp = Float64(Float64(Float64(-b) - t_0) / Float64(2.0 * a));
	else
		tmp = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_0));
	end
	return tmp
end
function tmp_2 = code(a, b, c)
	t_0 = sqrt(((b * b) - ((4.0 * a) * c)));
	tmp = 0.0;
	if (b >= 0.0)
		tmp = (-b - t_0) / (2.0 * a);
	else
		tmp = (2.0 * c) / (-b + t_0);
	end
	tmp_2 = tmp;
end
code[a_, b_, c_] := Block[{t$95$0 = N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(4.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$0), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$0), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

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

\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\


\end{array}
\end{array}

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 20 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: 72.2% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}\\ \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\ \end{array} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (let* ((t_0 (sqrt (- (* b b) (* (* 4.0 a) c)))))
   (if (>= b 0.0) (/ (- (- b) t_0) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) t_0)))))
double code(double a, double b, double c) {
	double t_0 = sqrt(((b * b) - ((4.0 * a) * c)));
	double tmp;
	if (b >= 0.0) {
		tmp = (-b - t_0) / (2.0 * a);
	} else {
		tmp = (2.0 * c) / (-b + t_0);
	}
	return tmp;
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(a, b, c)
use fmin_fmax_functions
    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) - ((4.0d0 * a) * c)))
    if (b >= 0.0d0) then
        tmp = (-b - t_0) / (2.0d0 * a)
    else
        tmp = (2.0d0 * c) / (-b + t_0)
    end if
    code = tmp
end function
public static double code(double a, double b, double c) {
	double t_0 = Math.sqrt(((b * b) - ((4.0 * a) * c)));
	double tmp;
	if (b >= 0.0) {
		tmp = (-b - t_0) / (2.0 * a);
	} else {
		tmp = (2.0 * c) / (-b + t_0);
	}
	return tmp;
}
def code(a, b, c):
	t_0 = math.sqrt(((b * b) - ((4.0 * a) * c)))
	tmp = 0
	if b >= 0.0:
		tmp = (-b - t_0) / (2.0 * a)
	else:
		tmp = (2.0 * c) / (-b + t_0)
	return tmp
function code(a, b, c)
	t_0 = sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))
	tmp = 0.0
	if (b >= 0.0)
		tmp = Float64(Float64(Float64(-b) - t_0) / Float64(2.0 * a));
	else
		tmp = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_0));
	end
	return tmp
end
function tmp_2 = code(a, b, c)
	t_0 = sqrt(((b * b) - ((4.0 * a) * c)));
	tmp = 0.0;
	if (b >= 0.0)
		tmp = (-b - t_0) / (2.0 * a);
	else
		tmp = (2.0 * c) / (-b + t_0);
	end
	tmp_2 = tmp;
end
code[a_, b_, c_] := Block[{t$95$0 = N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(4.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$0), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$0), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

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

\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\


\end{array}
\end{array}

Alternative 1: 92.6% accurate, 0.6× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\ t_1 := \sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}}\\ t_2 := \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|\\ \mathbf{if}\;b \leq -1.05 \cdot 10^{-18}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_1 \cdot \left(-b\right)}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\mathsf{fma}\left(t\_1, -b, -b\right)}\\ \end{array}\\ \mathbf{elif}\;b \leq 2 \cdot 10^{-15}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_2}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + t\_2}\\ \end{array} \end{array} \]
(FPCore (a b c)
 :precision binary64
 (let* ((t_0 (sqrt (fma (* -4.0 a) c (* b b))))
        (t_1 (sqrt (- 1.0 (* (/ c b) (/ (* a 4.0) b)))))
        (t_2 (* (sqrt (- 1.0 (/ (* (/ c b) (* 4.0 a)) b))) (fabs b))))
   (if (<= b -1.05e-18)
     (if (>= b 0.0)
       (/ (- (- b) (* t_1 (- b))) (+ a a))
       (/ (+ c c) (fma t_1 (- b) (- b))))
     (if (<= b 2e-15)
       (if (>= b 0.0) (/ (- (- b) t_0) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) t_0)))
       (if (>= b 0.0) (/ (- (- b) t_2) (+ a a)) (/ (+ c c) (+ (- b) t_2)))))))
double code(double a, double b, double c) {
	double t_0 = sqrt(fma((-4.0 * a), c, (b * b)));
	double t_1 = sqrt((1.0 - ((c / b) * ((a * 4.0) / b))));
	double t_2 = sqrt((1.0 - (((c / b) * (4.0 * a)) / b))) * fabs(b);
	double tmp_1;
	if (b <= -1.05e-18) {
		double tmp_2;
		if (b >= 0.0) {
			tmp_2 = (-b - (t_1 * -b)) / (a + a);
		} else {
			tmp_2 = (c + c) / fma(t_1, -b, -b);
		}
		tmp_1 = tmp_2;
	} else if (b <= 2e-15) {
		double tmp_3;
		if (b >= 0.0) {
			tmp_3 = (-b - t_0) / (2.0 * a);
		} else {
			tmp_3 = (2.0 * c) / (-b + t_0);
		}
		tmp_1 = tmp_3;
	} else if (b >= 0.0) {
		tmp_1 = (-b - t_2) / (a + a);
	} else {
		tmp_1 = (c + c) / (-b + t_2);
	}
	return tmp_1;
}
function code(a, b, c)
	t_0 = sqrt(fma(Float64(-4.0 * a), c, Float64(b * b)))
	t_1 = sqrt(Float64(1.0 - Float64(Float64(c / b) * Float64(Float64(a * 4.0) / b))))
	t_2 = Float64(sqrt(Float64(1.0 - Float64(Float64(Float64(c / b) * Float64(4.0 * a)) / b))) * abs(b))
	tmp_1 = 0.0
	if (b <= -1.05e-18)
		tmp_2 = 0.0
		if (b >= 0.0)
			tmp_2 = Float64(Float64(Float64(-b) - Float64(t_1 * Float64(-b))) / Float64(a + a));
		else
			tmp_2 = Float64(Float64(c + c) / fma(t_1, Float64(-b), Float64(-b)));
		end
		tmp_1 = tmp_2;
	elseif (b <= 2e-15)
		tmp_3 = 0.0
		if (b >= 0.0)
			tmp_3 = Float64(Float64(Float64(-b) - t_0) / Float64(2.0 * a));
		else
			tmp_3 = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_0));
		end
		tmp_1 = tmp_3;
	elseif (b >= 0.0)
		tmp_1 = Float64(Float64(Float64(-b) - t_2) / Float64(a + a));
	else
		tmp_1 = Float64(Float64(c + c) / Float64(Float64(-b) + t_2));
	end
	return tmp_1
end
code[a_, b_, c_] := Block[{t$95$0 = N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * c + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$1 = N[Sqrt[N[(1.0 - N[(N[(c / b), $MachinePrecision] * N[(N[(a * 4.0), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[N[(1.0 - N[(N[(N[(c / b), $MachinePrecision] * N[(4.0 * a), $MachinePrecision]), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] * N[Abs[b], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -1.05e-18], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[(t$95$1 * (-b)), $MachinePrecision]), $MachinePrecision] / N[(a + a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(t$95$1 * (-b) + (-b)), $MachinePrecision]), $MachinePrecision]], If[LessEqual[b, 2e-15], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$0), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$0), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$2), $MachinePrecision] / N[(a + a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[((-b) + t$95$2), $MachinePrecision]), $MachinePrecision]]]]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\
t_1 := \sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}}\\
t_2 := \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|\\
\mathbf{if}\;b \leq -1.05 \cdot 10^{-18}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \geq 0:\\
\;\;\;\;\frac{\left(-b\right) - t\_1 \cdot \left(-b\right)}{a + a}\\

\mathbf{else}:\\
\;\;\;\;\frac{c + c}{\mathsf{fma}\left(t\_1, -b, -b\right)}\\


\end{array}\\

\mathbf{elif}\;b \leq 2 \cdot 10^{-15}:\\
\;\;\;\;\begin{array}{l}
\mathbf{if}\;b \geq 0:\\
\;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\

\mathbf{else}:\\
\;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\


\end{array}\\

\mathbf{elif}\;b \geq 0:\\
\;\;\;\;\frac{\left(-b\right) - t\_2}{a + a}\\

\mathbf{else}:\\
\;\;\;\;\frac{c + c}{\left(-b\right) + t\_2}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if b < -1.05e-18

    1. Initial program 72.2%

      \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
    2. Step-by-step derivation
      1. lift-sqrt.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      2. lift--.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      3. sub-to-multN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      4. sqrt-prodN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      5. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      6. rem-sqrt-square-revN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      7. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      8. lower-sqrt.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      9. lower--.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      10. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      11. associate-/l*N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      12. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      13. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      14. *-commutativeN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      15. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      16. lower-/.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      17. lower-fabs.f6474.1

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
    3. Applied rewrites74.1%

      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
    4. Step-by-step derivation
      1. lift-sqrt.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
      2. lift--.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      3. sub-to-multN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
      4. sqrt-prodN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
      5. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
      6. rem-sqrt-square-revN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
      7. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
      8. lower-sqrt.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      9. lower--.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      10. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      11. associate-/l*N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      12. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      13. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      14. *-commutativeN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      15. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      16. lower-/.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      17. lower-fabs.f6476.8

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
    5. Applied rewrites76.8%

      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
    6. Step-by-step derivation
      1. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      2. *-commutativeN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      3. lift-/.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      4. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{c}{\color{blue}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      5. associate-/r*N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b}}{b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      6. associate-*l/N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      7. lower-/.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      8. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b} \cdot \left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      9. lower-/.f6479.5

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b}} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      10. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      11. *-commutativeN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      12. lift-*.f6479.5

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
    7. Applied rewrites79.5%

      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
    8. Step-by-step derivation
      1. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      2. *-commutativeN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
      3. lift-/.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
      4. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
      5. associate-/r*N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b}}{b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
      6. associate-*l/N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      7. lower-/.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      8. lower-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      9. lower-/.f6482.3

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      10. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      11. *-commutativeN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      12. lift-*.f6482.3

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
    9. Applied rewrites82.3%

      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
    10. Step-by-step derivation
      1. lift-*.f64N/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      2. count-2-revN/A

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      3. lower-+.f6482.3

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
    11. Applied rewrites82.3%

      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
    12. Step-by-step derivation
      1. Applied rewrites42.6%

        \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}} \cdot \left(-b\right)}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\mathsf{fma}\left(\sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}}, -b, -b\right)}\\ } \end{array}} \]

      if -1.05e-18 < b < 2.0000000000000002e-15

      1. Initial program 72.2%

        \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      2. Step-by-step derivation
        1. lift--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. sub-flipN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. +-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\left(\mathsf{neg}\left(\color{blue}{\left(4 \cdot a\right) \cdot c}\right)\right) + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        5. distribute-lft-neg-outN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        6. lower-fma.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        7. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(\color{blue}{4 \cdot a}\right), c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        8. distribute-lft-neg-inN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        9. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        10. metadata-eval72.2

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{-4} \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      3. Applied rewrites72.2%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      4. Step-by-step derivation
        1. lift--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. sub-flipN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}\\ \end{array} \]
        3. +-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
        4. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
        5. distribute-lft-neg-outN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c + b \cdot b}}\\ \end{array} \]
        6. lower-fma.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
        7. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
        8. distribute-lft-neg-inN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
        9. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
        10. metadata-eval72.2

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
      5. Applied rewrites72.2%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]

      if 2.0000000000000002e-15 < b

      1. Initial program 72.2%

        \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      2. Step-by-step derivation
        1. lift-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. lift--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. sub-to-multN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. sqrt-prodN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        5. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        6. rem-sqrt-square-revN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        7. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        8. lower-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        9. lower--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        11. associate-/l*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        12. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        13. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        14. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        15. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        16. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        17. lower-fabs.f6474.1

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      3. Applied rewrites74.1%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      4. Step-by-step derivation
        1. lift-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
        2. lift--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. sub-to-multN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
        4. sqrt-prodN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
        5. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
        6. rem-sqrt-square-revN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        7. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        8. lower-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        9. lower--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        11. associate-/l*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        12. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        13. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        14. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        15. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        16. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        17. lower-fabs.f6476.8

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
      5. Applied rewrites76.8%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
      6. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        2. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        3. lift-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        4. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{c}{\color{blue}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        5. associate-/r*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b}}{b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        6. associate-*l/N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        7. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        8. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b} \cdot \left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        9. lower-/.f6479.5

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b}} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        11. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        12. lift-*.f6479.5

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      7. Applied rewrites79.5%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      8. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        2. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        3. lift-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        4. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        5. associate-/r*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b}}{b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        6. associate-*l/N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        7. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        8. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        9. lower-/.f6482.3

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        11. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        12. lift-*.f6482.3

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      9. Applied rewrites82.3%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      10. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        2. count-2-revN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        3. lower-+.f6482.3

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      11. Applied rewrites82.3%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      12. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{\color{blue}{2 \cdot a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        2. count-2-revN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{\color{blue}{a + a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        3. lower-+.f6482.3

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{\color{blue}{a + a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      13. Applied rewrites82.3%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{\color{blue}{a + a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
    13. Recombined 3 regimes into one program.
    14. Add Preprocessing

    Alternative 2: 92.4% accurate, 0.7× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\ t_1 := \sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}}\\ t_2 := \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}\\ \mathbf{if}\;b \leq -1.05 \cdot 10^{-18}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_1 \cdot \left(-b\right)}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\mathsf{fma}\left(t\_1, -b, -b\right)}\\ \end{array}\\ \mathbf{elif}\;b \leq 8 \cdot 10^{+93}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_2}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_2}\\ \end{array} \end{array} \]
    (FPCore (a b c)
     :precision binary64
     (let* ((t_0 (sqrt (fma (* -4.0 a) c (* b b))))
            (t_1 (sqrt (- 1.0 (* (/ c b) (/ (* a 4.0) b)))))
            (t_2 (* (fabs b) (sqrt (fma (* -4.0 a) (/ c (* b b)) 1.0)))))
       (if (<= b -1.05e-18)
         (if (>= b 0.0)
           (/ (- (- b) (* t_1 (- b))) (+ a a))
           (/ (+ c c) (fma t_1 (- b) (- b))))
         (if (<= b 8e+93)
           (if (>= b 0.0) (/ (- (- b) t_0) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) t_0)))
           (if (>= b 0.0)
             (/ (- (- b) t_2) (* 2.0 a))
             (/ (* 2.0 c) (+ (- b) t_2)))))))
    double code(double a, double b, double c) {
    	double t_0 = sqrt(fma((-4.0 * a), c, (b * b)));
    	double t_1 = sqrt((1.0 - ((c / b) * ((a * 4.0) / b))));
    	double t_2 = fabs(b) * sqrt(fma((-4.0 * a), (c / (b * b)), 1.0));
    	double tmp_1;
    	if (b <= -1.05e-18) {
    		double tmp_2;
    		if (b >= 0.0) {
    			tmp_2 = (-b - (t_1 * -b)) / (a + a);
    		} else {
    			tmp_2 = (c + c) / fma(t_1, -b, -b);
    		}
    		tmp_1 = tmp_2;
    	} else if (b <= 8e+93) {
    		double tmp_3;
    		if (b >= 0.0) {
    			tmp_3 = (-b - t_0) / (2.0 * a);
    		} else {
    			tmp_3 = (2.0 * c) / (-b + t_0);
    		}
    		tmp_1 = tmp_3;
    	} else if (b >= 0.0) {
    		tmp_1 = (-b - t_2) / (2.0 * a);
    	} else {
    		tmp_1 = (2.0 * c) / (-b + t_2);
    	}
    	return tmp_1;
    }
    
    function code(a, b, c)
    	t_0 = sqrt(fma(Float64(-4.0 * a), c, Float64(b * b)))
    	t_1 = sqrt(Float64(1.0 - Float64(Float64(c / b) * Float64(Float64(a * 4.0) / b))))
    	t_2 = Float64(abs(b) * sqrt(fma(Float64(-4.0 * a), Float64(c / Float64(b * b)), 1.0)))
    	tmp_1 = 0.0
    	if (b <= -1.05e-18)
    		tmp_2 = 0.0
    		if (b >= 0.0)
    			tmp_2 = Float64(Float64(Float64(-b) - Float64(t_1 * Float64(-b))) / Float64(a + a));
    		else
    			tmp_2 = Float64(Float64(c + c) / fma(t_1, Float64(-b), Float64(-b)));
    		end
    		tmp_1 = tmp_2;
    	elseif (b <= 8e+93)
    		tmp_3 = 0.0
    		if (b >= 0.0)
    			tmp_3 = Float64(Float64(Float64(-b) - t_0) / Float64(2.0 * a));
    		else
    			tmp_3 = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_0));
    		end
    		tmp_1 = tmp_3;
    	elseif (b >= 0.0)
    		tmp_1 = Float64(Float64(Float64(-b) - t_2) / Float64(2.0 * a));
    	else
    		tmp_1 = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_2));
    	end
    	return tmp_1
    end
    
    code[a_, b_, c_] := Block[{t$95$0 = N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * c + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$1 = N[Sqrt[N[(1.0 - N[(N[(c / b), $MachinePrecision] * N[(N[(a * 4.0), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[(N[Abs[b], $MachinePrecision] * N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * N[(c / N[(b * b), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -1.05e-18], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[(t$95$1 * (-b)), $MachinePrecision]), $MachinePrecision] / N[(a + a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(t$95$1 * (-b) + (-b)), $MachinePrecision]), $MachinePrecision]], If[LessEqual[b, 8e+93], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$0), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$0), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$2), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$2), $MachinePrecision]), $MachinePrecision]]]]]]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\
    t_1 := \sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}}\\
    t_2 := \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}\\
    \mathbf{if}\;b \leq -1.05 \cdot 10^{-18}:\\
    \;\;\;\;\begin{array}{l}
    \mathbf{if}\;b \geq 0:\\
    \;\;\;\;\frac{\left(-b\right) - t\_1 \cdot \left(-b\right)}{a + a}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{c + c}{\mathsf{fma}\left(t\_1, -b, -b\right)}\\
    
    
    \end{array}\\
    
    \mathbf{elif}\;b \leq 8 \cdot 10^{+93}:\\
    \;\;\;\;\begin{array}{l}
    \mathbf{if}\;b \geq 0:\\
    \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\
    
    
    \end{array}\\
    
    \mathbf{elif}\;b \geq 0:\\
    \;\;\;\;\frac{\left(-b\right) - t\_2}{2 \cdot a}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_2}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 3 regimes
    2. if b < -1.05e-18

      1. Initial program 72.2%

        \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      2. Step-by-step derivation
        1. lift-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. lift--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. sub-to-multN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. sqrt-prodN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        5. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        6. rem-sqrt-square-revN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        7. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        8. lower-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        9. lower--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        11. associate-/l*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        12. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        13. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        14. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        15. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        16. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        17. lower-fabs.f6474.1

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      3. Applied rewrites74.1%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
      4. Step-by-step derivation
        1. lift-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
        2. lift--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. sub-to-multN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
        4. sqrt-prodN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
        5. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
        6. rem-sqrt-square-revN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        7. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        8. lower-sqrt.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        9. lower--.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        11. associate-/l*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        12. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        13. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        14. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        15. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        16. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        17. lower-fabs.f6476.8

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
      5. Applied rewrites76.8%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
      6. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        2. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        3. lift-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        4. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{c}{\color{blue}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        5. associate-/r*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b}}{b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        6. associate-*l/N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        7. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        8. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b} \cdot \left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        9. lower-/.f6479.5

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b}} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        11. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        12. lift-*.f6479.5

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      7. Applied rewrites79.5%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
      8. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        2. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        3. lift-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        4. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        5. associate-/r*N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b}}{b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
        6. associate-*l/N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        7. lower-/.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        8. lower-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        9. lower-/.f6482.3

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        10. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        11. *-commutativeN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        12. lift-*.f6482.3

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      9. Applied rewrites82.3%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      10. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        2. count-2-revN/A

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
        3. lower-+.f6482.3

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      11. Applied rewrites82.3%

        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
      12. Step-by-step derivation
        1. Applied rewrites42.6%

          \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}} \cdot \left(-b\right)}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\mathsf{fma}\left(\sqrt{1 - \frac{c}{b} \cdot \frac{a \cdot 4}{b}}, -b, -b\right)}\\ } \end{array}} \]

        if -1.05e-18 < b < 8.00000000000000035e93

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\left(\mathsf{neg}\left(\color{blue}{\left(4 \cdot a\right) \cdot c}\right)\right) + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          5. distribute-lft-neg-outN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          6. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(\color{blue}{4 \cdot a}\right), c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          9. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          10. metadata-eval72.2

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{-4} \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. Applied rewrites72.2%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. Step-by-step derivation
          1. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}\\ \end{array} \]
          3. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
          4. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
          5. distribute-lft-neg-outN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c + b \cdot b}}\\ \end{array} \]
          6. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
          9. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
          10. metadata-eval72.2

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
        5. Applied rewrites72.2%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]

        if 8.00000000000000035e93 < b

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          17. lower-fabs.f6474.1

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. Applied rewrites74.1%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          17. lower-fabs.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        5. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        6. Step-by-step derivation
          1. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          2. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          3. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          4. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          5. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{1 + \left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          6. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right) + 1}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\color{blue}{\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}\right)\right) + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\left(\mathsf{neg}\left(a \cdot 4\right)\right) \cdot \frac{c}{b \cdot b}} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\color{blue}{a \cdot 4}\right)\right) \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          10. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\color{blue}{4 \cdot a}\right)\right) \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          11. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a\right)} \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          12. metadata-evalN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\color{blue}{-4} \cdot a\right) \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          13. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          14. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(\color{blue}{-4 \cdot a}, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        7. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        8. Step-by-step derivation
          1. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          2. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}\\ \end{array} \]
          3. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}\\ \end{array} \]
          4. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}\\ \end{array} \]
          5. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{1 + \left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right)}}\\ \end{array} \]
          6. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{\left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right) + 1}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right) + 1}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|\color{blue}{b}\right| \cdot \sqrt{\left(\mathsf{neg}\left(a \cdot 4\right)\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          9. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(a \cdot 4\right)\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          10. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          11. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          12. metadata-evalN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(-4 \cdot a\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          13. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}\\ \end{array} \]
          14. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|\color{blue}{b}\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}\\ \end{array} \]
        9. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}}\\ \end{array} \]
      13. Recombined 3 regimes into one program.
      14. Add Preprocessing

      Alternative 3: 92.1% accurate, 0.7× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\ t_1 := \frac{c}{b \cdot b}\\ t_2 := \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, t\_1, 1\right)}\\ \mathbf{if}\;b \leq -4 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \left(a \cdot 4\right) \cdot t\_1}, \left|b\right|, -b\right)}\\ \end{array}\\ \mathbf{elif}\;b \leq 8 \cdot 10^{+93}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_2}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_2}\\ \end{array} \end{array} \]
      (FPCore (a b c)
       :precision binary64
       (let* ((t_0 (sqrt (fma (* -4.0 a) c (* b b))))
              (t_1 (/ c (* b b)))
              (t_2 (* (fabs b) (sqrt (fma (* -4.0 a) t_1 1.0)))))
         (if (<= b -4e-8)
           (if (>= b 0.0)
             (/ (- (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a))
             (/ (* 2.0 c) (fma (sqrt (- 1.0 (* (* a 4.0) t_1))) (fabs b) (- b))))
           (if (<= b 8e+93)
             (if (>= b 0.0) (/ (- (- b) t_0) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) t_0)))
             (if (>= b 0.0)
               (/ (- (- b) t_2) (* 2.0 a))
               (/ (* 2.0 c) (+ (- b) t_2)))))))
      double code(double a, double b, double c) {
      	double t_0 = sqrt(fma((-4.0 * a), c, (b * b)));
      	double t_1 = c / (b * b);
      	double t_2 = fabs(b) * sqrt(fma((-4.0 * a), t_1, 1.0));
      	double tmp_1;
      	if (b <= -4e-8) {
      		double tmp_2;
      		if (b >= 0.0) {
      			tmp_2 = (-b - sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
      		} else {
      			tmp_2 = (2.0 * c) / fma(sqrt((1.0 - ((a * 4.0) * t_1))), fabs(b), -b);
      		}
      		tmp_1 = tmp_2;
      	} else if (b <= 8e+93) {
      		double tmp_3;
      		if (b >= 0.0) {
      			tmp_3 = (-b - t_0) / (2.0 * a);
      		} else {
      			tmp_3 = (2.0 * c) / (-b + t_0);
      		}
      		tmp_1 = tmp_3;
      	} else if (b >= 0.0) {
      		tmp_1 = (-b - t_2) / (2.0 * a);
      	} else {
      		tmp_1 = (2.0 * c) / (-b + t_2);
      	}
      	return tmp_1;
      }
      
      function code(a, b, c)
      	t_0 = sqrt(fma(Float64(-4.0 * a), c, Float64(b * b)))
      	t_1 = Float64(c / Float64(b * b))
      	t_2 = Float64(abs(b) * sqrt(fma(Float64(-4.0 * a), t_1, 1.0)))
      	tmp_1 = 0.0
      	if (b <= -4e-8)
      		tmp_2 = 0.0
      		if (b >= 0.0)
      			tmp_2 = Float64(Float64(Float64(-b) - sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))) / Float64(2.0 * a));
      		else
      			tmp_2 = Float64(Float64(2.0 * c) / fma(sqrt(Float64(1.0 - Float64(Float64(a * 4.0) * t_1))), abs(b), Float64(-b)));
      		end
      		tmp_1 = tmp_2;
      	elseif (b <= 8e+93)
      		tmp_3 = 0.0
      		if (b >= 0.0)
      			tmp_3 = Float64(Float64(Float64(-b) - t_0) / Float64(2.0 * a));
      		else
      			tmp_3 = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_0));
      		end
      		tmp_1 = tmp_3;
      	elseif (b >= 0.0)
      		tmp_1 = Float64(Float64(Float64(-b) - t_2) / Float64(2.0 * a));
      	else
      		tmp_1 = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_2));
      	end
      	return tmp_1
      end
      
      code[a_, b_, c_] := Block[{t$95$0 = N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * c + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$1 = N[(c / N[(b * b), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Abs[b], $MachinePrecision] * N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * t$95$1 + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[b, -4e-8], If[GreaterEqual[b, 0.0], 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], N[(N[(2.0 * c), $MachinePrecision] / N[(N[Sqrt[N[(1.0 - N[(N[(a * 4.0), $MachinePrecision] * t$95$1), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] * N[Abs[b], $MachinePrecision] + (-b)), $MachinePrecision]), $MachinePrecision]], If[LessEqual[b, 8e+93], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$0), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$0), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$2), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$2), $MachinePrecision]), $MachinePrecision]]]]]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\
      t_1 := \frac{c}{b \cdot b}\\
      t_2 := \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, t\_1, 1\right)}\\
      \mathbf{if}\;b \leq -4 \cdot 10^{-8}:\\
      \;\;\;\;\begin{array}{l}
      \mathbf{if}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \left(a \cdot 4\right) \cdot t\_1}, \left|b\right|, -b\right)}\\
      
      
      \end{array}\\
      
      \mathbf{elif}\;b \leq 8 \cdot 10^{+93}:\\
      \;\;\;\;\begin{array}{l}
      \mathbf{if}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\
      
      
      \end{array}\\
      
      \mathbf{elif}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - t\_2}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_2}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 3 regimes
      2. if b < -4.0000000000000001e-8

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift-+.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
          2. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}}\\ \end{array} \]
          3. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2 \cdot c}}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}\\ \end{array} \]
          4. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2} \cdot c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}\\ \end{array} \]
          5. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2} \cdot c}{\sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)} + \left(-b\right)}\\ \end{array} \]
          6. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2 \cdot c}}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b} + \left(-b\right)}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b} + \left(-b\right)}\\ \end{array} \]
          8. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot \color{blue}{c}}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right| + \left(-b\right)}\\ \end{array} \]
          9. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}, \left|b\right|, -b\right)}}\\ \end{array} \]
        3. Applied rewrites75.0%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}, \left|b\right|, -b\right)}}\\ \end{array} \]

        if -4.0000000000000001e-8 < b < 8.00000000000000035e93

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\left(\mathsf{neg}\left(\color{blue}{\left(4 \cdot a\right) \cdot c}\right)\right) + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          5. distribute-lft-neg-outN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          6. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(\color{blue}{4 \cdot a}\right), c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          9. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          10. metadata-eval72.2

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{-4} \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. Applied rewrites72.2%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. Step-by-step derivation
          1. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}\\ \end{array} \]
          3. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
          4. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
          5. distribute-lft-neg-outN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c + b \cdot b}}\\ \end{array} \]
          6. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
          9. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
          10. metadata-eval72.2

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
        5. Applied rewrites72.2%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]

        if 8.00000000000000035e93 < b

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          17. lower-fabs.f6474.1

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. Applied rewrites74.1%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          17. lower-fabs.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        5. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        6. Step-by-step derivation
          1. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          2. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          3. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          4. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          5. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{1 + \left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          6. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right) + 1}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\color{blue}{\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}\right)\right) + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\left(\mathsf{neg}\left(a \cdot 4\right)\right) \cdot \frac{c}{b \cdot b}} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\color{blue}{a \cdot 4}\right)\right) \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          10. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\color{blue}{4 \cdot a}\right)\right) \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          11. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a\right)} \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          12. metadata-evalN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\left(\color{blue}{-4} \cdot a\right) \cdot \frac{c}{b \cdot b} + 1}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          13. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          14. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(\color{blue}{-4 \cdot a}, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        7. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        8. Step-by-step derivation
          1. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          2. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}\\ \end{array} \]
          3. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right| \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}}\\ \end{array} \]
          4. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}}\\ \end{array} \]
          5. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{1 + \left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right)}}\\ \end{array} \]
          6. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{\left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right) + 1}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}\right)\right) + 1}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|\color{blue}{b}\right| \cdot \sqrt{\left(\mathsf{neg}\left(a \cdot 4\right)\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          9. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(a \cdot 4\right)\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          10. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          11. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          12. metadata-evalN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right| \cdot \sqrt{\left(-4 \cdot a\right) \cdot \frac{c}{b \cdot b} + 1}}\\ \end{array} \]
          13. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|} \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}\\ \end{array} \]
          14. lower-*.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|\color{blue}{b}\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}\\ \end{array} \]
        9. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right| \cdot \sqrt{\mathsf{fma}\left(-4 \cdot a, \frac{c}{b \cdot b}, 1\right)}}}\\ \end{array} \]
      3. Recombined 3 regimes into one program.
      4. Add Preprocessing

      Alternative 4: 91.6% accurate, 0.7× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\ \mathbf{if}\;b \leq -4 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}, \left|b\right|, -b\right)}\\ \end{array}\\ \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \end{array} \]
      (FPCore (a b c)
       :precision binary64
       (let* ((t_0 (sqrt (fma (* -4.0 a) c (* b b)))))
         (if (<= b -4e-8)
           (if (>= b 0.0)
             (/ (- (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a))
             (/
              (* 2.0 c)
              (fma (sqrt (- 1.0 (* (* a 4.0) (/ c (* b b))))) (fabs b) (- b))))
           (if (<= b 4.2e+94)
             (if (>= b 0.0) (/ (- (- b) t_0) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) t_0)))
             (if (>= b 0.0)
               (/ (- (- b) (fabs b)) (* 2.0 a))
               (* c (/ 2.0 (- (fabs b) b))))))))
      double code(double a, double b, double c) {
      	double t_0 = sqrt(fma((-4.0 * a), c, (b * b)));
      	double tmp_1;
      	if (b <= -4e-8) {
      		double tmp_2;
      		if (b >= 0.0) {
      			tmp_2 = (-b - sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
      		} else {
      			tmp_2 = (2.0 * c) / fma(sqrt((1.0 - ((a * 4.0) * (c / (b * b))))), fabs(b), -b);
      		}
      		tmp_1 = tmp_2;
      	} else if (b <= 4.2e+94) {
      		double tmp_3;
      		if (b >= 0.0) {
      			tmp_3 = (-b - t_0) / (2.0 * a);
      		} else {
      			tmp_3 = (2.0 * c) / (-b + t_0);
      		}
      		tmp_1 = tmp_3;
      	} else if (b >= 0.0) {
      		tmp_1 = (-b - fabs(b)) / (2.0 * a);
      	} else {
      		tmp_1 = c * (2.0 / (fabs(b) - b));
      	}
      	return tmp_1;
      }
      
      function code(a, b, c)
      	t_0 = sqrt(fma(Float64(-4.0 * a), c, Float64(b * b)))
      	tmp_1 = 0.0
      	if (b <= -4e-8)
      		tmp_2 = 0.0
      		if (b >= 0.0)
      			tmp_2 = Float64(Float64(Float64(-b) - sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))) / Float64(2.0 * a));
      		else
      			tmp_2 = Float64(Float64(2.0 * c) / fma(sqrt(Float64(1.0 - Float64(Float64(a * 4.0) * Float64(c / Float64(b * b))))), abs(b), Float64(-b)));
      		end
      		tmp_1 = tmp_2;
      	elseif (b <= 4.2e+94)
      		tmp_3 = 0.0
      		if (b >= 0.0)
      			tmp_3 = Float64(Float64(Float64(-b) - t_0) / Float64(2.0 * a));
      		else
      			tmp_3 = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_0));
      		end
      		tmp_1 = tmp_3;
      	elseif (b >= 0.0)
      		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
      	else
      		tmp_1 = Float64(c * Float64(2.0 / Float64(abs(b) - b)));
      	end
      	return tmp_1
      end
      
      code[a_, b_, c_] := Block[{t$95$0 = N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * c + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[b, -4e-8], If[GreaterEqual[b, 0.0], 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], N[(N[(2.0 * c), $MachinePrecision] / N[(N[Sqrt[N[(1.0 - N[(N[(a * 4.0), $MachinePrecision] * N[(c / N[(b * b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] * N[Abs[b], $MachinePrecision] + (-b)), $MachinePrecision]), $MachinePrecision]], If[LessEqual[b, 4.2e+94], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$0), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$0), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\
      \mathbf{if}\;b \leq -4 \cdot 10^{-8}:\\
      \;\;\;\;\begin{array}{l}
      \mathbf{if}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}, \left|b\right|, -b\right)}\\
      
      
      \end{array}\\
      
      \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\
      \;\;\;\;\begin{array}{l}
      \mathbf{if}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - t\_0}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_0}\\
      
      
      \end{array}\\
      
      \mathbf{elif}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 3 regimes
      2. if b < -4.0000000000000001e-8

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift-+.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
          2. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}}\\ \end{array} \]
          3. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2 \cdot c}}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}\\ \end{array} \]
          4. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2} \cdot c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}\\ \end{array} \]
          5. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2} \cdot c}{\sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)} + \left(-b\right)}\\ \end{array} \]
          6. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{\color{blue}{2 \cdot c}}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b} + \left(-b\right)}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b} + \left(-b\right)}\\ \end{array} \]
          8. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot \color{blue}{c}}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right| + \left(-b\right)}\\ \end{array} \]
          9. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}, \left|b\right|, -b\right)}}\\ \end{array} \]
        3. Applied rewrites75.0%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\mathsf{fma}\left(\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}, \left|b\right|, -b\right)}}\\ \end{array} \]

        if -4.0000000000000001e-8 < b < 4.19999999999999979e94

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\left(\mathsf{neg}\left(\color{blue}{\left(4 \cdot a\right) \cdot c}\right)\right) + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          5. distribute-lft-neg-outN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          6. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(\color{blue}{4 \cdot a}\right), c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          9. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          10. metadata-eval72.2

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{-4} \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. Applied rewrites72.2%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. Step-by-step derivation
          1. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. sub-flipN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}\\ \end{array} \]
          3. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
          4. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
          5. distribute-lft-neg-outN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c + b \cdot b}}\\ \end{array} \]
          6. lower-fma.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
          7. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
          8. distribute-lft-neg-inN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
          9. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
          10. metadata-eval72.2

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
        5. Applied rewrites72.2%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]

        if 4.19999999999999979e94 < b

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          17. lower-fabs.f6474.1

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. Applied rewrites74.1%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          17. lower-fabs.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        5. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        6. Taylor expanded in a around 0

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        7. Step-by-step derivation
          1. lower-fabs.f6472.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        8. Applied rewrites72.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        9. Taylor expanded in a around 0

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
        10. Step-by-step derivation
          1. lower-fabs.f6468.6

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
        11. Applied rewrites68.6%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
        12. Step-by-step derivation
          1. lift-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
          2. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
          3. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
          4. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
          5. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
          6. lower-/.f6468.5

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
          7. lift-+.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
          8. +-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
          9. lift-neg.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
          10. sub-flip-reverseN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
          11. lower--.f6468.5

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
        13. Applied rewrites68.5%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
      3. Recombined 3 regimes into one program.
      4. Add Preprocessing

      Alternative 5: 90.9% accurate, 0.8× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ t_1 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\ \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - t\_1}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_1}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
      (FPCore (a b c)
       :precision binary64
       (let* ((t_0 (- (fabs b) b)) (t_1 (sqrt (fma (* -4.0 a) c (* b b)))))
         (if (<= b -3.15e+137)
           (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
           (if (<= b 4.2e+94)
             (if (>= b 0.0) (/ (- (- b) t_1) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) t_1)))
             (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
      double code(double a, double b, double c) {
      	double t_0 = fabs(b) - b;
      	double t_1 = sqrt(fma((-4.0 * a), c, (b * b)));
      	double tmp_1;
      	if (b <= -3.15e+137) {
      		double tmp_2;
      		if (b >= 0.0) {
      			tmp_2 = ((-b + b) * -0.5) / a;
      		} else {
      			tmp_2 = (c + c) / t_0;
      		}
      		tmp_1 = tmp_2;
      	} else if (b <= 4.2e+94) {
      		double tmp_3;
      		if (b >= 0.0) {
      			tmp_3 = (-b - t_1) / (2.0 * a);
      		} else {
      			tmp_3 = (2.0 * c) / (-b + t_1);
      		}
      		tmp_1 = tmp_3;
      	} else if (b >= 0.0) {
      		tmp_1 = (-b - fabs(b)) / (2.0 * a);
      	} else {
      		tmp_1 = c * (2.0 / t_0);
      	}
      	return tmp_1;
      }
      
      function code(a, b, c)
      	t_0 = Float64(abs(b) - b)
      	t_1 = sqrt(fma(Float64(-4.0 * a), c, Float64(b * b)))
      	tmp_1 = 0.0
      	if (b <= -3.15e+137)
      		tmp_2 = 0.0
      		if (b >= 0.0)
      			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
      		else
      			tmp_2 = Float64(Float64(c + c) / t_0);
      		end
      		tmp_1 = tmp_2;
      	elseif (b <= 4.2e+94)
      		tmp_3 = 0.0
      		if (b >= 0.0)
      			tmp_3 = Float64(Float64(Float64(-b) - t_1) / Float64(2.0 * a));
      		else
      			tmp_3 = Float64(Float64(2.0 * c) / Float64(Float64(-b) + t_1));
      		end
      		tmp_1 = tmp_3;
      	elseif (b >= 0.0)
      		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
      	else
      		tmp_1 = Float64(c * Float64(2.0 / t_0));
      	end
      	return tmp_1
      end
      
      code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, Block[{t$95$1 = N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * c + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[b, -3.15e+137], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 4.2e+94], If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$1), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + t$95$1), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_0 := \left|b\right| - b\\
      t_1 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\
      \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\
      \;\;\;\;\begin{array}{l}
      \mathbf{if}\;b \geq 0:\\
      \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{c + c}{t\_0}\\
      
      
      \end{array}\\
      
      \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\
      \;\;\;\;\begin{array}{l}
      \mathbf{if}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - t\_1}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + t\_1}\\
      
      
      \end{array}\\
      
      \mathbf{elif}\;b \geq 0:\\
      \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
      
      \mathbf{else}:\\
      \;\;\;\;c \cdot \frac{2}{t\_0}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 3 regimes
      2. if b < -3.14999999999999986e137

        1. Initial program 72.2%

          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        2. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          17. lower-fabs.f6474.1

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        3. Applied rewrites74.1%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
        4. Step-by-step derivation
          1. lift-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
          2. lift--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. sub-to-multN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
          4. sqrt-prodN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
          5. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
          6. rem-sqrt-square-revN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          7. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          8. lower-sqrt.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. lower--.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          10. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          11. associate-/l*N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          12. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          13. lift-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          14. *-commutativeN/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          15. lower-*.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          16. lower-/.f64N/A

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          17. lower-fabs.f6476.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        5. Applied rewrites76.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
        6. Taylor expanded in a around 0

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        7. Step-by-step derivation
          1. lower-fabs.f6472.8

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        8. Applied rewrites72.8%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
        9. Taylor expanded in a around 0

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
        10. Step-by-step derivation
          1. lower-fabs.f6468.6

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
        11. Applied rewrites68.6%

          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
        12. Step-by-step derivation
          1. Applied rewrites68.5%

            \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
          2. Step-by-step derivation
            1. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
            2. lift-/.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
            3. associate-*r/N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
            4. lower-/.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
          3. Applied rewrites35.9%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

          if -3.14999999999999986e137 < b < 4.19999999999999979e94

          1. Initial program 72.2%

            \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. Step-by-step derivation
            1. lift--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            2. sub-flipN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            3. +-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            4. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\left(\mathsf{neg}\left(\color{blue}{\left(4 \cdot a\right) \cdot c}\right)\right) + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            5. distribute-lft-neg-outN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            6. lower-fma.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            7. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(\color{blue}{4 \cdot a}\right), c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            8. distribute-lft-neg-inN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            9. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot a}, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            10. metadata-eval72.2

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{-4} \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. Applied rewrites72.2%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. Step-by-step derivation
            1. lift--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            2. sub-flipN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b + \left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right)}}\\ \end{array} \]
            3. +-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
            4. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\left(\mathsf{neg}\left(\left(4 \cdot a\right) \cdot c\right)\right) + b \cdot b}}\\ \end{array} \]
            5. distribute-lft-neg-outN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\left(\mathsf{neg}\left(4 \cdot a\right)\right) \cdot c + b \cdot b}}\\ \end{array} \]
            6. lower-fma.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
            7. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(\mathsf{neg}\left(4 \cdot a\right), c, b \cdot b\right)}}\\ \end{array} \]
            8. distribute-lft-neg-inN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
            9. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{\mathsf{fma}\left(\left(\mathsf{neg}\left(4\right)\right) \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
            10. metadata-eval72.2

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]
          5. Applied rewrites72.2%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}}\\ \end{array} \]

          if 4.19999999999999979e94 < b

          1. Initial program 72.2%

            \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. Step-by-step derivation
            1. lift-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            2. lift--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            3. sub-to-multN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            4. sqrt-prodN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            5. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            6. rem-sqrt-square-revN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            7. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            8. lower-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            9. lower--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            10. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            11. associate-/l*N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            12. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            13. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            14. *-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            15. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            16. lower-/.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            17. lower-fabs.f6474.1

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. Applied rewrites74.1%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. Step-by-step derivation
            1. lift-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
            2. lift--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            3. sub-to-multN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
            4. sqrt-prodN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
            5. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
            6. rem-sqrt-square-revN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
            7. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
            8. lower-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            9. lower--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            10. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            11. associate-/l*N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            12. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            13. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            14. *-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            15. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            16. lower-/.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            17. lower-fabs.f6476.8

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          5. Applied rewrites76.8%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          6. Taylor expanded in a around 0

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          7. Step-by-step derivation
            1. lower-fabs.f6472.8

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          8. Applied rewrites72.8%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. Taylor expanded in a around 0

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
          10. Step-by-step derivation
            1. lower-fabs.f6468.6

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
          11. Applied rewrites68.6%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
          12. Step-by-step derivation
            1. lift-/.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
            2. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
            3. *-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
            4. associate-/l*N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
            5. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
            6. lower-/.f6468.5

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
            7. lift-+.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
            8. +-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
            9. lift-neg.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
            10. sub-flip-reverseN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
            11. lower--.f6468.5

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
          13. Applied rewrites68.5%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
        13. Recombined 3 regimes into one program.
        14. Add Preprocessing

        Alternative 6: 90.9% accurate, 0.8× speedup?

        \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ t_1 := \sqrt{\mathsf{fma}\left(-4, c \cdot a, b \cdot b\right)}\\ \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{t\_1 + b}{-2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_1 - b}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
        (FPCore (a b c)
         :precision binary64
         (let* ((t_0 (- (fabs b) b)) (t_1 (sqrt (fma -4.0 (* c a) (* b b)))))
           (if (<= b -3.15e+137)
             (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
             (if (<= b 4.2e+94)
               (if (>= b 0.0) (/ (+ t_1 b) (* -2.0 a)) (/ (+ c c) (- t_1 b)))
               (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
        double code(double a, double b, double c) {
        	double t_0 = fabs(b) - b;
        	double t_1 = sqrt(fma(-4.0, (c * a), (b * b)));
        	double tmp_1;
        	if (b <= -3.15e+137) {
        		double tmp_2;
        		if (b >= 0.0) {
        			tmp_2 = ((-b + b) * -0.5) / a;
        		} else {
        			tmp_2 = (c + c) / t_0;
        		}
        		tmp_1 = tmp_2;
        	} else if (b <= 4.2e+94) {
        		double tmp_3;
        		if (b >= 0.0) {
        			tmp_3 = (t_1 + b) / (-2.0 * a);
        		} else {
        			tmp_3 = (c + c) / (t_1 - b);
        		}
        		tmp_1 = tmp_3;
        	} else if (b >= 0.0) {
        		tmp_1 = (-b - fabs(b)) / (2.0 * a);
        	} else {
        		tmp_1 = c * (2.0 / t_0);
        	}
        	return tmp_1;
        }
        
        function code(a, b, c)
        	t_0 = Float64(abs(b) - b)
        	t_1 = sqrt(fma(-4.0, Float64(c * a), Float64(b * b)))
        	tmp_1 = 0.0
        	if (b <= -3.15e+137)
        		tmp_2 = 0.0
        		if (b >= 0.0)
        			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
        		else
        			tmp_2 = Float64(Float64(c + c) / t_0);
        		end
        		tmp_1 = tmp_2;
        	elseif (b <= 4.2e+94)
        		tmp_3 = 0.0
        		if (b >= 0.0)
        			tmp_3 = Float64(Float64(t_1 + b) / Float64(-2.0 * a));
        		else
        			tmp_3 = Float64(Float64(c + c) / Float64(t_1 - b));
        		end
        		tmp_1 = tmp_3;
        	elseif (b >= 0.0)
        		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
        	else
        		tmp_1 = Float64(c * Float64(2.0 / t_0));
        	end
        	return tmp_1
        end
        
        code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, Block[{t$95$1 = N[Sqrt[N[(-4.0 * N[(c * a), $MachinePrecision] + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[b, -3.15e+137], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 4.2e+94], If[GreaterEqual[b, 0.0], N[(N[(t$95$1 + b), $MachinePrecision] / N[(-2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(t$95$1 - b), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]]
        
        \begin{array}{l}
        
        \\
        \begin{array}{l}
        t_0 := \left|b\right| - b\\
        t_1 := \sqrt{\mathsf{fma}\left(-4, c \cdot a, b \cdot b\right)}\\
        \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\
        \;\;\;\;\begin{array}{l}
        \mathbf{if}\;b \geq 0:\\
        \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
        
        \mathbf{else}:\\
        \;\;\;\;\frac{c + c}{t\_0}\\
        
        
        \end{array}\\
        
        \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\
        \;\;\;\;\begin{array}{l}
        \mathbf{if}\;b \geq 0:\\
        \;\;\;\;\frac{t\_1 + b}{-2 \cdot a}\\
        
        \mathbf{else}:\\
        \;\;\;\;\frac{c + c}{t\_1 - b}\\
        
        
        \end{array}\\
        
        \mathbf{elif}\;b \geq 0:\\
        \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
        
        \mathbf{else}:\\
        \;\;\;\;c \cdot \frac{2}{t\_0}\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 3 regimes
        2. if b < -3.14999999999999986e137

          1. Initial program 72.2%

            \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          2. Step-by-step derivation
            1. lift-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            2. lift--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            3. sub-to-multN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            4. sqrt-prodN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            5. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            6. rem-sqrt-square-revN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            7. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            8. lower-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            9. lower--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            10. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            11. associate-/l*N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            12. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            13. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            14. *-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            15. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            16. lower-/.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            17. lower-fabs.f6474.1

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          3. Applied rewrites74.1%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
          4. Step-by-step derivation
            1. lift-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
            2. lift--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            3. sub-to-multN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
            4. sqrt-prodN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
            5. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
            6. rem-sqrt-square-revN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
            7. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
            8. lower-sqrt.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            9. lower--.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            10. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            11. associate-/l*N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            12. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            13. lift-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            14. *-commutativeN/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            15. lower-*.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            16. lower-/.f64N/A

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
            17. lower-fabs.f6476.8

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          5. Applied rewrites76.8%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
          6. Taylor expanded in a around 0

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          7. Step-by-step derivation
            1. lower-fabs.f6472.8

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          8. Applied rewrites72.8%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
          9. Taylor expanded in a around 0

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
          10. Step-by-step derivation
            1. lower-fabs.f6468.6

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
          11. Applied rewrites68.6%

            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
          12. Step-by-step derivation
            1. Applied rewrites68.5%

              \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
            2. Step-by-step derivation
              1. lift-*.f64N/A

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
              2. lift-/.f64N/A

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
              3. associate-*r/N/A

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
              4. lower-/.f64N/A

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
            3. Applied rewrites35.9%

              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

            if -3.14999999999999986e137 < b < 4.19999999999999979e94

            1. Initial program 72.2%

              \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
            2. Step-by-step derivation
              1. Applied rewrites72.2%

                \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\sqrt{\mathsf{fma}\left(-4, c \cdot a, b \cdot b\right)} + b}{-2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{fma}\left(-4, c \cdot a, b \cdot b\right)} - b}\\ } \end{array}} \]

              if 4.19999999999999979e94 < b

              1. Initial program 72.2%

                \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
              2. Step-by-step derivation
                1. lift-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                2. lift--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                3. sub-to-multN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                4. sqrt-prodN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                5. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                6. rem-sqrt-square-revN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                7. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                8. lower-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                9. lower--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                10. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                11. associate-/l*N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                12. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                13. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                14. *-commutativeN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                15. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                16. lower-/.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                17. lower-fabs.f6474.1

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
              3. Applied rewrites74.1%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
              4. Step-by-step derivation
                1. lift-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                2. lift--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                3. sub-to-multN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                4. sqrt-prodN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                5. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                6. rem-sqrt-square-revN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                7. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                8. lower-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                9. lower--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                10. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                11. associate-/l*N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                12. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                13. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                14. *-commutativeN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                15. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                16. lower-/.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                17. lower-fabs.f6476.8

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
              5. Applied rewrites76.8%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
              6. Taylor expanded in a around 0

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
              7. Step-by-step derivation
                1. lower-fabs.f6472.8

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
              8. Applied rewrites72.8%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
              9. Taylor expanded in a around 0

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
              10. Step-by-step derivation
                1. lower-fabs.f6468.6

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
              11. Applied rewrites68.6%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
              12. Step-by-step derivation
                1. lift-/.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                2. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                3. *-commutativeN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                4. associate-/l*N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                5. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                6. lower-/.f6468.5

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                7. lift-+.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                8. +-commutativeN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                9. lift-neg.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                10. sub-flip-reverseN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                11. lower--.f6468.5

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
              13. Applied rewrites68.5%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
            3. Recombined 3 regimes into one program.
            4. Add Preprocessing

            Alternative 7: 90.8% accurate, 0.8× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ t_1 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\ \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(t\_1 + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_1 - b}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
            (FPCore (a b c)
             :precision binary64
             (let* ((t_0 (- (fabs b) b)) (t_1 (sqrt (fma (* -4.0 a) c (* b b)))))
               (if (<= b -3.15e+137)
                 (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                 (if (<= b 4.2e+94)
                   (if (>= b 0.0) (* (+ t_1 b) (/ -0.5 a)) (/ (+ c c) (- t_1 b)))
                   (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
            double code(double a, double b, double c) {
            	double t_0 = fabs(b) - b;
            	double t_1 = sqrt(fma((-4.0 * a), c, (b * b)));
            	double tmp_1;
            	if (b <= -3.15e+137) {
            		double tmp_2;
            		if (b >= 0.0) {
            			tmp_2 = ((-b + b) * -0.5) / a;
            		} else {
            			tmp_2 = (c + c) / t_0;
            		}
            		tmp_1 = tmp_2;
            	} else if (b <= 4.2e+94) {
            		double tmp_3;
            		if (b >= 0.0) {
            			tmp_3 = (t_1 + b) * (-0.5 / a);
            		} else {
            			tmp_3 = (c + c) / (t_1 - b);
            		}
            		tmp_1 = tmp_3;
            	} else if (b >= 0.0) {
            		tmp_1 = (-b - fabs(b)) / (2.0 * a);
            	} else {
            		tmp_1 = c * (2.0 / t_0);
            	}
            	return tmp_1;
            }
            
            function code(a, b, c)
            	t_0 = Float64(abs(b) - b)
            	t_1 = sqrt(fma(Float64(-4.0 * a), c, Float64(b * b)))
            	tmp_1 = 0.0
            	if (b <= -3.15e+137)
            		tmp_2 = 0.0
            		if (b >= 0.0)
            			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
            		else
            			tmp_2 = Float64(Float64(c + c) / t_0);
            		end
            		tmp_1 = tmp_2;
            	elseif (b <= 4.2e+94)
            		tmp_3 = 0.0
            		if (b >= 0.0)
            			tmp_3 = Float64(Float64(t_1 + b) * Float64(-0.5 / a));
            		else
            			tmp_3 = Float64(Float64(c + c) / Float64(t_1 - b));
            		end
            		tmp_1 = tmp_3;
            	elseif (b >= 0.0)
            		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
            	else
            		tmp_1 = Float64(c * Float64(2.0 / t_0));
            	end
            	return tmp_1
            end
            
            code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, Block[{t$95$1 = N[Sqrt[N[(N[(-4.0 * a), $MachinePrecision] * c + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[b, -3.15e+137], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 4.2e+94], If[GreaterEqual[b, 0.0], N[(N[(t$95$1 + b), $MachinePrecision] * N[(-0.5 / a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(t$95$1 - b), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]]
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            t_0 := \left|b\right| - b\\
            t_1 := \sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)}\\
            \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\
            \;\;\;\;\begin{array}{l}
            \mathbf{if}\;b \geq 0:\\
            \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
            
            \mathbf{else}:\\
            \;\;\;\;\frac{c + c}{t\_0}\\
            
            
            \end{array}\\
            
            \mathbf{elif}\;b \leq 4.2 \cdot 10^{+94}:\\
            \;\;\;\;\begin{array}{l}
            \mathbf{if}\;b \geq 0:\\
            \;\;\;\;\left(t\_1 + b\right) \cdot \frac{-0.5}{a}\\
            
            \mathbf{else}:\\
            \;\;\;\;\frac{c + c}{t\_1 - b}\\
            
            
            \end{array}\\
            
            \mathbf{elif}\;b \geq 0:\\
            \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
            
            \mathbf{else}:\\
            \;\;\;\;c \cdot \frac{2}{t\_0}\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 3 regimes
            2. if b < -3.14999999999999986e137

              1. Initial program 72.2%

                \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
              2. Step-by-step derivation
                1. lift-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                2. lift--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                3. sub-to-multN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                4. sqrt-prodN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                5. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                6. rem-sqrt-square-revN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                7. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                8. lower-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                9. lower--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                10. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                11. associate-/l*N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                12. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                13. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                14. *-commutativeN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                15. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                16. lower-/.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                17. lower-fabs.f6474.1

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
              3. Applied rewrites74.1%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
              4. Step-by-step derivation
                1. lift-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                2. lift--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                3. sub-to-multN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                4. sqrt-prodN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                5. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                6. rem-sqrt-square-revN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                7. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                8. lower-sqrt.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                9. lower--.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                10. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                11. associate-/l*N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                12. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                13. lift-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                14. *-commutativeN/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                15. lower-*.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                16. lower-/.f64N/A

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                17. lower-fabs.f6476.8

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
              5. Applied rewrites76.8%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
              6. Taylor expanded in a around 0

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
              7. Step-by-step derivation
                1. lower-fabs.f6472.8

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
              8. Applied rewrites72.8%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
              9. Taylor expanded in a around 0

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
              10. Step-by-step derivation
                1. lower-fabs.f6468.6

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
              11. Applied rewrites68.6%

                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
              12. Step-by-step derivation
                1. Applied rewrites68.5%

                  \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                2. Step-by-step derivation
                  1. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                  2. lift-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                  3. associate-*r/N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                  4. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                3. Applied rewrites35.9%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                if -3.14999999999999986e137 < b < 4.19999999999999979e94

                1. Initial program 72.2%

                  \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                2. Step-by-step derivation
                  1. lift-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  2. lift--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. sub-to-multN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  4. sqrt-prodN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  5. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  6. rem-sqrt-square-revN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  7. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  8. lower-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  9. lower--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  11. associate-/l*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  12. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  13. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  14. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  15. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  16. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  17. lower-fabs.f6474.1

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                3. Applied rewrites74.1%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                4. Step-by-step derivation
                  1. lift-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                  2. lift--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. sub-to-multN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                  4. sqrt-prodN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                  5. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                  6. rem-sqrt-square-revN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  7. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  8. lower-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  9. lower--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  11. associate-/l*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  12. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  13. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  14. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  15. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  16. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  17. lower-fabs.f6476.8

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                5. Applied rewrites76.8%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                6. Step-by-step derivation
                  1. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  2. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  3. lift-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{c}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  4. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{c}{\color{blue}{b \cdot b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  5. associate-/r*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b}}{b}} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  6. associate-*l/N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  7. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  8. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b} \cdot \left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  9. lower-/.f6479.5

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\frac{c}{b}} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(a \cdot 4\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  11. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  12. lift-*.f6479.5

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \color{blue}{\left(4 \cdot a\right)}}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                7. Applied rewrites79.5%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                8. Step-by-step derivation
                  1. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  2. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
                  3. lift-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
                  4. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{c}{b \cdot b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
                  5. associate-/r*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b}}{b} \cdot \left(a \cdot 4\right)} \cdot \left|b\right|}\\ \end{array} \]
                  6. associate-*l/N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                  7. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                  8. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                  9. lower-/.f6482.3

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(a \cdot 4\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                  11. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                  12. lift-*.f6482.3

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                9. Applied rewrites82.3%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\frac{c}{b} \cdot \left(4 \cdot a\right)}{b}} \cdot \left|b\right|}\\ \end{array} \]
                10. Applied rewrites72.1%

                  \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)} + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{fma}\left(-4 \cdot a, c, b \cdot b\right)} - b}\\ } \end{array}} \]

                if 4.19999999999999979e94 < b

                1. Initial program 72.2%

                  \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                2. Step-by-step derivation
                  1. lift-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  2. lift--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. sub-to-multN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  4. sqrt-prodN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  5. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  6. rem-sqrt-square-revN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  7. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  8. lower-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  9. lower--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  11. associate-/l*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  12. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  13. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  14. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  15. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  16. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  17. lower-fabs.f6474.1

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                3. Applied rewrites74.1%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                4. Step-by-step derivation
                  1. lift-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                  2. lift--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. sub-to-multN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                  4. sqrt-prodN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                  5. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                  6. rem-sqrt-square-revN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  7. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  8. lower-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  9. lower--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  11. associate-/l*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  12. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  13. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  14. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  15. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  16. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  17. lower-fabs.f6476.8

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                5. Applied rewrites76.8%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                6. Taylor expanded in a around 0

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                7. Step-by-step derivation
                  1. lower-fabs.f6472.8

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                8. Applied rewrites72.8%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                9. Taylor expanded in a around 0

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                10. Step-by-step derivation
                  1. lower-fabs.f6468.6

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                11. Applied rewrites68.6%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                12. Step-by-step derivation
                  1. lift-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                  2. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                  3. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                  4. associate-/l*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                  5. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                  6. lower-/.f6468.5

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                  7. lift-+.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                  8. +-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                  9. lift-neg.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                  10. sub-flip-reverseN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                  11. lower--.f6468.5

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                13. Applied rewrites68.5%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
              13. Recombined 3 regimes into one program.
              14. Add Preprocessing

              Alternative 8: 86.1% accurate, 0.8× speedup?

              \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq -8 \cdot 10^{-191}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{fma}\left(c \cdot a, -4, b \cdot b\right)} - b}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\sqrt{\left(c \cdot a\right) \cdot -4} - b}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
              (FPCore (a b c)
               :precision binary64
               (let* ((t_0 (- (fabs b) b)))
                 (if (<= b -3.15e+137)
                   (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                   (if (<= b -8e-191)
                     (if (>= b 0.0)
                       (/ (* -2.0 b) (+ a a))
                       (/ (+ c c) (- (sqrt (fma (* c a) -4.0 (* b b))) b)))
                     (if (<= b 1.9e-61)
                       (if (>= b 0.0)
                         (/ (- (- b) (sqrt (* -4.0 (* a c)))) (* 2.0 a))
                         (* c (/ 2.0 (- (sqrt (* (* c a) -4.0)) b))))
                       (if (>= b 0.0)
                         (/ (- (- b) (fabs b)) (* 2.0 a))
                         (* c (/ 2.0 t_0))))))))
              double code(double a, double b, double c) {
              	double t_0 = fabs(b) - b;
              	double tmp_1;
              	if (b <= -3.15e+137) {
              		double tmp_2;
              		if (b >= 0.0) {
              			tmp_2 = ((-b + b) * -0.5) / a;
              		} else {
              			tmp_2 = (c + c) / t_0;
              		}
              		tmp_1 = tmp_2;
              	} else if (b <= -8e-191) {
              		double tmp_3;
              		if (b >= 0.0) {
              			tmp_3 = (-2.0 * b) / (a + a);
              		} else {
              			tmp_3 = (c + c) / (sqrt(fma((c * a), -4.0, (b * b))) - b);
              		}
              		tmp_1 = tmp_3;
              	} else if (b <= 1.9e-61) {
              		double tmp_4;
              		if (b >= 0.0) {
              			tmp_4 = (-b - sqrt((-4.0 * (a * c)))) / (2.0 * a);
              		} else {
              			tmp_4 = c * (2.0 / (sqrt(((c * a) * -4.0)) - b));
              		}
              		tmp_1 = tmp_4;
              	} else if (b >= 0.0) {
              		tmp_1 = (-b - fabs(b)) / (2.0 * a);
              	} else {
              		tmp_1 = c * (2.0 / t_0);
              	}
              	return tmp_1;
              }
              
              function code(a, b, c)
              	t_0 = Float64(abs(b) - b)
              	tmp_1 = 0.0
              	if (b <= -3.15e+137)
              		tmp_2 = 0.0
              		if (b >= 0.0)
              			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
              		else
              			tmp_2 = Float64(Float64(c + c) / t_0);
              		end
              		tmp_1 = tmp_2;
              	elseif (b <= -8e-191)
              		tmp_3 = 0.0
              		if (b >= 0.0)
              			tmp_3 = Float64(Float64(-2.0 * b) / Float64(a + a));
              		else
              			tmp_3 = Float64(Float64(c + c) / Float64(sqrt(fma(Float64(c * a), -4.0, Float64(b * b))) - b));
              		end
              		tmp_1 = tmp_3;
              	elseif (b <= 1.9e-61)
              		tmp_4 = 0.0
              		if (b >= 0.0)
              			tmp_4 = Float64(Float64(Float64(-b) - sqrt(Float64(-4.0 * Float64(a * c)))) / Float64(2.0 * a));
              		else
              			tmp_4 = Float64(c * Float64(2.0 / Float64(sqrt(Float64(Float64(c * a) * -4.0)) - b)));
              		end
              		tmp_1 = tmp_4;
              	elseif (b >= 0.0)
              		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
              	else
              		tmp_1 = Float64(c * Float64(2.0 / t_0));
              	end
              	return tmp_1
              end
              
              code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -3.15e+137], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, -8e-191], If[GreaterEqual[b, 0.0], N[(N[(-2.0 * b), $MachinePrecision] / N[(a + a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(N[Sqrt[N[(N[(c * a), $MachinePrecision] * -4.0 + N[(b * b), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]], If[LessEqual[b, 1.9e-61], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Sqrt[N[(-4.0 * N[(a * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / N[(N[Sqrt[N[(N[(c * a), $MachinePrecision] * -4.0), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]]
              
              \begin{array}{l}
              
              \\
              \begin{array}{l}
              t_0 := \left|b\right| - b\\
              \mathbf{if}\;b \leq -3.15 \cdot 10^{+137}:\\
              \;\;\;\;\begin{array}{l}
              \mathbf{if}\;b \geq 0:\\
              \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
              
              \mathbf{else}:\\
              \;\;\;\;\frac{c + c}{t\_0}\\
              
              
              \end{array}\\
              
              \mathbf{elif}\;b \leq -8 \cdot 10^{-191}:\\
              \;\;\;\;\begin{array}{l}
              \mathbf{if}\;b \geq 0:\\
              \;\;\;\;\frac{-2 \cdot b}{a + a}\\
              
              \mathbf{else}:\\
              \;\;\;\;\frac{c + c}{\sqrt{\mathsf{fma}\left(c \cdot a, -4, b \cdot b\right)} - b}\\
              
              
              \end{array}\\
              
              \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\
              \;\;\;\;\begin{array}{l}
              \mathbf{if}\;b \geq 0:\\
              \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\
              
              \mathbf{else}:\\
              \;\;\;\;c \cdot \frac{2}{\sqrt{\left(c \cdot a\right) \cdot -4} - b}\\
              
              
              \end{array}\\
              
              \mathbf{elif}\;b \geq 0:\\
              \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
              
              \mathbf{else}:\\
              \;\;\;\;c \cdot \frac{2}{t\_0}\\
              
              
              \end{array}
              \end{array}
              
              Derivation
              1. Split input into 4 regimes
              2. if b < -3.14999999999999986e137

                1. Initial program 72.2%

                  \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                2. Step-by-step derivation
                  1. lift-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  2. lift--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. sub-to-multN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  4. sqrt-prodN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  5. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  6. rem-sqrt-square-revN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  7. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  8. lower-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  9. lower--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  11. associate-/l*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  12. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  13. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  14. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  15. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  16. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  17. lower-fabs.f6474.1

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                3. Applied rewrites74.1%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                4. Step-by-step derivation
                  1. lift-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                  2. lift--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. sub-to-multN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                  4. sqrt-prodN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                  5. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                  6. rem-sqrt-square-revN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  7. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  8. lower-sqrt.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  9. lower--.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  10. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  11. associate-/l*N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  12. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  13. lift-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  14. *-commutativeN/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  15. lower-*.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  16. lower-/.f64N/A

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  17. lower-fabs.f6476.8

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                5. Applied rewrites76.8%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                6. Taylor expanded in a around 0

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                7. Step-by-step derivation
                  1. lower-fabs.f6472.8

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                8. Applied rewrites72.8%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                9. Taylor expanded in a around 0

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                10. Step-by-step derivation
                  1. lower-fabs.f6468.6

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                11. Applied rewrites68.6%

                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                12. Step-by-step derivation
                  1. Applied rewrites68.5%

                    \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                  2. Step-by-step derivation
                    1. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                    2. lift-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                    3. associate-*r/N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                    4. lower-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                  3. Applied rewrites35.9%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                  if -3.14999999999999986e137 < b < -8.0000000000000002e-191

                  1. Initial program 72.2%

                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  2. Taylor expanded in b around inf

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\color{blue}{-2 \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. Step-by-step derivation
                    1. lower-*.f6470.0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot \color{blue}{b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  4. Applied rewrites70.0%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\color{blue}{-2 \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  5. Step-by-step derivation
                    1. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{\color{blue}{2 \cdot a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    2. count-2-revN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{\color{blue}{a + a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. lower-+.f6470.0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{\color{blue}{a + a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    4. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    5. count-2-revN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    6. lower-+.f6470.0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    7. lift-+.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{c + c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                    8. +-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{c + c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(-b\right)}}\\ \end{array} \]
                    9. lift-neg.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                    10. sub-flip-reverseN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{c + c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} - b}}\\ \end{array} \]
                    11. lower--.f6470.0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{c + c}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c} - b}}\\ \end{array} \]
                  6. Applied rewrites70.0%

                    \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-2 \cdot b}{a + a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{fma}\left(c \cdot a, -4, b \cdot b\right)} - b}\\ } \end{array}} \]

                  if -8.0000000000000002e-191 < b < 1.8999999999999999e-61

                  1. Initial program 72.2%

                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  2. Taylor expanded in a around inf

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. Step-by-step derivation
                    1. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    2. lower-*.f6456.1

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  4. Applied rewrites56.1%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  5. Taylor expanded in a around inf

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                  6. Step-by-step derivation
                    1. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    2. lower-*.f6440.2

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                  7. Applied rewrites40.2%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                  8. Step-by-step derivation
                    1. lift-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    2. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    3. *-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    4. associate-/l*N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    5. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    6. lower-/.f6440.2

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                    7. lift-+.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                    8. +-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\sqrt{-4 \cdot \left(a \cdot c\right)} + \left(-b\right)}}\\ \end{array} \]
                    9. lift-neg.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\sqrt{-4 \cdot \left(a \cdot c\right)} + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                    10. sub-flip-reverseN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\sqrt{-4 \cdot \left(a \cdot c\right)} - b}}\\ \end{array} \]
                    11. lower--.f6440.2

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\sqrt{-4 \cdot \left(a \cdot c\right)} - b}}\\ \end{array} \]
                  9. Applied rewrites40.2%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\sqrt{\left(c \cdot a\right) \cdot -4} - b}\\ \end{array} \]

                  if 1.8999999999999999e-61 < b

                  1. Initial program 72.2%

                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  2. Step-by-step derivation
                    1. lift-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    2. lift--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. sub-to-multN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    4. sqrt-prodN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    5. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    6. rem-sqrt-square-revN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    7. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    8. lower-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    9. lower--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    10. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    11. associate-/l*N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    12. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    13. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    14. *-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    15. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    16. lower-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    17. lower-fabs.f6474.1

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. Applied rewrites74.1%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  4. Step-by-step derivation
                    1. lift-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                    2. lift--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. sub-to-multN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                    4. sqrt-prodN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                    5. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                    6. rem-sqrt-square-revN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    7. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    8. lower-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    9. lower--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    10. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    11. associate-/l*N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    12. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    13. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    14. *-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    15. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    16. lower-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    17. lower-fabs.f6476.8

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  5. Applied rewrites76.8%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  6. Taylor expanded in a around 0

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  7. Step-by-step derivation
                    1. lower-fabs.f6472.8

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  8. Applied rewrites72.8%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  9. Taylor expanded in a around 0

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                  10. Step-by-step derivation
                    1. lower-fabs.f6468.6

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                  11. Applied rewrites68.6%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                  12. Step-by-step derivation
                    1. lift-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                    2. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                    3. *-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                    4. associate-/l*N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                    5. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                    6. lower-/.f6468.5

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                    7. lift-+.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                    8. +-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                    9. lift-neg.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                    10. sub-flip-reverseN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                    11. lower--.f6468.5

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                  13. Applied rewrites68.5%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                13. Recombined 4 regimes into one program.
                14. Add Preprocessing

                Alternative 9: 80.6% accurate, 0.9× speedup?

                \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\sqrt{\left(c \cdot a\right) \cdot -4} - b}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                (FPCore (a b c)
                 :precision binary64
                 (let* ((t_0 (- (fabs b) b)))
                   (if (<= b -4.5e-8)
                     (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                     (if (<= b 1.9e-61)
                       (if (>= b 0.0)
                         (/ (- (- b) (sqrt (* -4.0 (* a c)))) (* 2.0 a))
                         (* c (/ 2.0 (- (sqrt (* (* c a) -4.0)) b))))
                       (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
                double code(double a, double b, double c) {
                	double t_0 = fabs(b) - b;
                	double tmp_1;
                	if (b <= -4.5e-8) {
                		double tmp_2;
                		if (b >= 0.0) {
                			tmp_2 = ((-b + b) * -0.5) / a;
                		} else {
                			tmp_2 = (c + c) / t_0;
                		}
                		tmp_1 = tmp_2;
                	} else if (b <= 1.9e-61) {
                		double tmp_3;
                		if (b >= 0.0) {
                			tmp_3 = (-b - sqrt((-4.0 * (a * c)))) / (2.0 * a);
                		} else {
                			tmp_3 = c * (2.0 / (sqrt(((c * a) * -4.0)) - b));
                		}
                		tmp_1 = tmp_3;
                	} else if (b >= 0.0) {
                		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                	} else {
                		tmp_1 = c * (2.0 / t_0);
                	}
                	return tmp_1;
                }
                
                module fmin_fmax_functions
                    implicit none
                    private
                    public fmax
                    public fmin
                
                    interface fmax
                        module procedure fmax88
                        module procedure fmax44
                        module procedure fmax84
                        module procedure fmax48
                    end interface
                    interface fmin
                        module procedure fmin88
                        module procedure fmin44
                        module procedure fmin84
                        module procedure fmin48
                    end interface
                contains
                    real(8) function fmax88(x, y) result (res)
                        real(8), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                    end function
                    real(4) function fmax44(x, y) result (res)
                        real(4), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                    end function
                    real(8) function fmax84(x, y) result(res)
                        real(8), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                    end function
                    real(8) function fmax48(x, y) result(res)
                        real(4), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                    end function
                    real(8) function fmin88(x, y) result (res)
                        real(8), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                    end function
                    real(4) function fmin44(x, y) result (res)
                        real(4), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                    end function
                    real(8) function fmin84(x, y) result(res)
                        real(8), intent (in) :: x
                        real(4), intent (in) :: y
                        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                    end function
                    real(8) function fmin48(x, y) result(res)
                        real(4), intent (in) :: x
                        real(8), intent (in) :: y
                        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                    end function
                end module
                
                real(8) function code(a, b, c)
                use fmin_fmax_functions
                    real(8), intent (in) :: a
                    real(8), intent (in) :: b
                    real(8), intent (in) :: c
                    real(8) :: t_0
                    real(8) :: tmp
                    real(8) :: tmp_1
                    real(8) :: tmp_2
                    real(8) :: tmp_3
                    t_0 = abs(b) - b
                    if (b <= (-4.5d-8)) then
                        if (b >= 0.0d0) then
                            tmp_2 = ((-b + b) * (-0.5d0)) / a
                        else
                            tmp_2 = (c + c) / t_0
                        end if
                        tmp_1 = tmp_2
                    else if (b <= 1.9d-61) then
                        if (b >= 0.0d0) then
                            tmp_3 = (-b - sqrt(((-4.0d0) * (a * c)))) / (2.0d0 * a)
                        else
                            tmp_3 = c * (2.0d0 / (sqrt(((c * a) * (-4.0d0))) - b))
                        end if
                        tmp_1 = tmp_3
                    else if (b >= 0.0d0) then
                        tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                    else
                        tmp_1 = c * (2.0d0 / t_0)
                    end if
                    code = tmp_1
                end function
                
                public static double code(double a, double b, double c) {
                	double t_0 = Math.abs(b) - b;
                	double tmp_1;
                	if (b <= -4.5e-8) {
                		double tmp_2;
                		if (b >= 0.0) {
                			tmp_2 = ((-b + b) * -0.5) / a;
                		} else {
                			tmp_2 = (c + c) / t_0;
                		}
                		tmp_1 = tmp_2;
                	} else if (b <= 1.9e-61) {
                		double tmp_3;
                		if (b >= 0.0) {
                			tmp_3 = (-b - Math.sqrt((-4.0 * (a * c)))) / (2.0 * a);
                		} else {
                			tmp_3 = c * (2.0 / (Math.sqrt(((c * a) * -4.0)) - b));
                		}
                		tmp_1 = tmp_3;
                	} else if (b >= 0.0) {
                		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                	} else {
                		tmp_1 = c * (2.0 / t_0);
                	}
                	return tmp_1;
                }
                
                def code(a, b, c):
                	t_0 = math.fabs(b) - b
                	tmp_1 = 0
                	if b <= -4.5e-8:
                		tmp_2 = 0
                		if b >= 0.0:
                			tmp_2 = ((-b + b) * -0.5) / a
                		else:
                			tmp_2 = (c + c) / t_0
                		tmp_1 = tmp_2
                	elif b <= 1.9e-61:
                		tmp_3 = 0
                		if b >= 0.0:
                			tmp_3 = (-b - math.sqrt((-4.0 * (a * c)))) / (2.0 * a)
                		else:
                			tmp_3 = c * (2.0 / (math.sqrt(((c * a) * -4.0)) - b))
                		tmp_1 = tmp_3
                	elif b >= 0.0:
                		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                	else:
                		tmp_1 = c * (2.0 / t_0)
                	return tmp_1
                
                function code(a, b, c)
                	t_0 = Float64(abs(b) - b)
                	tmp_1 = 0.0
                	if (b <= -4.5e-8)
                		tmp_2 = 0.0
                		if (b >= 0.0)
                			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                		else
                			tmp_2 = Float64(Float64(c + c) / t_0);
                		end
                		tmp_1 = tmp_2;
                	elseif (b <= 1.9e-61)
                		tmp_3 = 0.0
                		if (b >= 0.0)
                			tmp_3 = Float64(Float64(Float64(-b) - sqrt(Float64(-4.0 * Float64(a * c)))) / Float64(2.0 * a));
                		else
                			tmp_3 = Float64(c * Float64(2.0 / Float64(sqrt(Float64(Float64(c * a) * -4.0)) - b)));
                		end
                		tmp_1 = tmp_3;
                	elseif (b >= 0.0)
                		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                	else
                		tmp_1 = Float64(c * Float64(2.0 / t_0));
                	end
                	return tmp_1
                end
                
                function tmp_5 = code(a, b, c)
                	t_0 = abs(b) - b;
                	tmp_2 = 0.0;
                	if (b <= -4.5e-8)
                		tmp_3 = 0.0;
                		if (b >= 0.0)
                			tmp_3 = ((-b + b) * -0.5) / a;
                		else
                			tmp_3 = (c + c) / t_0;
                		end
                		tmp_2 = tmp_3;
                	elseif (b <= 1.9e-61)
                		tmp_4 = 0.0;
                		if (b >= 0.0)
                			tmp_4 = (-b - sqrt((-4.0 * (a * c)))) / (2.0 * a);
                		else
                			tmp_4 = c * (2.0 / (sqrt(((c * a) * -4.0)) - b));
                		end
                		tmp_2 = tmp_4;
                	elseif (b >= 0.0)
                		tmp_2 = (-b - abs(b)) / (2.0 * a);
                	else
                		tmp_2 = c * (2.0 / t_0);
                	end
                	tmp_5 = tmp_2;
                end
                
                code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -4.5e-8], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 1.9e-61], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Sqrt[N[(-4.0 * N[(a * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / N[(N[Sqrt[N[(N[(c * a), $MachinePrecision] * -4.0), $MachinePrecision]], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]
                
                \begin{array}{l}
                
                \\
                \begin{array}{l}
                t_0 := \left|b\right| - b\\
                \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\
                \;\;\;\;\begin{array}{l}
                \mathbf{if}\;b \geq 0:\\
                \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                
                \mathbf{else}:\\
                \;\;\;\;\frac{c + c}{t\_0}\\
                
                
                \end{array}\\
                
                \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\
                \;\;\;\;\begin{array}{l}
                \mathbf{if}\;b \geq 0:\\
                \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\
                
                \mathbf{else}:\\
                \;\;\;\;c \cdot \frac{2}{\sqrt{\left(c \cdot a\right) \cdot -4} - b}\\
                
                
                \end{array}\\
                
                \mathbf{elif}\;b \geq 0:\\
                \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                
                \mathbf{else}:\\
                \;\;\;\;c \cdot \frac{2}{t\_0}\\
                
                
                \end{array}
                \end{array}
                
                Derivation
                1. Split input into 3 regimes
                2. if b < -4.49999999999999993e-8

                  1. Initial program 72.2%

                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  2. Step-by-step derivation
                    1. lift-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    2. lift--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. sub-to-multN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    4. sqrt-prodN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    5. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    6. rem-sqrt-square-revN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    7. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    8. lower-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    9. lower--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    10. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    11. associate-/l*N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    12. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    13. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    14. *-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    15. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    16. lower-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    17. lower-fabs.f6474.1

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  3. Applied rewrites74.1%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                  4. Step-by-step derivation
                    1. lift-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                    2. lift--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. sub-to-multN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                    4. sqrt-prodN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                    5. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                    6. rem-sqrt-square-revN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    7. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    8. lower-sqrt.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    9. lower--.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    10. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    11. associate-/l*N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    12. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    13. lift-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    14. *-commutativeN/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    15. lower-*.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    16. lower-/.f64N/A

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    17. lower-fabs.f6476.8

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  5. Applied rewrites76.8%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                  6. Taylor expanded in a around 0

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  7. Step-by-step derivation
                    1. lower-fabs.f6472.8

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  8. Applied rewrites72.8%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                  9. Taylor expanded in a around 0

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                  10. Step-by-step derivation
                    1. lower-fabs.f6468.6

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                  11. Applied rewrites68.6%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                  12. Step-by-step derivation
                    1. Applied rewrites68.5%

                      \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                    2. Step-by-step derivation
                      1. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                      2. lift-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                      3. associate-*r/N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                      4. lower-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                    3. Applied rewrites35.9%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                    if -4.49999999999999993e-8 < b < 1.8999999999999999e-61

                    1. Initial program 72.2%

                      \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    2. Taylor expanded in a around inf

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. Step-by-step derivation
                      1. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      2. lower-*.f6456.1

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    4. Applied rewrites56.1%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    5. Taylor expanded in a around inf

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    6. Step-by-step derivation
                      1. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      2. lower-*.f6440.2

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    7. Applied rewrites40.2%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                    8. Step-by-step derivation
                      1. lift-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      2. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      3. *-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      4. associate-/l*N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      5. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      6. lower-/.f6440.2

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                      7. lift-+.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                      8. +-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\sqrt{-4 \cdot \left(a \cdot c\right)} + \left(-b\right)}}\\ \end{array} \]
                      9. lift-neg.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\sqrt{-4 \cdot \left(a \cdot c\right)} + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                      10. sub-flip-reverseN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\sqrt{-4 \cdot \left(a \cdot c\right)} - b}}\\ \end{array} \]
                      11. lower--.f6440.2

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\sqrt{-4 \cdot \left(a \cdot c\right)} - b}}\\ \end{array} \]
                    9. Applied rewrites40.2%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\sqrt{\left(c \cdot a\right) \cdot -4} - b}\\ \end{array} \]

                    if 1.8999999999999999e-61 < b

                    1. Initial program 72.2%

                      \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    2. Step-by-step derivation
                      1. lift-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      2. lift--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      3. sub-to-multN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      4. sqrt-prodN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      5. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      6. rem-sqrt-square-revN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      7. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      8. lower-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      9. lower--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      10. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      11. associate-/l*N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      12. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      13. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      14. *-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      15. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      16. lower-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      17. lower-fabs.f6474.1

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. Applied rewrites74.1%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    4. Step-by-step derivation
                      1. lift-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                      2. lift--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      3. sub-to-multN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                      4. sqrt-prodN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                      5. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                      6. rem-sqrt-square-revN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                      7. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                      8. lower-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      9. lower--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      10. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      11. associate-/l*N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      12. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      13. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      14. *-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      15. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      16. lower-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      17. lower-fabs.f6476.8

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    5. Applied rewrites76.8%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    6. Taylor expanded in a around 0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    7. Step-by-step derivation
                      1. lower-fabs.f6472.8

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    8. Applied rewrites72.8%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    9. Taylor expanded in a around 0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                    10. Step-by-step derivation
                      1. lower-fabs.f6468.6

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                    11. Applied rewrites68.6%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                    12. Step-by-step derivation
                      1. lift-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                      2. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                      3. *-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                      4. associate-/l*N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                      5. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                      6. lower-/.f6468.5

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                      7. lift-+.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                      8. +-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                      9. lift-neg.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                      10. sub-flip-reverseN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                      11. lower--.f6468.5

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                    13. Applied rewrites68.5%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                  13. Recombined 3 regimes into one program.
                  14. Add Preprocessing

                  Alternative 10: 80.6% accurate, 1.0× speedup?

                  \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ t_1 := \sqrt{\left(c \cdot a\right) \cdot -4}\\ \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{t\_1 + b}{-2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_1 - b}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                  (FPCore (a b c)
                   :precision binary64
                   (let* ((t_0 (- (fabs b) b)) (t_1 (sqrt (* (* c a) -4.0))))
                     (if (<= b -4.5e-8)
                       (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                       (if (<= b 1.9e-61)
                         (if (>= b 0.0) (/ (+ t_1 b) (* -2.0 a)) (/ (+ c c) (- t_1 b)))
                         (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
                  double code(double a, double b, double c) {
                  	double t_0 = fabs(b) - b;
                  	double t_1 = sqrt(((c * a) * -4.0));
                  	double tmp_1;
                  	if (b <= -4.5e-8) {
                  		double tmp_2;
                  		if (b >= 0.0) {
                  			tmp_2 = ((-b + b) * -0.5) / a;
                  		} else {
                  			tmp_2 = (c + c) / t_0;
                  		}
                  		tmp_1 = tmp_2;
                  	} else if (b <= 1.9e-61) {
                  		double tmp_3;
                  		if (b >= 0.0) {
                  			tmp_3 = (t_1 + b) / (-2.0 * a);
                  		} else {
                  			tmp_3 = (c + c) / (t_1 - b);
                  		}
                  		tmp_1 = tmp_3;
                  	} else if (b >= 0.0) {
                  		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                  	} else {
                  		tmp_1 = c * (2.0 / t_0);
                  	}
                  	return tmp_1;
                  }
                  
                  module fmin_fmax_functions
                      implicit none
                      private
                      public fmax
                      public fmin
                  
                      interface fmax
                          module procedure fmax88
                          module procedure fmax44
                          module procedure fmax84
                          module procedure fmax48
                      end interface
                      interface fmin
                          module procedure fmin88
                          module procedure fmin44
                          module procedure fmin84
                          module procedure fmin48
                      end interface
                  contains
                      real(8) function fmax88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmax44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmax84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmax48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                      end function
                      real(8) function fmin88(x, y) result (res)
                          real(8), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(4) function fmin44(x, y) result (res)
                          real(4), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                      end function
                      real(8) function fmin84(x, y) result(res)
                          real(8), intent (in) :: x
                          real(4), intent (in) :: y
                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                      end function
                      real(8) function fmin48(x, y) result(res)
                          real(4), intent (in) :: x
                          real(8), intent (in) :: y
                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                      end function
                  end module
                  
                  real(8) function code(a, b, c)
                  use fmin_fmax_functions
                      real(8), intent (in) :: a
                      real(8), intent (in) :: b
                      real(8), intent (in) :: c
                      real(8) :: t_0
                      real(8) :: t_1
                      real(8) :: tmp
                      real(8) :: tmp_1
                      real(8) :: tmp_2
                      real(8) :: tmp_3
                      t_0 = abs(b) - b
                      t_1 = sqrt(((c * a) * (-4.0d0)))
                      if (b <= (-4.5d-8)) then
                          if (b >= 0.0d0) then
                              tmp_2 = ((-b + b) * (-0.5d0)) / a
                          else
                              tmp_2 = (c + c) / t_0
                          end if
                          tmp_1 = tmp_2
                      else if (b <= 1.9d-61) then
                          if (b >= 0.0d0) then
                              tmp_3 = (t_1 + b) / ((-2.0d0) * a)
                          else
                              tmp_3 = (c + c) / (t_1 - b)
                          end if
                          tmp_1 = tmp_3
                      else if (b >= 0.0d0) then
                          tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                      else
                          tmp_1 = c * (2.0d0 / t_0)
                      end if
                      code = tmp_1
                  end function
                  
                  public static double code(double a, double b, double c) {
                  	double t_0 = Math.abs(b) - b;
                  	double t_1 = Math.sqrt(((c * a) * -4.0));
                  	double tmp_1;
                  	if (b <= -4.5e-8) {
                  		double tmp_2;
                  		if (b >= 0.0) {
                  			tmp_2 = ((-b + b) * -0.5) / a;
                  		} else {
                  			tmp_2 = (c + c) / t_0;
                  		}
                  		tmp_1 = tmp_2;
                  	} else if (b <= 1.9e-61) {
                  		double tmp_3;
                  		if (b >= 0.0) {
                  			tmp_3 = (t_1 + b) / (-2.0 * a);
                  		} else {
                  			tmp_3 = (c + c) / (t_1 - b);
                  		}
                  		tmp_1 = tmp_3;
                  	} else if (b >= 0.0) {
                  		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                  	} else {
                  		tmp_1 = c * (2.0 / t_0);
                  	}
                  	return tmp_1;
                  }
                  
                  def code(a, b, c):
                  	t_0 = math.fabs(b) - b
                  	t_1 = math.sqrt(((c * a) * -4.0))
                  	tmp_1 = 0
                  	if b <= -4.5e-8:
                  		tmp_2 = 0
                  		if b >= 0.0:
                  			tmp_2 = ((-b + b) * -0.5) / a
                  		else:
                  			tmp_2 = (c + c) / t_0
                  		tmp_1 = tmp_2
                  	elif b <= 1.9e-61:
                  		tmp_3 = 0
                  		if b >= 0.0:
                  			tmp_3 = (t_1 + b) / (-2.0 * a)
                  		else:
                  			tmp_3 = (c + c) / (t_1 - b)
                  		tmp_1 = tmp_3
                  	elif b >= 0.0:
                  		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                  	else:
                  		tmp_1 = c * (2.0 / t_0)
                  	return tmp_1
                  
                  function code(a, b, c)
                  	t_0 = Float64(abs(b) - b)
                  	t_1 = sqrt(Float64(Float64(c * a) * -4.0))
                  	tmp_1 = 0.0
                  	if (b <= -4.5e-8)
                  		tmp_2 = 0.0
                  		if (b >= 0.0)
                  			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                  		else
                  			tmp_2 = Float64(Float64(c + c) / t_0);
                  		end
                  		tmp_1 = tmp_2;
                  	elseif (b <= 1.9e-61)
                  		tmp_3 = 0.0
                  		if (b >= 0.0)
                  			tmp_3 = Float64(Float64(t_1 + b) / Float64(-2.0 * a));
                  		else
                  			tmp_3 = Float64(Float64(c + c) / Float64(t_1 - b));
                  		end
                  		tmp_1 = tmp_3;
                  	elseif (b >= 0.0)
                  		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                  	else
                  		tmp_1 = Float64(c * Float64(2.0 / t_0));
                  	end
                  	return tmp_1
                  end
                  
                  function tmp_5 = code(a, b, c)
                  	t_0 = abs(b) - b;
                  	t_1 = sqrt(((c * a) * -4.0));
                  	tmp_2 = 0.0;
                  	if (b <= -4.5e-8)
                  		tmp_3 = 0.0;
                  		if (b >= 0.0)
                  			tmp_3 = ((-b + b) * -0.5) / a;
                  		else
                  			tmp_3 = (c + c) / t_0;
                  		end
                  		tmp_2 = tmp_3;
                  	elseif (b <= 1.9e-61)
                  		tmp_4 = 0.0;
                  		if (b >= 0.0)
                  			tmp_4 = (t_1 + b) / (-2.0 * a);
                  		else
                  			tmp_4 = (c + c) / (t_1 - b);
                  		end
                  		tmp_2 = tmp_4;
                  	elseif (b >= 0.0)
                  		tmp_2 = (-b - abs(b)) / (2.0 * a);
                  	else
                  		tmp_2 = c * (2.0 / t_0);
                  	end
                  	tmp_5 = tmp_2;
                  end
                  
                  code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, Block[{t$95$1 = N[Sqrt[N[(N[(c * a), $MachinePrecision] * -4.0), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[b, -4.5e-8], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 1.9e-61], If[GreaterEqual[b, 0.0], N[(N[(t$95$1 + b), $MachinePrecision] / N[(-2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(t$95$1 - b), $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]]
                  
                  \begin{array}{l}
                  
                  \\
                  \begin{array}{l}
                  t_0 := \left|b\right| - b\\
                  t_1 := \sqrt{\left(c \cdot a\right) \cdot -4}\\
                  \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\
                  \;\;\;\;\begin{array}{l}
                  \mathbf{if}\;b \geq 0:\\
                  \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;\frac{c + c}{t\_0}\\
                  
                  
                  \end{array}\\
                  
                  \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\
                  \;\;\;\;\begin{array}{l}
                  \mathbf{if}\;b \geq 0:\\
                  \;\;\;\;\frac{t\_1 + b}{-2 \cdot a}\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;\frac{c + c}{t\_1 - b}\\
                  
                  
                  \end{array}\\
                  
                  \mathbf{elif}\;b \geq 0:\\
                  \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;c \cdot \frac{2}{t\_0}\\
                  
                  
                  \end{array}
                  \end{array}
                  
                  Derivation
                  1. Split input into 3 regimes
                  2. if b < -4.49999999999999993e-8

                    1. Initial program 72.2%

                      \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    2. Step-by-step derivation
                      1. lift-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      2. lift--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      3. sub-to-multN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      4. sqrt-prodN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      5. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      6. rem-sqrt-square-revN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      7. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      8. lower-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      9. lower--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      10. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      11. associate-/l*N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      12. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      13. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      14. *-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      15. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      16. lower-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      17. lower-fabs.f6474.1

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    3. Applied rewrites74.1%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                    4. Step-by-step derivation
                      1. lift-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                      2. lift--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      3. sub-to-multN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                      4. sqrt-prodN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                      5. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                      6. rem-sqrt-square-revN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                      7. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                      8. lower-sqrt.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      9. lower--.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      10. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      11. associate-/l*N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      12. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      13. lift-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      14. *-commutativeN/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      15. lower-*.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      16. lower-/.f64N/A

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                      17. lower-fabs.f6476.8

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    5. Applied rewrites76.8%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                    6. Taylor expanded in a around 0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    7. Step-by-step derivation
                      1. lower-fabs.f6472.8

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    8. Applied rewrites72.8%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                    9. Taylor expanded in a around 0

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                    10. Step-by-step derivation
                      1. lower-fabs.f6468.6

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                    11. Applied rewrites68.6%

                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                    12. Step-by-step derivation
                      1. Applied rewrites68.5%

                        \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                      2. Step-by-step derivation
                        1. lift-*.f64N/A

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                        2. lift-/.f64N/A

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                        3. associate-*r/N/A

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                        4. lower-/.f64N/A

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                      3. Applied rewrites35.9%

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                      if -4.49999999999999993e-8 < b < 1.8999999999999999e-61

                      1. Initial program 72.2%

                        \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      2. Taylor expanded in a around inf

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      3. Step-by-step derivation
                        1. lower-*.f64N/A

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                        2. lower-*.f6456.1

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      4. Applied rewrites56.1%

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                      5. Taylor expanded in a around inf

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      6. Step-by-step derivation
                        1. lower-*.f64N/A

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                        2. lower-*.f6440.2

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      7. Applied rewrites40.2%

                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                      8. Step-by-step derivation
                        1. Applied rewrites40.2%

                          \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\sqrt{\left(c \cdot a\right) \cdot -4} + b}{-2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\left(c \cdot a\right) \cdot -4} - b}\\ } \end{array}} \]

                        if 1.8999999999999999e-61 < b

                        1. Initial program 72.2%

                          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                        2. Step-by-step derivation
                          1. lift-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          2. lift--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          3. sub-to-multN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          4. sqrt-prodN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          5. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          6. rem-sqrt-square-revN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          7. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          8. lower-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          9. lower--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          10. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          11. associate-/l*N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          12. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          13. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          14. *-commutativeN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          15. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          16. lower-/.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          17. lower-fabs.f6474.1

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                        3. Applied rewrites74.1%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                        4. Step-by-step derivation
                          1. lift-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                          2. lift--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          3. sub-to-multN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                          4. sqrt-prodN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                          5. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                          6. rem-sqrt-square-revN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          7. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          8. lower-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          9. lower--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          10. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          11. associate-/l*N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          12. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          13. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          14. *-commutativeN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          15. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          16. lower-/.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          17. lower-fabs.f6476.8

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                        5. Applied rewrites76.8%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                        6. Taylor expanded in a around 0

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                        7. Step-by-step derivation
                          1. lower-fabs.f6472.8

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                        8. Applied rewrites72.8%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                        9. Taylor expanded in a around 0

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                        10. Step-by-step derivation
                          1. lower-fabs.f6468.6

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                        11. Applied rewrites68.6%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                        12. Step-by-step derivation
                          1. lift-/.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                          2. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                          3. *-commutativeN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                          4. associate-/l*N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                          5. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                          6. lower-/.f6468.5

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                          7. lift-+.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                          8. +-commutativeN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                          9. lift-neg.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                          10. sub-flip-reverseN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                          11. lower--.f6468.5

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                        13. Applied rewrites68.5%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                      9. Recombined 3 regimes into one program.
                      10. Add Preprocessing

                      Alternative 11: 79.6% accurate, 0.9× speedup?

                      \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 7 \cdot 10^{-258}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;-0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                      (FPCore (a b c)
                       :precision binary64
                       (let* ((t_0 (- (fabs b) b)))
                         (if (<= b -4.5e-8)
                           (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                           (if (<= b 7e-258)
                             (if (>= b 0.0)
                               (* -0.5 (sqrt (* -4.0 (/ c a))))
                               (/ (* 2.0 c) (sqrt (- (* 4.0 (* a c))))))
                             (if (<= b 1.9e-61)
                               (if (>= b 0.0)
                                 (* -0.5 (/ (sqrt (* -4.0 (* a c))) a))
                                 (/ 2.0 (sqrt (* -4.0 (/ a c)))))
                               (if (>= b 0.0)
                                 (/ (- (- b) (fabs b)) (* 2.0 a))
                                 (* c (/ 2.0 t_0))))))))
                      double code(double a, double b, double c) {
                      	double t_0 = fabs(b) - b;
                      	double tmp_1;
                      	if (b <= -4.5e-8) {
                      		double tmp_2;
                      		if (b >= 0.0) {
                      			tmp_2 = ((-b + b) * -0.5) / a;
                      		} else {
                      			tmp_2 = (c + c) / t_0;
                      		}
                      		tmp_1 = tmp_2;
                      	} else if (b <= 7e-258) {
                      		double tmp_3;
                      		if (b >= 0.0) {
                      			tmp_3 = -0.5 * sqrt((-4.0 * (c / a)));
                      		} else {
                      			tmp_3 = (2.0 * c) / sqrt(-(4.0 * (a * c)));
                      		}
                      		tmp_1 = tmp_3;
                      	} else if (b <= 1.9e-61) {
                      		double tmp_4;
                      		if (b >= 0.0) {
                      			tmp_4 = -0.5 * (sqrt((-4.0 * (a * c))) / a);
                      		} else {
                      			tmp_4 = 2.0 / sqrt((-4.0 * (a / c)));
                      		}
                      		tmp_1 = tmp_4;
                      	} else if (b >= 0.0) {
                      		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                      	} else {
                      		tmp_1 = c * (2.0 / t_0);
                      	}
                      	return tmp_1;
                      }
                      
                      module fmin_fmax_functions
                          implicit none
                          private
                          public fmax
                          public fmin
                      
                          interface fmax
                              module procedure fmax88
                              module procedure fmax44
                              module procedure fmax84
                              module procedure fmax48
                          end interface
                          interface fmin
                              module procedure fmin88
                              module procedure fmin44
                              module procedure fmin84
                              module procedure fmin48
                          end interface
                      contains
                          real(8) function fmax88(x, y) result (res)
                              real(8), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                          end function
                          real(4) function fmax44(x, y) result (res)
                              real(4), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                          end function
                          real(8) function fmax84(x, y) result(res)
                              real(8), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                          end function
                          real(8) function fmax48(x, y) result(res)
                              real(4), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                          end function
                          real(8) function fmin88(x, y) result (res)
                              real(8), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                          end function
                          real(4) function fmin44(x, y) result (res)
                              real(4), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                          end function
                          real(8) function fmin84(x, y) result(res)
                              real(8), intent (in) :: x
                              real(4), intent (in) :: y
                              res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                          end function
                          real(8) function fmin48(x, y) result(res)
                              real(4), intent (in) :: x
                              real(8), intent (in) :: y
                              res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                          end function
                      end module
                      
                      real(8) function code(a, b, c)
                      use fmin_fmax_functions
                          real(8), intent (in) :: a
                          real(8), intent (in) :: b
                          real(8), intent (in) :: c
                          real(8) :: t_0
                          real(8) :: tmp
                          real(8) :: tmp_1
                          real(8) :: tmp_2
                          real(8) :: tmp_3
                          real(8) :: tmp_4
                          t_0 = abs(b) - b
                          if (b <= (-4.5d-8)) then
                              if (b >= 0.0d0) then
                                  tmp_2 = ((-b + b) * (-0.5d0)) / a
                              else
                                  tmp_2 = (c + c) / t_0
                              end if
                              tmp_1 = tmp_2
                          else if (b <= 7d-258) then
                              if (b >= 0.0d0) then
                                  tmp_3 = (-0.5d0) * sqrt(((-4.0d0) * (c / a)))
                              else
                                  tmp_3 = (2.0d0 * c) / sqrt(-(4.0d0 * (a * c)))
                              end if
                              tmp_1 = tmp_3
                          else if (b <= 1.9d-61) then
                              if (b >= 0.0d0) then
                                  tmp_4 = (-0.5d0) * (sqrt(((-4.0d0) * (a * c))) / a)
                              else
                                  tmp_4 = 2.0d0 / sqrt(((-4.0d0) * (a / c)))
                              end if
                              tmp_1 = tmp_4
                          else if (b >= 0.0d0) then
                              tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                          else
                              tmp_1 = c * (2.0d0 / t_0)
                          end if
                          code = tmp_1
                      end function
                      
                      public static double code(double a, double b, double c) {
                      	double t_0 = Math.abs(b) - b;
                      	double tmp_1;
                      	if (b <= -4.5e-8) {
                      		double tmp_2;
                      		if (b >= 0.0) {
                      			tmp_2 = ((-b + b) * -0.5) / a;
                      		} else {
                      			tmp_2 = (c + c) / t_0;
                      		}
                      		tmp_1 = tmp_2;
                      	} else if (b <= 7e-258) {
                      		double tmp_3;
                      		if (b >= 0.0) {
                      			tmp_3 = -0.5 * Math.sqrt((-4.0 * (c / a)));
                      		} else {
                      			tmp_3 = (2.0 * c) / Math.sqrt(-(4.0 * (a * c)));
                      		}
                      		tmp_1 = tmp_3;
                      	} else if (b <= 1.9e-61) {
                      		double tmp_4;
                      		if (b >= 0.0) {
                      			tmp_4 = -0.5 * (Math.sqrt((-4.0 * (a * c))) / a);
                      		} else {
                      			tmp_4 = 2.0 / Math.sqrt((-4.0 * (a / c)));
                      		}
                      		tmp_1 = tmp_4;
                      	} else if (b >= 0.0) {
                      		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                      	} else {
                      		tmp_1 = c * (2.0 / t_0);
                      	}
                      	return tmp_1;
                      }
                      
                      def code(a, b, c):
                      	t_0 = math.fabs(b) - b
                      	tmp_1 = 0
                      	if b <= -4.5e-8:
                      		tmp_2 = 0
                      		if b >= 0.0:
                      			tmp_2 = ((-b + b) * -0.5) / a
                      		else:
                      			tmp_2 = (c + c) / t_0
                      		tmp_1 = tmp_2
                      	elif b <= 7e-258:
                      		tmp_3 = 0
                      		if b >= 0.0:
                      			tmp_3 = -0.5 * math.sqrt((-4.0 * (c / a)))
                      		else:
                      			tmp_3 = (2.0 * c) / math.sqrt(-(4.0 * (a * c)))
                      		tmp_1 = tmp_3
                      	elif b <= 1.9e-61:
                      		tmp_4 = 0
                      		if b >= 0.0:
                      			tmp_4 = -0.5 * (math.sqrt((-4.0 * (a * c))) / a)
                      		else:
                      			tmp_4 = 2.0 / math.sqrt((-4.0 * (a / c)))
                      		tmp_1 = tmp_4
                      	elif b >= 0.0:
                      		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                      	else:
                      		tmp_1 = c * (2.0 / t_0)
                      	return tmp_1
                      
                      function code(a, b, c)
                      	t_0 = Float64(abs(b) - b)
                      	tmp_1 = 0.0
                      	if (b <= -4.5e-8)
                      		tmp_2 = 0.0
                      		if (b >= 0.0)
                      			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                      		else
                      			tmp_2 = Float64(Float64(c + c) / t_0);
                      		end
                      		tmp_1 = tmp_2;
                      	elseif (b <= 7e-258)
                      		tmp_3 = 0.0
                      		if (b >= 0.0)
                      			tmp_3 = Float64(-0.5 * sqrt(Float64(-4.0 * Float64(c / a))));
                      		else
                      			tmp_3 = Float64(Float64(2.0 * c) / sqrt(Float64(-Float64(4.0 * Float64(a * c)))));
                      		end
                      		tmp_1 = tmp_3;
                      	elseif (b <= 1.9e-61)
                      		tmp_4 = 0.0
                      		if (b >= 0.0)
                      			tmp_4 = Float64(-0.5 * Float64(sqrt(Float64(-4.0 * Float64(a * c))) / a));
                      		else
                      			tmp_4 = Float64(2.0 / sqrt(Float64(-4.0 * Float64(a / c))));
                      		end
                      		tmp_1 = tmp_4;
                      	elseif (b >= 0.0)
                      		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                      	else
                      		tmp_1 = Float64(c * Float64(2.0 / t_0));
                      	end
                      	return tmp_1
                      end
                      
                      function tmp_6 = code(a, b, c)
                      	t_0 = abs(b) - b;
                      	tmp_2 = 0.0;
                      	if (b <= -4.5e-8)
                      		tmp_3 = 0.0;
                      		if (b >= 0.0)
                      			tmp_3 = ((-b + b) * -0.5) / a;
                      		else
                      			tmp_3 = (c + c) / t_0;
                      		end
                      		tmp_2 = tmp_3;
                      	elseif (b <= 7e-258)
                      		tmp_4 = 0.0;
                      		if (b >= 0.0)
                      			tmp_4 = -0.5 * sqrt((-4.0 * (c / a)));
                      		else
                      			tmp_4 = (2.0 * c) / sqrt(-(4.0 * (a * c)));
                      		end
                      		tmp_2 = tmp_4;
                      	elseif (b <= 1.9e-61)
                      		tmp_5 = 0.0;
                      		if (b >= 0.0)
                      			tmp_5 = -0.5 * (sqrt((-4.0 * (a * c))) / a);
                      		else
                      			tmp_5 = 2.0 / sqrt((-4.0 * (a / c)));
                      		end
                      		tmp_2 = tmp_5;
                      	elseif (b >= 0.0)
                      		tmp_2 = (-b - abs(b)) / (2.0 * a);
                      	else
                      		tmp_2 = c * (2.0 / t_0);
                      	end
                      	tmp_6 = tmp_2;
                      end
                      
                      code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -4.5e-8], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 7e-258], If[GreaterEqual[b, 0.0], N[(-0.5 * N[Sqrt[N[(-4.0 * N[(c / a), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[Sqrt[(-N[(4.0 * N[(a * c), $MachinePrecision]), $MachinePrecision])], $MachinePrecision]), $MachinePrecision]], If[LessEqual[b, 1.9e-61], If[GreaterEqual[b, 0.0], N[(-0.5 * N[(N[Sqrt[N[(-4.0 * N[(a * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] / a), $MachinePrecision]), $MachinePrecision], N[(2.0 / N[Sqrt[N[(-4.0 * N[(a / c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]]
                      
                      \begin{array}{l}
                      
                      \\
                      \begin{array}{l}
                      t_0 := \left|b\right| - b\\
                      \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\
                      \;\;\;\;\begin{array}{l}
                      \mathbf{if}\;b \geq 0:\\
                      \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                      
                      \mathbf{else}:\\
                      \;\;\;\;\frac{c + c}{t\_0}\\
                      
                      
                      \end{array}\\
                      
                      \mathbf{elif}\;b \leq 7 \cdot 10^{-258}:\\
                      \;\;\;\;\begin{array}{l}
                      \mathbf{if}\;b \geq 0:\\
                      \;\;\;\;-0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\
                      
                      \mathbf{else}:\\
                      \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\
                      
                      
                      \end{array}\\
                      
                      \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\
                      \;\;\;\;\begin{array}{l}
                      \mathbf{if}\;b \geq 0:\\
                      \;\;\;\;-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\
                      
                      \mathbf{else}:\\
                      \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\
                      
                      
                      \end{array}\\
                      
                      \mathbf{elif}\;b \geq 0:\\
                      \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                      
                      \mathbf{else}:\\
                      \;\;\;\;c \cdot \frac{2}{t\_0}\\
                      
                      
                      \end{array}
                      \end{array}
                      
                      Derivation
                      1. Split input into 4 regimes
                      2. if b < -4.49999999999999993e-8

                        1. Initial program 72.2%

                          \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                        2. Step-by-step derivation
                          1. lift-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          2. lift--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          3. sub-to-multN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          4. sqrt-prodN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          5. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          6. rem-sqrt-square-revN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          7. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          8. lower-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          9. lower--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          10. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          11. associate-/l*N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          12. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          13. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          14. *-commutativeN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          15. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          16. lower-/.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          17. lower-fabs.f6474.1

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                        3. Applied rewrites74.1%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                        4. Step-by-step derivation
                          1. lift-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                          2. lift--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          3. sub-to-multN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                          4. sqrt-prodN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                          5. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                          6. rem-sqrt-square-revN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          7. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          8. lower-sqrt.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          9. lower--.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          10. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          11. associate-/l*N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          12. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          13. lift-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          14. *-commutativeN/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          15. lower-*.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          16. lower-/.f64N/A

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          17. lower-fabs.f6476.8

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                        5. Applied rewrites76.8%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                        6. Taylor expanded in a around 0

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                        7. Step-by-step derivation
                          1. lower-fabs.f6472.8

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                        8. Applied rewrites72.8%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                        9. Taylor expanded in a around 0

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                        10. Step-by-step derivation
                          1. lower-fabs.f6468.6

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                        11. Applied rewrites68.6%

                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                        12. Step-by-step derivation
                          1. Applied rewrites68.5%

                            \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                          2. Step-by-step derivation
                            1. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                            2. lift-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                            3. associate-*r/N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                            4. lower-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                          3. Applied rewrites35.9%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                          if -4.49999999999999993e-8 < b < 7.00000000000000003e-258

                          1. Initial program 72.2%

                            \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          2. Taylor expanded in a around inf

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          3. Step-by-step derivation
                            1. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            2. lower-*.f6456.1

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          4. Applied rewrites56.1%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          5. Taylor expanded in a around inf

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          6. Step-by-step derivation
                            1. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            2. lower-*.f6440.2

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          7. Applied rewrites40.2%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          8. Taylor expanded in a around -inf

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          9. Step-by-step derivation
                            1. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            2. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            3. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            4. lower-/.f6427.3

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          10. Applied rewrites27.3%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          11. Taylor expanded in b around 0

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                          12. Step-by-step derivation
                            1. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                            2. lower-neg.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                            3. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-\color{blue}{4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                            4. lower-*.f6420.2

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}\\ \end{array} \]
                          13. Applied rewrites20.2%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                          14. Taylor expanded in a around inf

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{-1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          15. Step-by-step derivation
                            1. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            2. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            3. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            4. lower-/.f6421.1

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;-0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                          16. Applied rewrites21.1%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{-0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]

                          if 7.00000000000000003e-258 < b < 1.8999999999999999e-61

                          1. Initial program 72.2%

                            \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          2. Taylor expanded in c around inf

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                          3. Step-by-step derivation
                            1. lower-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                            2. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\color{blue}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                            3. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{\color{blue}{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                            4. lower-/.f6444.2

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \color{blue}{\frac{a}{c}}}}\\ \end{array} \]
                          4. Applied rewrites44.2%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                          5. Step-by-step derivation
                            1. lift--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            2. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{\left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            3. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{\left(4 \cdot a\right)} \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            4. associate-*l*N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            5. metadata-evalN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{\left(\mathsf{neg}\left(-4\right)\right)} \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            6. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(\mathsf{neg}\left(-4\right)\right) \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            7. fp-cancel-sign-sub-invN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b + -4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            8. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b + -4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            9. *-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b + -4 \cdot \color{blue}{\left(c \cdot a\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            10. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b + -4 \cdot \color{blue}{\left(c \cdot a\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            11. +-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(c \cdot a\right) + b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            12. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(c \cdot a\right)} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            13. associate-*r*N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(-4 \cdot c\right) \cdot a} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            14. lower-fma.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot c, a, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            15. lower-*.f6444.3

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{-4 \cdot c}, a, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                          6. Applied rewrites44.3%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot c, a, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                          7. Taylor expanded in b around 0

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                          8. Step-by-step derivation
                            1. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \color{blue}{\frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            2. lower-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{\color{blue}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            3. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            4. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            5. lower-*.f6420.8

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                          9. Applied rewrites20.8%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]

                          if 1.8999999999999999e-61 < b

                          1. Initial program 72.2%

                            \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          2. Step-by-step derivation
                            1. lift-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            2. lift--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            3. sub-to-multN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            4. sqrt-prodN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            5. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            6. rem-sqrt-square-revN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            7. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            8. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            9. lower--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            10. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            11. associate-/l*N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            12. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            13. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            14. *-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            15. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            16. lower-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            17. lower-fabs.f6474.1

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          3. Applied rewrites74.1%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          4. Step-by-step derivation
                            1. lift-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                            2. lift--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            3. sub-to-multN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                            4. sqrt-prodN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                            5. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                            6. rem-sqrt-square-revN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            7. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            8. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            9. lower--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            10. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            11. associate-/l*N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            12. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            13. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            14. *-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            15. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            16. lower-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            17. lower-fabs.f6476.8

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          5. Applied rewrites76.8%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          6. Taylor expanded in a around 0

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          7. Step-by-step derivation
                            1. lower-fabs.f6472.8

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          8. Applied rewrites72.8%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          9. Taylor expanded in a around 0

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                          10. Step-by-step derivation
                            1. lower-fabs.f6468.6

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                          11. Applied rewrites68.6%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                          12. Step-by-step derivation
                            1. lift-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                            2. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                            3. *-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                            4. associate-/l*N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                            5. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                            6. lower-/.f6468.5

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                            7. lift-+.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                            8. +-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                            9. lift-neg.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                            10. sub-flip-reverseN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                            11. lower--.f6468.5

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                          13. Applied rewrites68.5%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                        13. Recombined 4 regimes into one program.
                        14. Add Preprocessing

                        Alternative 12: 79.5% accurate, 0.9× speedup?

                        \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq -4 \cdot 10^{-310}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\left(-4 \cdot c\right) \cdot a}}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                        (FPCore (a b c)
                         :precision binary64
                         (let* ((t_0 (- (fabs b) b)))
                           (if (<= b -4.5e-8)
                             (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                             (if (<= b -4e-310)
                               (if (>= b 0.0)
                                 (* (sqrt (* (/ c a) -4.0)) 0.5)
                                 (/ (+ c c) (sqrt (* (* -4.0 c) a))))
                               (if (<= b 1.9e-61)
                                 (if (>= b 0.0)
                                   (* -0.5 (/ (sqrt (* -4.0 (* a c))) a))
                                   (/ 2.0 (sqrt (* -4.0 (/ a c)))))
                                 (if (>= b 0.0)
                                   (/ (- (- b) (fabs b)) (* 2.0 a))
                                   (* c (/ 2.0 t_0))))))))
                        double code(double a, double b, double c) {
                        	double t_0 = fabs(b) - b;
                        	double tmp_1;
                        	if (b <= -4.5e-8) {
                        		double tmp_2;
                        		if (b >= 0.0) {
                        			tmp_2 = ((-b + b) * -0.5) / a;
                        		} else {
                        			tmp_2 = (c + c) / t_0;
                        		}
                        		tmp_1 = tmp_2;
                        	} else if (b <= -4e-310) {
                        		double tmp_3;
                        		if (b >= 0.0) {
                        			tmp_3 = sqrt(((c / a) * -4.0)) * 0.5;
                        		} else {
                        			tmp_3 = (c + c) / sqrt(((-4.0 * c) * a));
                        		}
                        		tmp_1 = tmp_3;
                        	} else if (b <= 1.9e-61) {
                        		double tmp_4;
                        		if (b >= 0.0) {
                        			tmp_4 = -0.5 * (sqrt((-4.0 * (a * c))) / a);
                        		} else {
                        			tmp_4 = 2.0 / sqrt((-4.0 * (a / c)));
                        		}
                        		tmp_1 = tmp_4;
                        	} else if (b >= 0.0) {
                        		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                        	} else {
                        		tmp_1 = c * (2.0 / t_0);
                        	}
                        	return tmp_1;
                        }
                        
                        module fmin_fmax_functions
                            implicit none
                            private
                            public fmax
                            public fmin
                        
                            interface fmax
                                module procedure fmax88
                                module procedure fmax44
                                module procedure fmax84
                                module procedure fmax48
                            end interface
                            interface fmin
                                module procedure fmin88
                                module procedure fmin44
                                module procedure fmin84
                                module procedure fmin48
                            end interface
                        contains
                            real(8) function fmax88(x, y) result (res)
                                real(8), intent (in) :: x
                                real(8), intent (in) :: y
                                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                            end function
                            real(4) function fmax44(x, y) result (res)
                                real(4), intent (in) :: x
                                real(4), intent (in) :: y
                                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                            end function
                            real(8) function fmax84(x, y) result(res)
                                real(8), intent (in) :: x
                                real(4), intent (in) :: y
                                res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                            end function
                            real(8) function fmax48(x, y) result(res)
                                real(4), intent (in) :: x
                                real(8), intent (in) :: y
                                res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                            end function
                            real(8) function fmin88(x, y) result (res)
                                real(8), intent (in) :: x
                                real(8), intent (in) :: y
                                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                            end function
                            real(4) function fmin44(x, y) result (res)
                                real(4), intent (in) :: x
                                real(4), intent (in) :: y
                                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                            end function
                            real(8) function fmin84(x, y) result(res)
                                real(8), intent (in) :: x
                                real(4), intent (in) :: y
                                res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                            end function
                            real(8) function fmin48(x, y) result(res)
                                real(4), intent (in) :: x
                                real(8), intent (in) :: y
                                res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                            end function
                        end module
                        
                        real(8) function code(a, b, c)
                        use fmin_fmax_functions
                            real(8), intent (in) :: a
                            real(8), intent (in) :: b
                            real(8), intent (in) :: c
                            real(8) :: t_0
                            real(8) :: tmp
                            real(8) :: tmp_1
                            real(8) :: tmp_2
                            real(8) :: tmp_3
                            real(8) :: tmp_4
                            t_0 = abs(b) - b
                            if (b <= (-4.5d-8)) then
                                if (b >= 0.0d0) then
                                    tmp_2 = ((-b + b) * (-0.5d0)) / a
                                else
                                    tmp_2 = (c + c) / t_0
                                end if
                                tmp_1 = tmp_2
                            else if (b <= (-4d-310)) then
                                if (b >= 0.0d0) then
                                    tmp_3 = sqrt(((c / a) * (-4.0d0))) * 0.5d0
                                else
                                    tmp_3 = (c + c) / sqrt((((-4.0d0) * c) * a))
                                end if
                                tmp_1 = tmp_3
                            else if (b <= 1.9d-61) then
                                if (b >= 0.0d0) then
                                    tmp_4 = (-0.5d0) * (sqrt(((-4.0d0) * (a * c))) / a)
                                else
                                    tmp_4 = 2.0d0 / sqrt(((-4.0d0) * (a / c)))
                                end if
                                tmp_1 = tmp_4
                            else if (b >= 0.0d0) then
                                tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                            else
                                tmp_1 = c * (2.0d0 / t_0)
                            end if
                            code = tmp_1
                        end function
                        
                        public static double code(double a, double b, double c) {
                        	double t_0 = Math.abs(b) - b;
                        	double tmp_1;
                        	if (b <= -4.5e-8) {
                        		double tmp_2;
                        		if (b >= 0.0) {
                        			tmp_2 = ((-b + b) * -0.5) / a;
                        		} else {
                        			tmp_2 = (c + c) / t_0;
                        		}
                        		tmp_1 = tmp_2;
                        	} else if (b <= -4e-310) {
                        		double tmp_3;
                        		if (b >= 0.0) {
                        			tmp_3 = Math.sqrt(((c / a) * -4.0)) * 0.5;
                        		} else {
                        			tmp_3 = (c + c) / Math.sqrt(((-4.0 * c) * a));
                        		}
                        		tmp_1 = tmp_3;
                        	} else if (b <= 1.9e-61) {
                        		double tmp_4;
                        		if (b >= 0.0) {
                        			tmp_4 = -0.5 * (Math.sqrt((-4.0 * (a * c))) / a);
                        		} else {
                        			tmp_4 = 2.0 / Math.sqrt((-4.0 * (a / c)));
                        		}
                        		tmp_1 = tmp_4;
                        	} else if (b >= 0.0) {
                        		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                        	} else {
                        		tmp_1 = c * (2.0 / t_0);
                        	}
                        	return tmp_1;
                        }
                        
                        def code(a, b, c):
                        	t_0 = math.fabs(b) - b
                        	tmp_1 = 0
                        	if b <= -4.5e-8:
                        		tmp_2 = 0
                        		if b >= 0.0:
                        			tmp_2 = ((-b + b) * -0.5) / a
                        		else:
                        			tmp_2 = (c + c) / t_0
                        		tmp_1 = tmp_2
                        	elif b <= -4e-310:
                        		tmp_3 = 0
                        		if b >= 0.0:
                        			tmp_3 = math.sqrt(((c / a) * -4.0)) * 0.5
                        		else:
                        			tmp_3 = (c + c) / math.sqrt(((-4.0 * c) * a))
                        		tmp_1 = tmp_3
                        	elif b <= 1.9e-61:
                        		tmp_4 = 0
                        		if b >= 0.0:
                        			tmp_4 = -0.5 * (math.sqrt((-4.0 * (a * c))) / a)
                        		else:
                        			tmp_4 = 2.0 / math.sqrt((-4.0 * (a / c)))
                        		tmp_1 = tmp_4
                        	elif b >= 0.0:
                        		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                        	else:
                        		tmp_1 = c * (2.0 / t_0)
                        	return tmp_1
                        
                        function code(a, b, c)
                        	t_0 = Float64(abs(b) - b)
                        	tmp_1 = 0.0
                        	if (b <= -4.5e-8)
                        		tmp_2 = 0.0
                        		if (b >= 0.0)
                        			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                        		else
                        			tmp_2 = Float64(Float64(c + c) / t_0);
                        		end
                        		tmp_1 = tmp_2;
                        	elseif (b <= -4e-310)
                        		tmp_3 = 0.0
                        		if (b >= 0.0)
                        			tmp_3 = Float64(sqrt(Float64(Float64(c / a) * -4.0)) * 0.5);
                        		else
                        			tmp_3 = Float64(Float64(c + c) / sqrt(Float64(Float64(-4.0 * c) * a)));
                        		end
                        		tmp_1 = tmp_3;
                        	elseif (b <= 1.9e-61)
                        		tmp_4 = 0.0
                        		if (b >= 0.0)
                        			tmp_4 = Float64(-0.5 * Float64(sqrt(Float64(-4.0 * Float64(a * c))) / a));
                        		else
                        			tmp_4 = Float64(2.0 / sqrt(Float64(-4.0 * Float64(a / c))));
                        		end
                        		tmp_1 = tmp_4;
                        	elseif (b >= 0.0)
                        		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                        	else
                        		tmp_1 = Float64(c * Float64(2.0 / t_0));
                        	end
                        	return tmp_1
                        end
                        
                        function tmp_6 = code(a, b, c)
                        	t_0 = abs(b) - b;
                        	tmp_2 = 0.0;
                        	if (b <= -4.5e-8)
                        		tmp_3 = 0.0;
                        		if (b >= 0.0)
                        			tmp_3 = ((-b + b) * -0.5) / a;
                        		else
                        			tmp_3 = (c + c) / t_0;
                        		end
                        		tmp_2 = tmp_3;
                        	elseif (b <= -4e-310)
                        		tmp_4 = 0.0;
                        		if (b >= 0.0)
                        			tmp_4 = sqrt(((c / a) * -4.0)) * 0.5;
                        		else
                        			tmp_4 = (c + c) / sqrt(((-4.0 * c) * a));
                        		end
                        		tmp_2 = tmp_4;
                        	elseif (b <= 1.9e-61)
                        		tmp_5 = 0.0;
                        		if (b >= 0.0)
                        			tmp_5 = -0.5 * (sqrt((-4.0 * (a * c))) / a);
                        		else
                        			tmp_5 = 2.0 / sqrt((-4.0 * (a / c)));
                        		end
                        		tmp_2 = tmp_5;
                        	elseif (b >= 0.0)
                        		tmp_2 = (-b - abs(b)) / (2.0 * a);
                        	else
                        		tmp_2 = c * (2.0 / t_0);
                        	end
                        	tmp_6 = tmp_2;
                        end
                        
                        code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -4.5e-8], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, -4e-310], If[GreaterEqual[b, 0.0], N[(N[Sqrt[N[(N[(c / a), $MachinePrecision] * -4.0), $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[Sqrt[N[(N[(-4.0 * c), $MachinePrecision] * a), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]], If[LessEqual[b, 1.9e-61], If[GreaterEqual[b, 0.0], N[(-0.5 * N[(N[Sqrt[N[(-4.0 * N[(a * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] / a), $MachinePrecision]), $MachinePrecision], N[(2.0 / N[Sqrt[N[(-4.0 * N[(a / c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]]
                        
                        \begin{array}{l}
                        
                        \\
                        \begin{array}{l}
                        t_0 := \left|b\right| - b\\
                        \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\
                        \;\;\;\;\begin{array}{l}
                        \mathbf{if}\;b \geq 0:\\
                        \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                        
                        \mathbf{else}:\\
                        \;\;\;\;\frac{c + c}{t\_0}\\
                        
                        
                        \end{array}\\
                        
                        \mathbf{elif}\;b \leq -4 \cdot 10^{-310}:\\
                        \;\;\;\;\begin{array}{l}
                        \mathbf{if}\;b \geq 0:\\
                        \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\
                        
                        \mathbf{else}:\\
                        \;\;\;\;\frac{c + c}{\sqrt{\left(-4 \cdot c\right) \cdot a}}\\
                        
                        
                        \end{array}\\
                        
                        \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\
                        \;\;\;\;\begin{array}{l}
                        \mathbf{if}\;b \geq 0:\\
                        \;\;\;\;-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\
                        
                        \mathbf{else}:\\
                        \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\
                        
                        
                        \end{array}\\
                        
                        \mathbf{elif}\;b \geq 0:\\
                        \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                        
                        \mathbf{else}:\\
                        \;\;\;\;c \cdot \frac{2}{t\_0}\\
                        
                        
                        \end{array}
                        \end{array}
                        
                        Derivation
                        1. Split input into 4 regimes
                        2. if b < -4.49999999999999993e-8

                          1. Initial program 72.2%

                            \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          2. Step-by-step derivation
                            1. lift-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            2. lift--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            3. sub-to-multN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            4. sqrt-prodN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            5. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            6. rem-sqrt-square-revN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            7. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            8. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            9. lower--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            10. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            11. associate-/l*N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            12. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            13. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            14. *-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            15. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            16. lower-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            17. lower-fabs.f6474.1

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          3. Applied rewrites74.1%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                          4. Step-by-step derivation
                            1. lift-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                            2. lift--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            3. sub-to-multN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                            4. sqrt-prodN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                            5. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                            6. rem-sqrt-square-revN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            7. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            8. lower-sqrt.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            9. lower--.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            10. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            11. associate-/l*N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            12. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            13. lift-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            14. *-commutativeN/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            15. lower-*.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            16. lower-/.f64N/A

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            17. lower-fabs.f6476.8

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          5. Applied rewrites76.8%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                          6. Taylor expanded in a around 0

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          7. Step-by-step derivation
                            1. lower-fabs.f6472.8

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          8. Applied rewrites72.8%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                          9. Taylor expanded in a around 0

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                          10. Step-by-step derivation
                            1. lower-fabs.f6468.6

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                          11. Applied rewrites68.6%

                            \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                          12. Step-by-step derivation
                            1. Applied rewrites68.5%

                              \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                            2. Step-by-step derivation
                              1. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                              2. lift-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                              3. associate-*r/N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                              4. lower-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                            3. Applied rewrites35.9%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                            if -4.49999999999999993e-8 < b < -3.999999999999988e-310

                            1. Initial program 72.2%

                              \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            2. Taylor expanded in a around inf

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            3. Step-by-step derivation
                              1. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              2. lower-*.f6456.1

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            4. Applied rewrites56.1%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            5. Taylor expanded in a around inf

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            6. Step-by-step derivation
                              1. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              2. lower-*.f6440.2

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            7. Applied rewrites40.2%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            8. Taylor expanded in a around -inf

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            9. Step-by-step derivation
                              1. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              2. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              3. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              4. lower-/.f6427.3

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            10. Applied rewrites27.3%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                            11. Taylor expanded in b around 0

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                            12. Step-by-step derivation
                              1. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                              2. lower-neg.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                              3. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-\color{blue}{4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                              4. lower-*.f6420.2

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}\\ \end{array} \]
                            13. Applied rewrites20.2%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                            14. Step-by-step derivation
                              1. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              2. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{-4 \cdot \frac{c}{a}} \cdot \color{blue}{\frac{1}{2}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              3. lower-*.f6420.2

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{-4 \cdot \frac{c}{a}} \cdot \color{blue}{0.5}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              4. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{-4 \cdot \frac{c}{a}} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              5. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              6. lower-*.f6420.2

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              7. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{Rewrite=>}\left(lift-*.f64, \left(2 \cdot c\right)\right)}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              8. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{Rewrite=>}\left(count-2-rev, \left(c + c\right)\right)}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              9. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{Rewrite<=}\left(lift-+.f64, \left(c + c\right)\right)}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              10. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{Rewrite=>}\left(lift-neg.f64, \left(\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)\right)\right)}}\\ \end{array} \]
                              11. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{neg}\left(\mathsf{Rewrite=>}\left(lift-*.f64, \left(4 \cdot \left(a \cdot c\right)\right)\right)\right)}}\\ \end{array} \]
                              12. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{Rewrite=>}\left(distribute-lft-neg-in, \left(\left(\mathsf{neg}\left(4\right)\right) \cdot \left(a \cdot c\right)\right)\right)}}\\ \end{array} \]
                              13. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{Rewrite=>}\left(metadata-eval, -4\right) \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              14. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{-4 \cdot \mathsf{Rewrite=>}\left(lift-*.f64, \left(a \cdot c\right)\right)}}\\ \end{array} \]
                              15. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{-4 \cdot \mathsf{Rewrite=>}\left(*-commutative, \left(c \cdot a\right)\right)}}\\ \end{array} \]
                            15. Applied rewrites20.2%

                              \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\left(-4 \cdot c\right) \cdot a}}\\ } \end{array}} \]

                            if -3.999999999999988e-310 < b < 1.8999999999999999e-61

                            1. Initial program 72.2%

                              \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            2. Taylor expanded in c around inf

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            3. Step-by-step derivation
                              1. lower-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                              2. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\color{blue}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                              3. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{\color{blue}{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                              4. lower-/.f6444.2

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \color{blue}{\frac{a}{c}}}}\\ \end{array} \]
                            4. Applied rewrites44.2%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            5. Step-by-step derivation
                              1. lift--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              2. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{\left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              3. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{\left(4 \cdot a\right)} \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              4. associate-*l*N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              5. metadata-evalN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \color{blue}{\left(\mathsf{neg}\left(-4\right)\right)} \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              6. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(\mathsf{neg}\left(-4\right)\right) \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              7. fp-cancel-sign-sub-invN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b + -4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              8. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b + -4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              9. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b + -4 \cdot \color{blue}{\left(c \cdot a\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              10. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b + -4 \cdot \color{blue}{\left(c \cdot a\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              11. +-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(c \cdot a\right) + b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              12. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(c \cdot a\right)} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              13. associate-*r*N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(-4 \cdot c\right) \cdot a} + b \cdot b}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              14. lower-fma.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot c, a, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              15. lower-*.f6444.3

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\mathsf{fma}\left(\color{blue}{-4 \cdot c}, a, b \cdot b\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            6. Applied rewrites44.3%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\mathsf{fma}\left(-4 \cdot c, a, b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            7. Taylor expanded in b around 0

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            8. Step-by-step derivation
                              1. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \color{blue}{\frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              2. lower-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{\color{blue}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              3. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              4. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{-1}{2} \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                              5. lower-*.f6420.8

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                            9. Applied rewrites20.8%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{-0.5 \cdot \frac{\sqrt{-4 \cdot \left(a \cdot c\right)}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]

                            if 1.8999999999999999e-61 < b

                            1. Initial program 72.2%

                              \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            2. Step-by-step derivation
                              1. lift-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              2. lift--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              3. sub-to-multN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              4. sqrt-prodN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              5. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              6. rem-sqrt-square-revN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              7. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              8. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              9. lower--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              10. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              11. associate-/l*N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              12. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              13. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              14. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              15. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              16. lower-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              17. lower-fabs.f6474.1

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            3. Applied rewrites74.1%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            4. Step-by-step derivation
                              1. lift-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                              2. lift--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              3. sub-to-multN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                              4. sqrt-prodN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                              5. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                              6. rem-sqrt-square-revN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              7. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              8. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              9. lower--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              10. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              11. associate-/l*N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              12. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              13. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              14. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              15. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              16. lower-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              17. lower-fabs.f6476.8

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            5. Applied rewrites76.8%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            6. Taylor expanded in a around 0

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            7. Step-by-step derivation
                              1. lower-fabs.f6472.8

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            8. Applied rewrites72.8%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            9. Taylor expanded in a around 0

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                            10. Step-by-step derivation
                              1. lower-fabs.f6468.6

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                            11. Applied rewrites68.6%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                            12. Step-by-step derivation
                              1. lift-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                              2. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                              3. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                              4. associate-/l*N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                              5. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                              6. lower-/.f6468.5

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                              7. lift-+.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                              8. +-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                              9. lift-neg.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                              10. sub-flip-reverseN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                              11. lower--.f6468.5

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                            13. Applied rewrites68.5%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                          13. Recombined 4 regimes into one program.
                          14. Add Preprocessing

                          Alternative 13: 78.9% accurate, 1.0× speedup?

                          \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \left(c \cdot \sqrt{\frac{-4}{a \cdot c}}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                          (FPCore (a b c)
                           :precision binary64
                           (let* ((t_0 (- (fabs b) b)))
                             (if (<= b -4.5e-8)
                               (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                               (if (<= b 1.9e-61)
                                 (if (>= b 0.0)
                                   (* 0.5 (* c (sqrt (/ -4.0 (* a c)))))
                                   (/ (* 2.0 c) (sqrt (- (* 4.0 (* a c))))))
                                 (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
                          double code(double a, double b, double c) {
                          	double t_0 = fabs(b) - b;
                          	double tmp_1;
                          	if (b <= -4.5e-8) {
                          		double tmp_2;
                          		if (b >= 0.0) {
                          			tmp_2 = ((-b + b) * -0.5) / a;
                          		} else {
                          			tmp_2 = (c + c) / t_0;
                          		}
                          		tmp_1 = tmp_2;
                          	} else if (b <= 1.9e-61) {
                          		double tmp_3;
                          		if (b >= 0.0) {
                          			tmp_3 = 0.5 * (c * sqrt((-4.0 / (a * c))));
                          		} else {
                          			tmp_3 = (2.0 * c) / sqrt(-(4.0 * (a * c)));
                          		}
                          		tmp_1 = tmp_3;
                          	} else if (b >= 0.0) {
                          		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                          	} else {
                          		tmp_1 = c * (2.0 / t_0);
                          	}
                          	return tmp_1;
                          }
                          
                          module fmin_fmax_functions
                              implicit none
                              private
                              public fmax
                              public fmin
                          
                              interface fmax
                                  module procedure fmax88
                                  module procedure fmax44
                                  module procedure fmax84
                                  module procedure fmax48
                              end interface
                              interface fmin
                                  module procedure fmin88
                                  module procedure fmin44
                                  module procedure fmin84
                                  module procedure fmin48
                              end interface
                          contains
                              real(8) function fmax88(x, y) result (res)
                                  real(8), intent (in) :: x
                                  real(8), intent (in) :: y
                                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                              end function
                              real(4) function fmax44(x, y) result (res)
                                  real(4), intent (in) :: x
                                  real(4), intent (in) :: y
                                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                              end function
                              real(8) function fmax84(x, y) result(res)
                                  real(8), intent (in) :: x
                                  real(4), intent (in) :: y
                                  res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                              end function
                              real(8) function fmax48(x, y) result(res)
                                  real(4), intent (in) :: x
                                  real(8), intent (in) :: y
                                  res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                              end function
                              real(8) function fmin88(x, y) result (res)
                                  real(8), intent (in) :: x
                                  real(8), intent (in) :: y
                                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                              end function
                              real(4) function fmin44(x, y) result (res)
                                  real(4), intent (in) :: x
                                  real(4), intent (in) :: y
                                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                              end function
                              real(8) function fmin84(x, y) result(res)
                                  real(8), intent (in) :: x
                                  real(4), intent (in) :: y
                                  res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                              end function
                              real(8) function fmin48(x, y) result(res)
                                  real(4), intent (in) :: x
                                  real(8), intent (in) :: y
                                  res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                              end function
                          end module
                          
                          real(8) function code(a, b, c)
                          use fmin_fmax_functions
                              real(8), intent (in) :: a
                              real(8), intent (in) :: b
                              real(8), intent (in) :: c
                              real(8) :: t_0
                              real(8) :: tmp
                              real(8) :: tmp_1
                              real(8) :: tmp_2
                              real(8) :: tmp_3
                              t_0 = abs(b) - b
                              if (b <= (-4.5d-8)) then
                                  if (b >= 0.0d0) then
                                      tmp_2 = ((-b + b) * (-0.5d0)) / a
                                  else
                                      tmp_2 = (c + c) / t_0
                                  end if
                                  tmp_1 = tmp_2
                              else if (b <= 1.9d-61) then
                                  if (b >= 0.0d0) then
                                      tmp_3 = 0.5d0 * (c * sqrt(((-4.0d0) / (a * c))))
                                  else
                                      tmp_3 = (2.0d0 * c) / sqrt(-(4.0d0 * (a * c)))
                                  end if
                                  tmp_1 = tmp_3
                              else if (b >= 0.0d0) then
                                  tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                              else
                                  tmp_1 = c * (2.0d0 / t_0)
                              end if
                              code = tmp_1
                          end function
                          
                          public static double code(double a, double b, double c) {
                          	double t_0 = Math.abs(b) - b;
                          	double tmp_1;
                          	if (b <= -4.5e-8) {
                          		double tmp_2;
                          		if (b >= 0.0) {
                          			tmp_2 = ((-b + b) * -0.5) / a;
                          		} else {
                          			tmp_2 = (c + c) / t_0;
                          		}
                          		tmp_1 = tmp_2;
                          	} else if (b <= 1.9e-61) {
                          		double tmp_3;
                          		if (b >= 0.0) {
                          			tmp_3 = 0.5 * (c * Math.sqrt((-4.0 / (a * c))));
                          		} else {
                          			tmp_3 = (2.0 * c) / Math.sqrt(-(4.0 * (a * c)));
                          		}
                          		tmp_1 = tmp_3;
                          	} else if (b >= 0.0) {
                          		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                          	} else {
                          		tmp_1 = c * (2.0 / t_0);
                          	}
                          	return tmp_1;
                          }
                          
                          def code(a, b, c):
                          	t_0 = math.fabs(b) - b
                          	tmp_1 = 0
                          	if b <= -4.5e-8:
                          		tmp_2 = 0
                          		if b >= 0.0:
                          			tmp_2 = ((-b + b) * -0.5) / a
                          		else:
                          			tmp_2 = (c + c) / t_0
                          		tmp_1 = tmp_2
                          	elif b <= 1.9e-61:
                          		tmp_3 = 0
                          		if b >= 0.0:
                          			tmp_3 = 0.5 * (c * math.sqrt((-4.0 / (a * c))))
                          		else:
                          			tmp_3 = (2.0 * c) / math.sqrt(-(4.0 * (a * c)))
                          		tmp_1 = tmp_3
                          	elif b >= 0.0:
                          		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                          	else:
                          		tmp_1 = c * (2.0 / t_0)
                          	return tmp_1
                          
                          function code(a, b, c)
                          	t_0 = Float64(abs(b) - b)
                          	tmp_1 = 0.0
                          	if (b <= -4.5e-8)
                          		tmp_2 = 0.0
                          		if (b >= 0.0)
                          			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                          		else
                          			tmp_2 = Float64(Float64(c + c) / t_0);
                          		end
                          		tmp_1 = tmp_2;
                          	elseif (b <= 1.9e-61)
                          		tmp_3 = 0.0
                          		if (b >= 0.0)
                          			tmp_3 = Float64(0.5 * Float64(c * sqrt(Float64(-4.0 / Float64(a * c)))));
                          		else
                          			tmp_3 = Float64(Float64(2.0 * c) / sqrt(Float64(-Float64(4.0 * Float64(a * c)))));
                          		end
                          		tmp_1 = tmp_3;
                          	elseif (b >= 0.0)
                          		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                          	else
                          		tmp_1 = Float64(c * Float64(2.0 / t_0));
                          	end
                          	return tmp_1
                          end
                          
                          function tmp_5 = code(a, b, c)
                          	t_0 = abs(b) - b;
                          	tmp_2 = 0.0;
                          	if (b <= -4.5e-8)
                          		tmp_3 = 0.0;
                          		if (b >= 0.0)
                          			tmp_3 = ((-b + b) * -0.5) / a;
                          		else
                          			tmp_3 = (c + c) / t_0;
                          		end
                          		tmp_2 = tmp_3;
                          	elseif (b <= 1.9e-61)
                          		tmp_4 = 0.0;
                          		if (b >= 0.0)
                          			tmp_4 = 0.5 * (c * sqrt((-4.0 / (a * c))));
                          		else
                          			tmp_4 = (2.0 * c) / sqrt(-(4.0 * (a * c)));
                          		end
                          		tmp_2 = tmp_4;
                          	elseif (b >= 0.0)
                          		tmp_2 = (-b - abs(b)) / (2.0 * a);
                          	else
                          		tmp_2 = c * (2.0 / t_0);
                          	end
                          	tmp_5 = tmp_2;
                          end
                          
                          code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -4.5e-8], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 1.9e-61], If[GreaterEqual[b, 0.0], N[(0.5 * N[(c * N[Sqrt[N[(-4.0 / N[(a * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[Sqrt[(-N[(4.0 * N[(a * c), $MachinePrecision]), $MachinePrecision])], $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]
                          
                          \begin{array}{l}
                          
                          \\
                          \begin{array}{l}
                          t_0 := \left|b\right| - b\\
                          \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\
                          \;\;\;\;\begin{array}{l}
                          \mathbf{if}\;b \geq 0:\\
                          \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                          
                          \mathbf{else}:\\
                          \;\;\;\;\frac{c + c}{t\_0}\\
                          
                          
                          \end{array}\\
                          
                          \mathbf{elif}\;b \leq 1.9 \cdot 10^{-61}:\\
                          \;\;\;\;\begin{array}{l}
                          \mathbf{if}\;b \geq 0:\\
                          \;\;\;\;0.5 \cdot \left(c \cdot \sqrt{\frac{-4}{a \cdot c}}\right)\\
                          
                          \mathbf{else}:\\
                          \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\
                          
                          
                          \end{array}\\
                          
                          \mathbf{elif}\;b \geq 0:\\
                          \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                          
                          \mathbf{else}:\\
                          \;\;\;\;c \cdot \frac{2}{t\_0}\\
                          
                          
                          \end{array}
                          \end{array}
                          
                          Derivation
                          1. Split input into 3 regimes
                          2. if b < -4.49999999999999993e-8

                            1. Initial program 72.2%

                              \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            2. Step-by-step derivation
                              1. lift-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              2. lift--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              3. sub-to-multN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              4. sqrt-prodN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              5. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              6. rem-sqrt-square-revN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              7. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              8. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              9. lower--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              10. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              11. associate-/l*N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              12. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              13. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              14. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              15. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              16. lower-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              17. lower-fabs.f6474.1

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            3. Applied rewrites74.1%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                            4. Step-by-step derivation
                              1. lift-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                              2. lift--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              3. sub-to-multN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                              4. sqrt-prodN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                              5. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                              6. rem-sqrt-square-revN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              7. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              8. lower-sqrt.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              9. lower--.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              10. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              11. associate-/l*N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              12. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              13. lift-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              14. *-commutativeN/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              15. lower-*.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              16. lower-/.f64N/A

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              17. lower-fabs.f6476.8

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            5. Applied rewrites76.8%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                            6. Taylor expanded in a around 0

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            7. Step-by-step derivation
                              1. lower-fabs.f6472.8

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            8. Applied rewrites72.8%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                            9. Taylor expanded in a around 0

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                            10. Step-by-step derivation
                              1. lower-fabs.f6468.6

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                            11. Applied rewrites68.6%

                              \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                            12. Step-by-step derivation
                              1. Applied rewrites68.5%

                                \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                              2. Step-by-step derivation
                                1. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                2. lift-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                3. associate-*r/N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                4. lower-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                              3. Applied rewrites35.9%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                              if -4.49999999999999993e-8 < b < 1.8999999999999999e-61

                              1. Initial program 72.2%

                                \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              2. Taylor expanded in a around inf

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              3. Step-by-step derivation
                                1. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                2. lower-*.f6456.1

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              4. Applied rewrites56.1%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              5. Taylor expanded in a around inf

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              6. Step-by-step derivation
                                1. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                2. lower-*.f6440.2

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              7. Applied rewrites40.2%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              8. Taylor expanded in a around -inf

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              9. Step-by-step derivation
                                1. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                2. lower-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                3. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                4. lower-/.f6427.3

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              10. Applied rewrites27.3%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              11. Taylor expanded in b around 0

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                              12. Step-by-step derivation
                                1. lower-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                                2. lower-neg.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                3. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-\color{blue}{4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                4. lower-*.f6420.2

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}\\ \end{array} \]
                              13. Applied rewrites20.2%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                              14. Taylor expanded in c around inf

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \left(c \cdot \color{blue}{\sqrt{\frac{-4}{a \cdot c}}}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              15. Step-by-step derivation
                                1. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \left(c \cdot \sqrt{\frac{-4}{a \cdot c}}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                2. lower-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \left(c \cdot \sqrt{\frac{-4}{a \cdot c}}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                3. lower-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \left(c \cdot \sqrt{\frac{-4}{a \cdot c}}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                4. lower-*.f6427.2

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \left(c \cdot \sqrt{\frac{-4}{a \cdot c}}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                              16. Applied rewrites27.2%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \left(c \cdot \color{blue}{\sqrt{\frac{-4}{a \cdot c}}}\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]

                              if 1.8999999999999999e-61 < b

                              1. Initial program 72.2%

                                \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              2. Step-by-step derivation
                                1. lift-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                2. lift--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                3. sub-to-multN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                4. sqrt-prodN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                5. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                6. rem-sqrt-square-revN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                7. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                8. lower-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                9. lower--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                10. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                11. associate-/l*N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                12. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                13. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                14. *-commutativeN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                15. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                16. lower-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                17. lower-fabs.f6474.1

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              3. Applied rewrites74.1%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              4. Step-by-step derivation
                                1. lift-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                2. lift--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                3. sub-to-multN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                4. sqrt-prodN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                5. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                6. rem-sqrt-square-revN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                7. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                8. lower-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                9. lower--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                10. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                11. associate-/l*N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                12. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                13. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                14. *-commutativeN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                15. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                16. lower-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                17. lower-fabs.f6476.8

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              5. Applied rewrites76.8%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              6. Taylor expanded in a around 0

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              7. Step-by-step derivation
                                1. lower-fabs.f6472.8

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              8. Applied rewrites72.8%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              9. Taylor expanded in a around 0

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                              10. Step-by-step derivation
                                1. lower-fabs.f6468.6

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                              11. Applied rewrites68.6%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                              12. Step-by-step derivation
                                1. lift-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                2. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                3. *-commutativeN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                4. associate-/l*N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                5. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                6. lower-/.f6468.5

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                7. lift-+.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                8. +-commutativeN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                                9. lift-neg.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                                10. sub-flip-reverseN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                11. lower--.f6468.5

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                              13. Applied rewrites68.5%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                            13. Recombined 3 regimes into one program.
                            14. Add Preprocessing

                            Alternative 14: 75.7% accurate, 1.1× speedup?

                            \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.65 \cdot 10^{-130}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\left(-4 \cdot c\right) \cdot a}}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                            (FPCore (a b c)
                             :precision binary64
                             (let* ((t_0 (- (fabs b) b)))
                               (if (<= b -4.5e-8)
                                 (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                                 (if (<= b 1.65e-130)
                                   (if (>= b 0.0)
                                     (* (sqrt (* (/ c a) -4.0)) 0.5)
                                     (/ (+ c c) (sqrt (* (* -4.0 c) a))))
                                   (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
                            double code(double a, double b, double c) {
                            	double t_0 = fabs(b) - b;
                            	double tmp_1;
                            	if (b <= -4.5e-8) {
                            		double tmp_2;
                            		if (b >= 0.0) {
                            			tmp_2 = ((-b + b) * -0.5) / a;
                            		} else {
                            			tmp_2 = (c + c) / t_0;
                            		}
                            		tmp_1 = tmp_2;
                            	} else if (b <= 1.65e-130) {
                            		double tmp_3;
                            		if (b >= 0.0) {
                            			tmp_3 = sqrt(((c / a) * -4.0)) * 0.5;
                            		} else {
                            			tmp_3 = (c + c) / sqrt(((-4.0 * c) * a));
                            		}
                            		tmp_1 = tmp_3;
                            	} else if (b >= 0.0) {
                            		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                            	} else {
                            		tmp_1 = c * (2.0 / t_0);
                            	}
                            	return tmp_1;
                            }
                            
                            module fmin_fmax_functions
                                implicit none
                                private
                                public fmax
                                public fmin
                            
                                interface fmax
                                    module procedure fmax88
                                    module procedure fmax44
                                    module procedure fmax84
                                    module procedure fmax48
                                end interface
                                interface fmin
                                    module procedure fmin88
                                    module procedure fmin44
                                    module procedure fmin84
                                    module procedure fmin48
                                end interface
                            contains
                                real(8) function fmax88(x, y) result (res)
                                    real(8), intent (in) :: x
                                    real(8), intent (in) :: y
                                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                end function
                                real(4) function fmax44(x, y) result (res)
                                    real(4), intent (in) :: x
                                    real(4), intent (in) :: y
                                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                end function
                                real(8) function fmax84(x, y) result(res)
                                    real(8), intent (in) :: x
                                    real(4), intent (in) :: y
                                    res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                end function
                                real(8) function fmax48(x, y) result(res)
                                    real(4), intent (in) :: x
                                    real(8), intent (in) :: y
                                    res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                end function
                                real(8) function fmin88(x, y) result (res)
                                    real(8), intent (in) :: x
                                    real(8), intent (in) :: y
                                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                end function
                                real(4) function fmin44(x, y) result (res)
                                    real(4), intent (in) :: x
                                    real(4), intent (in) :: y
                                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                end function
                                real(8) function fmin84(x, y) result(res)
                                    real(8), intent (in) :: x
                                    real(4), intent (in) :: y
                                    res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                end function
                                real(8) function fmin48(x, y) result(res)
                                    real(4), intent (in) :: x
                                    real(8), intent (in) :: y
                                    res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                end function
                            end module
                            
                            real(8) function code(a, b, c)
                            use fmin_fmax_functions
                                real(8), intent (in) :: a
                                real(8), intent (in) :: b
                                real(8), intent (in) :: c
                                real(8) :: t_0
                                real(8) :: tmp
                                real(8) :: tmp_1
                                real(8) :: tmp_2
                                real(8) :: tmp_3
                                t_0 = abs(b) - b
                                if (b <= (-4.5d-8)) then
                                    if (b >= 0.0d0) then
                                        tmp_2 = ((-b + b) * (-0.5d0)) / a
                                    else
                                        tmp_2 = (c + c) / t_0
                                    end if
                                    tmp_1 = tmp_2
                                else if (b <= 1.65d-130) then
                                    if (b >= 0.0d0) then
                                        tmp_3 = sqrt(((c / a) * (-4.0d0))) * 0.5d0
                                    else
                                        tmp_3 = (c + c) / sqrt((((-4.0d0) * c) * a))
                                    end if
                                    tmp_1 = tmp_3
                                else if (b >= 0.0d0) then
                                    tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                                else
                                    tmp_1 = c * (2.0d0 / t_0)
                                end if
                                code = tmp_1
                            end function
                            
                            public static double code(double a, double b, double c) {
                            	double t_0 = Math.abs(b) - b;
                            	double tmp_1;
                            	if (b <= -4.5e-8) {
                            		double tmp_2;
                            		if (b >= 0.0) {
                            			tmp_2 = ((-b + b) * -0.5) / a;
                            		} else {
                            			tmp_2 = (c + c) / t_0;
                            		}
                            		tmp_1 = tmp_2;
                            	} else if (b <= 1.65e-130) {
                            		double tmp_3;
                            		if (b >= 0.0) {
                            			tmp_3 = Math.sqrt(((c / a) * -4.0)) * 0.5;
                            		} else {
                            			tmp_3 = (c + c) / Math.sqrt(((-4.0 * c) * a));
                            		}
                            		tmp_1 = tmp_3;
                            	} else if (b >= 0.0) {
                            		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                            	} else {
                            		tmp_1 = c * (2.0 / t_0);
                            	}
                            	return tmp_1;
                            }
                            
                            def code(a, b, c):
                            	t_0 = math.fabs(b) - b
                            	tmp_1 = 0
                            	if b <= -4.5e-8:
                            		tmp_2 = 0
                            		if b >= 0.0:
                            			tmp_2 = ((-b + b) * -0.5) / a
                            		else:
                            			tmp_2 = (c + c) / t_0
                            		tmp_1 = tmp_2
                            	elif b <= 1.65e-130:
                            		tmp_3 = 0
                            		if b >= 0.0:
                            			tmp_3 = math.sqrt(((c / a) * -4.0)) * 0.5
                            		else:
                            			tmp_3 = (c + c) / math.sqrt(((-4.0 * c) * a))
                            		tmp_1 = tmp_3
                            	elif b >= 0.0:
                            		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                            	else:
                            		tmp_1 = c * (2.0 / t_0)
                            	return tmp_1
                            
                            function code(a, b, c)
                            	t_0 = Float64(abs(b) - b)
                            	tmp_1 = 0.0
                            	if (b <= -4.5e-8)
                            		tmp_2 = 0.0
                            		if (b >= 0.0)
                            			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                            		else
                            			tmp_2 = Float64(Float64(c + c) / t_0);
                            		end
                            		tmp_1 = tmp_2;
                            	elseif (b <= 1.65e-130)
                            		tmp_3 = 0.0
                            		if (b >= 0.0)
                            			tmp_3 = Float64(sqrt(Float64(Float64(c / a) * -4.0)) * 0.5);
                            		else
                            			tmp_3 = Float64(Float64(c + c) / sqrt(Float64(Float64(-4.0 * c) * a)));
                            		end
                            		tmp_1 = tmp_3;
                            	elseif (b >= 0.0)
                            		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                            	else
                            		tmp_1 = Float64(c * Float64(2.0 / t_0));
                            	end
                            	return tmp_1
                            end
                            
                            function tmp_5 = code(a, b, c)
                            	t_0 = abs(b) - b;
                            	tmp_2 = 0.0;
                            	if (b <= -4.5e-8)
                            		tmp_3 = 0.0;
                            		if (b >= 0.0)
                            			tmp_3 = ((-b + b) * -0.5) / a;
                            		else
                            			tmp_3 = (c + c) / t_0;
                            		end
                            		tmp_2 = tmp_3;
                            	elseif (b <= 1.65e-130)
                            		tmp_4 = 0.0;
                            		if (b >= 0.0)
                            			tmp_4 = sqrt(((c / a) * -4.0)) * 0.5;
                            		else
                            			tmp_4 = (c + c) / sqrt(((-4.0 * c) * a));
                            		end
                            		tmp_2 = tmp_4;
                            	elseif (b >= 0.0)
                            		tmp_2 = (-b - abs(b)) / (2.0 * a);
                            	else
                            		tmp_2 = c * (2.0 / t_0);
                            	end
                            	tmp_5 = tmp_2;
                            end
                            
                            code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -4.5e-8], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 1.65e-130], If[GreaterEqual[b, 0.0], N[(N[Sqrt[N[(N[(c / a), $MachinePrecision] * -4.0), $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[Sqrt[N[(N[(-4.0 * c), $MachinePrecision] * a), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]
                            
                            \begin{array}{l}
                            
                            \\
                            \begin{array}{l}
                            t_0 := \left|b\right| - b\\
                            \mathbf{if}\;b \leq -4.5 \cdot 10^{-8}:\\
                            \;\;\;\;\begin{array}{l}
                            \mathbf{if}\;b \geq 0:\\
                            \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                            
                            \mathbf{else}:\\
                            \;\;\;\;\frac{c + c}{t\_0}\\
                            
                            
                            \end{array}\\
                            
                            \mathbf{elif}\;b \leq 1.65 \cdot 10^{-130}:\\
                            \;\;\;\;\begin{array}{l}
                            \mathbf{if}\;b \geq 0:\\
                            \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\
                            
                            \mathbf{else}:\\
                            \;\;\;\;\frac{c + c}{\sqrt{\left(-4 \cdot c\right) \cdot a}}\\
                            
                            
                            \end{array}\\
                            
                            \mathbf{elif}\;b \geq 0:\\
                            \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                            
                            \mathbf{else}:\\
                            \;\;\;\;c \cdot \frac{2}{t\_0}\\
                            
                            
                            \end{array}
                            \end{array}
                            
                            Derivation
                            1. Split input into 3 regimes
                            2. if b < -4.49999999999999993e-8

                              1. Initial program 72.2%

                                \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              2. Step-by-step derivation
                                1. lift-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                2. lift--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                3. sub-to-multN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                4. sqrt-prodN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                5. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                6. rem-sqrt-square-revN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                7. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                8. lower-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                9. lower--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                10. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                11. associate-/l*N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                12. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                13. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                14. *-commutativeN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                15. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                16. lower-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                17. lower-fabs.f6474.1

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              3. Applied rewrites74.1%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                              4. Step-by-step derivation
                                1. lift-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                2. lift--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                3. sub-to-multN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                4. sqrt-prodN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                5. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                6. rem-sqrt-square-revN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                7. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                8. lower-sqrt.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                9. lower--.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                10. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                11. associate-/l*N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                12. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                13. lift-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                14. *-commutativeN/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                15. lower-*.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                16. lower-/.f64N/A

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                17. lower-fabs.f6476.8

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              5. Applied rewrites76.8%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                              6. Taylor expanded in a around 0

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              7. Step-by-step derivation
                                1. lower-fabs.f6472.8

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              8. Applied rewrites72.8%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                              9. Taylor expanded in a around 0

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                              10. Step-by-step derivation
                                1. lower-fabs.f6468.6

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                              11. Applied rewrites68.6%

                                \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                              12. Step-by-step derivation
                                1. Applied rewrites68.5%

                                  \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                                2. Step-by-step derivation
                                  1. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                  2. lift-/.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                  3. associate-*r/N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                  4. lower-/.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                3. Applied rewrites35.9%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                                if -4.49999999999999993e-8 < b < 1.6499999999999999e-130

                                1. Initial program 72.2%

                                  \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                2. Taylor expanded in a around inf

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                3. Step-by-step derivation
                                  1. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. lower-*.f6456.1

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                4. Applied rewrites56.1%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                5. Taylor expanded in a around inf

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                6. Step-by-step derivation
                                  1. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  2. lower-*.f6440.2

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                7. Applied rewrites40.2%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                8. Taylor expanded in a around -inf

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                9. Step-by-step derivation
                                  1. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  2. lower-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  3. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  4. lower-/.f6427.3

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                10. Applied rewrites27.3%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                11. Taylor expanded in b around 0

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                                12. Step-by-step derivation
                                  1. lower-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                                  2. lower-neg.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                  3. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-\color{blue}{4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                  4. lower-*.f6420.2

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}\\ \end{array} \]
                                13. Applied rewrites20.2%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                14. Step-by-step derivation
                                  1. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  2. *-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{-4 \cdot \frac{c}{a}} \cdot \color{blue}{\frac{1}{2}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  3. lower-*.f6420.2

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{-4 \cdot \frac{c}{a}} \cdot \color{blue}{0.5}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  4. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{-4 \cdot \frac{c}{a}} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  5. *-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  6. lower-*.f6420.2

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  7. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{Rewrite=>}\left(lift-*.f64, \left(2 \cdot c\right)\right)}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  8. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{Rewrite=>}\left(count-2-rev, \left(c + c\right)\right)}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  9. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{Rewrite<=}\left(lift-+.f64, \left(c + c\right)\right)}{\sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  10. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{Rewrite=>}\left(lift-neg.f64, \left(\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)\right)\right)}}\\ \end{array} \]
                                  11. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{neg}\left(\mathsf{Rewrite=>}\left(lift-*.f64, \left(4 \cdot \left(a \cdot c\right)\right)\right)\right)}}\\ \end{array} \]
                                  12. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{Rewrite=>}\left(distribute-lft-neg-in, \left(\left(\mathsf{neg}\left(4\right)\right) \cdot \left(a \cdot c\right)\right)\right)}}\\ \end{array} \]
                                  13. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\mathsf{Rewrite=>}\left(metadata-eval, -4\right) \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  14. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{-4 \cdot \mathsf{Rewrite=>}\left(lift-*.f64, \left(a \cdot c\right)\right)}}\\ \end{array} \]
                                  15. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot \frac{1}{2}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{-4 \cdot \mathsf{Rewrite=>}\left(*-commutative, \left(c \cdot a\right)\right)}}\\ \end{array} \]
                                15. Applied rewrites20.2%

                                  \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\sqrt{\frac{c}{a} \cdot -4} \cdot 0.5\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\sqrt{\left(-4 \cdot c\right) \cdot a}}\\ } \end{array}} \]

                                if 1.6499999999999999e-130 < b

                                1. Initial program 72.2%

                                  \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                2. Step-by-step derivation
                                  1. lift-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. lift--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. sub-to-multN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. sqrt-prodN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  5. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  6. rem-sqrt-square-revN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  7. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  8. lower-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  9. lower--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  10. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  11. associate-/l*N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  12. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  13. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  14. *-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  15. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  16. lower-/.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  17. lower-fabs.f6474.1

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                3. Applied rewrites74.1%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                4. Step-by-step derivation
                                  1. lift-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                  2. lift--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. sub-to-multN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                  4. sqrt-prodN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                  5. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                  6. rem-sqrt-square-revN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  7. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  8. lower-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  9. lower--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  10. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  11. associate-/l*N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  12. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  13. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  14. *-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  15. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  16. lower-/.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  17. lower-fabs.f6476.8

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                5. Applied rewrites76.8%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                6. Taylor expanded in a around 0

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                7. Step-by-step derivation
                                  1. lower-fabs.f6472.8

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                8. Applied rewrites72.8%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                9. Taylor expanded in a around 0

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                10. Step-by-step derivation
                                  1. lower-fabs.f6468.6

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                11. Applied rewrites68.6%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                12. Step-by-step derivation
                                  1. lift-/.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                  2. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                  3. *-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                  4. associate-/l*N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                  5. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                  6. lower-/.f6468.5

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  7. lift-+.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  8. +-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                                  9. lift-neg.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                                  10. sub-flip-reverseN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                  11. lower--.f6468.5

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                13. Applied rewrites68.5%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                              13. Recombined 3 regimes into one program.
                              14. Add Preprocessing

                              Alternative 15: 72.4% accurate, 1.2× speedup?

                              \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -1.16 \cdot 10^{-154}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.65 \cdot 10^{-130}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                              (FPCore (a b c)
                               :precision binary64
                               (let* ((t_0 (- (fabs b) b)))
                                 (if (<= b -1.16e-154)
                                   (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                                   (if (<= b 1.65e-130)
                                     (if (>= b 0.0)
                                       (* 0.5 (sqrt (* -4.0 (/ c a))))
                                       (/ 2.0 (sqrt (* -4.0 (/ a c)))))
                                     (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
                              double code(double a, double b, double c) {
                              	double t_0 = fabs(b) - b;
                              	double tmp_1;
                              	if (b <= -1.16e-154) {
                              		double tmp_2;
                              		if (b >= 0.0) {
                              			tmp_2 = ((-b + b) * -0.5) / a;
                              		} else {
                              			tmp_2 = (c + c) / t_0;
                              		}
                              		tmp_1 = tmp_2;
                              	} else if (b <= 1.65e-130) {
                              		double tmp_3;
                              		if (b >= 0.0) {
                              			tmp_3 = 0.5 * sqrt((-4.0 * (c / a)));
                              		} else {
                              			tmp_3 = 2.0 / sqrt((-4.0 * (a / c)));
                              		}
                              		tmp_1 = tmp_3;
                              	} else if (b >= 0.0) {
                              		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                              	} else {
                              		tmp_1 = c * (2.0 / t_0);
                              	}
                              	return tmp_1;
                              }
                              
                              module fmin_fmax_functions
                                  implicit none
                                  private
                                  public fmax
                                  public fmin
                              
                                  interface fmax
                                      module procedure fmax88
                                      module procedure fmax44
                                      module procedure fmax84
                                      module procedure fmax48
                                  end interface
                                  interface fmin
                                      module procedure fmin88
                                      module procedure fmin44
                                      module procedure fmin84
                                      module procedure fmin48
                                  end interface
                              contains
                                  real(8) function fmax88(x, y) result (res)
                                      real(8), intent (in) :: x
                                      real(8), intent (in) :: y
                                      res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                  end function
                                  real(4) function fmax44(x, y) result (res)
                                      real(4), intent (in) :: x
                                      real(4), intent (in) :: y
                                      res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                  end function
                                  real(8) function fmax84(x, y) result(res)
                                      real(8), intent (in) :: x
                                      real(4), intent (in) :: y
                                      res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                  end function
                                  real(8) function fmax48(x, y) result(res)
                                      real(4), intent (in) :: x
                                      real(8), intent (in) :: y
                                      res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                  end function
                                  real(8) function fmin88(x, y) result (res)
                                      real(8), intent (in) :: x
                                      real(8), intent (in) :: y
                                      res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                  end function
                                  real(4) function fmin44(x, y) result (res)
                                      real(4), intent (in) :: x
                                      real(4), intent (in) :: y
                                      res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                  end function
                                  real(8) function fmin84(x, y) result(res)
                                      real(8), intent (in) :: x
                                      real(4), intent (in) :: y
                                      res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                  end function
                                  real(8) function fmin48(x, y) result(res)
                                      real(4), intent (in) :: x
                                      real(8), intent (in) :: y
                                      res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                  end function
                              end module
                              
                              real(8) function code(a, b, c)
                              use fmin_fmax_functions
                                  real(8), intent (in) :: a
                                  real(8), intent (in) :: b
                                  real(8), intent (in) :: c
                                  real(8) :: t_0
                                  real(8) :: tmp
                                  real(8) :: tmp_1
                                  real(8) :: tmp_2
                                  real(8) :: tmp_3
                                  t_0 = abs(b) - b
                                  if (b <= (-1.16d-154)) then
                                      if (b >= 0.0d0) then
                                          tmp_2 = ((-b + b) * (-0.5d0)) / a
                                      else
                                          tmp_2 = (c + c) / t_0
                                      end if
                                      tmp_1 = tmp_2
                                  else if (b <= 1.65d-130) then
                                      if (b >= 0.0d0) then
                                          tmp_3 = 0.5d0 * sqrt(((-4.0d0) * (c / a)))
                                      else
                                          tmp_3 = 2.0d0 / sqrt(((-4.0d0) * (a / c)))
                                      end if
                                      tmp_1 = tmp_3
                                  else if (b >= 0.0d0) then
                                      tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                                  else
                                      tmp_1 = c * (2.0d0 / t_0)
                                  end if
                                  code = tmp_1
                              end function
                              
                              public static double code(double a, double b, double c) {
                              	double t_0 = Math.abs(b) - b;
                              	double tmp_1;
                              	if (b <= -1.16e-154) {
                              		double tmp_2;
                              		if (b >= 0.0) {
                              			tmp_2 = ((-b + b) * -0.5) / a;
                              		} else {
                              			tmp_2 = (c + c) / t_0;
                              		}
                              		tmp_1 = tmp_2;
                              	} else if (b <= 1.65e-130) {
                              		double tmp_3;
                              		if (b >= 0.0) {
                              			tmp_3 = 0.5 * Math.sqrt((-4.0 * (c / a)));
                              		} else {
                              			tmp_3 = 2.0 / Math.sqrt((-4.0 * (a / c)));
                              		}
                              		tmp_1 = tmp_3;
                              	} else if (b >= 0.0) {
                              		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                              	} else {
                              		tmp_1 = c * (2.0 / t_0);
                              	}
                              	return tmp_1;
                              }
                              
                              def code(a, b, c):
                              	t_0 = math.fabs(b) - b
                              	tmp_1 = 0
                              	if b <= -1.16e-154:
                              		tmp_2 = 0
                              		if b >= 0.0:
                              			tmp_2 = ((-b + b) * -0.5) / a
                              		else:
                              			tmp_2 = (c + c) / t_0
                              		tmp_1 = tmp_2
                              	elif b <= 1.65e-130:
                              		tmp_3 = 0
                              		if b >= 0.0:
                              			tmp_3 = 0.5 * math.sqrt((-4.0 * (c / a)))
                              		else:
                              			tmp_3 = 2.0 / math.sqrt((-4.0 * (a / c)))
                              		tmp_1 = tmp_3
                              	elif b >= 0.0:
                              		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                              	else:
                              		tmp_1 = c * (2.0 / t_0)
                              	return tmp_1
                              
                              function code(a, b, c)
                              	t_0 = Float64(abs(b) - b)
                              	tmp_1 = 0.0
                              	if (b <= -1.16e-154)
                              		tmp_2 = 0.0
                              		if (b >= 0.0)
                              			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                              		else
                              			tmp_2 = Float64(Float64(c + c) / t_0);
                              		end
                              		tmp_1 = tmp_2;
                              	elseif (b <= 1.65e-130)
                              		tmp_3 = 0.0
                              		if (b >= 0.0)
                              			tmp_3 = Float64(0.5 * sqrt(Float64(-4.0 * Float64(c / a))));
                              		else
                              			tmp_3 = Float64(2.0 / sqrt(Float64(-4.0 * Float64(a / c))));
                              		end
                              		tmp_1 = tmp_3;
                              	elseif (b >= 0.0)
                              		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                              	else
                              		tmp_1 = Float64(c * Float64(2.0 / t_0));
                              	end
                              	return tmp_1
                              end
                              
                              function tmp_5 = code(a, b, c)
                              	t_0 = abs(b) - b;
                              	tmp_2 = 0.0;
                              	if (b <= -1.16e-154)
                              		tmp_3 = 0.0;
                              		if (b >= 0.0)
                              			tmp_3 = ((-b + b) * -0.5) / a;
                              		else
                              			tmp_3 = (c + c) / t_0;
                              		end
                              		tmp_2 = tmp_3;
                              	elseif (b <= 1.65e-130)
                              		tmp_4 = 0.0;
                              		if (b >= 0.0)
                              			tmp_4 = 0.5 * sqrt((-4.0 * (c / a)));
                              		else
                              			tmp_4 = 2.0 / sqrt((-4.0 * (a / c)));
                              		end
                              		tmp_2 = tmp_4;
                              	elseif (b >= 0.0)
                              		tmp_2 = (-b - abs(b)) / (2.0 * a);
                              	else
                              		tmp_2 = c * (2.0 / t_0);
                              	end
                              	tmp_5 = tmp_2;
                              end
                              
                              code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -1.16e-154], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 1.65e-130], If[GreaterEqual[b, 0.0], N[(0.5 * N[Sqrt[N[(-4.0 * N[(c / a), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], N[(2.0 / N[Sqrt[N[(-4.0 * N[(a / c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]
                              
                              \begin{array}{l}
                              
                              \\
                              \begin{array}{l}
                              t_0 := \left|b\right| - b\\
                              \mathbf{if}\;b \leq -1.16 \cdot 10^{-154}:\\
                              \;\;\;\;\begin{array}{l}
                              \mathbf{if}\;b \geq 0:\\
                              \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                              
                              \mathbf{else}:\\
                              \;\;\;\;\frac{c + c}{t\_0}\\
                              
                              
                              \end{array}\\
                              
                              \mathbf{elif}\;b \leq 1.65 \cdot 10^{-130}:\\
                              \;\;\;\;\begin{array}{l}
                              \mathbf{if}\;b \geq 0:\\
                              \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\
                              
                              \mathbf{else}:\\
                              \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\
                              
                              
                              \end{array}\\
                              
                              \mathbf{elif}\;b \geq 0:\\
                              \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                              
                              \mathbf{else}:\\
                              \;\;\;\;c \cdot \frac{2}{t\_0}\\
                              
                              
                              \end{array}
                              \end{array}
                              
                              Derivation
                              1. Split input into 3 regimes
                              2. if b < -1.16000000000000004e-154

                                1. Initial program 72.2%

                                  \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                2. Step-by-step derivation
                                  1. lift-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. lift--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. sub-to-multN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. sqrt-prodN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  5. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  6. rem-sqrt-square-revN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  7. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  8. lower-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  9. lower--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  10. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  11. associate-/l*N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  12. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  13. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  14. *-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  15. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  16. lower-/.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  17. lower-fabs.f6474.1

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                3. Applied rewrites74.1%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                4. Step-by-step derivation
                                  1. lift-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                  2. lift--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. sub-to-multN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                  4. sqrt-prodN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                  5. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                  6. rem-sqrt-square-revN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  7. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  8. lower-sqrt.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  9. lower--.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  10. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  11. associate-/l*N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  12. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  13. lift-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  14. *-commutativeN/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  15. lower-*.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  16. lower-/.f64N/A

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  17. lower-fabs.f6476.8

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                5. Applied rewrites76.8%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                6. Taylor expanded in a around 0

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                7. Step-by-step derivation
                                  1. lower-fabs.f6472.8

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                8. Applied rewrites72.8%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                9. Taylor expanded in a around 0

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                10. Step-by-step derivation
                                  1. lower-fabs.f6468.6

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                11. Applied rewrites68.6%

                                  \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                12. Step-by-step derivation
                                  1. Applied rewrites68.5%

                                    \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                                  2. Step-by-step derivation
                                    1. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                    2. lift-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                    3. associate-*r/N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                    4. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                  3. Applied rewrites35.9%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                                  if -1.16000000000000004e-154 < b < 1.6499999999999999e-130

                                  1. Initial program 72.2%

                                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. Taylor expanded in a around inf

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. Step-by-step derivation
                                    1. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. lower-*.f6456.1

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. Applied rewrites56.1%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  5. Taylor expanded in a around inf

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  6. Step-by-step derivation
                                    1. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    2. lower-*.f6440.2

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  7. Applied rewrites40.2%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  8. Taylor expanded in a around -inf

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  9. Step-by-step derivation
                                    1. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    2. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    3. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    4. lower-/.f6427.3

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  10. Applied rewrites27.3%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                  11. Taylor expanded in b around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                                  12. Step-by-step derivation
                                    1. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\sqrt{\mathsf{neg}\left(4 \cdot \left(a \cdot c\right)\right)}}}\\ \end{array} \]
                                    2. lower-neg.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                    3. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-\color{blue}{4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                    4. lower-*.f6420.2

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}\\ \end{array} \]
                                  13. Applied rewrites20.2%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2 \cdot c}{\sqrt{-4 \cdot \left(a \cdot c\right)}}}\\ \end{array} \]
                                  14. Taylor expanded in c around inf

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                                  15. Step-by-step derivation
                                    1. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                                    2. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\color{blue}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                                    3. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{\color{blue}{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                                    4. lower-/.f6415.2

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \color{blue}{\frac{a}{c}}}}\\ \end{array} \]
                                  16. Applied rewrites15.2%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]

                                  if 1.6499999999999999e-130 < b

                                  1. Initial program 72.2%

                                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    17. lower-fabs.f6474.1

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. Applied rewrites74.1%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    17. lower-fabs.f6476.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  5. Applied rewrites76.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  6. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  7. Step-by-step derivation
                                    1. lower-fabs.f6472.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  8. Applied rewrites72.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  9. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  10. Step-by-step derivation
                                    1. lower-fabs.f6468.6

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                  11. Applied rewrites68.6%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  12. Step-by-step derivation
                                    1. lift-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    2. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    3. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    4. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    5. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    6. lower-/.f6468.5

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    7. lift-+.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    8. +-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                                    9. lift-neg.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                                    10. sub-flip-reverseN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                    11. lower--.f6468.5

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                  13. Applied rewrites68.5%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                                13. Recombined 3 regimes into one program.
                                14. Add Preprocessing

                                Alternative 16: 70.9% accurate, 1.2× speedup?

                                \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left|b\right| - b\\ \mathbf{if}\;b \leq -3.2 \cdot 10^{-30}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{t\_0}\\ \end{array}\\ \mathbf{elif}\;b \leq 1.65 \cdot 10^{-130}:\\ \;\;\;\;\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array}\\ \mathbf{elif}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{t\_0}\\ \end{array} \end{array} \]
                                (FPCore (a b c)
                                 :precision binary64
                                 (let* ((t_0 (- (fabs b) b)))
                                   (if (<= b -3.2e-30)
                                     (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) t_0))
                                     (if (<= b 1.65e-130)
                                       (if (>= b 0.0)
                                         (* 0.5 (sqrt (* -4.0 (/ c a))))
                                         (/ -2.0 (sqrt (* -4.0 (/ a c)))))
                                       (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 t_0)))))))
                                double code(double a, double b, double c) {
                                	double t_0 = fabs(b) - b;
                                	double tmp_1;
                                	if (b <= -3.2e-30) {
                                		double tmp_2;
                                		if (b >= 0.0) {
                                			tmp_2 = ((-b + b) * -0.5) / a;
                                		} else {
                                			tmp_2 = (c + c) / t_0;
                                		}
                                		tmp_1 = tmp_2;
                                	} else if (b <= 1.65e-130) {
                                		double tmp_3;
                                		if (b >= 0.0) {
                                			tmp_3 = 0.5 * sqrt((-4.0 * (c / a)));
                                		} else {
                                			tmp_3 = -2.0 / sqrt((-4.0 * (a / c)));
                                		}
                                		tmp_1 = tmp_3;
                                	} else if (b >= 0.0) {
                                		tmp_1 = (-b - fabs(b)) / (2.0 * a);
                                	} else {
                                		tmp_1 = c * (2.0 / t_0);
                                	}
                                	return tmp_1;
                                }
                                
                                module fmin_fmax_functions
                                    implicit none
                                    private
                                    public fmax
                                    public fmin
                                
                                    interface fmax
                                        module procedure fmax88
                                        module procedure fmax44
                                        module procedure fmax84
                                        module procedure fmax48
                                    end interface
                                    interface fmin
                                        module procedure fmin88
                                        module procedure fmin44
                                        module procedure fmin84
                                        module procedure fmin48
                                    end interface
                                contains
                                    real(8) function fmax88(x, y) result (res)
                                        real(8), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                    end function
                                    real(4) function fmax44(x, y) result (res)
                                        real(4), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                    end function
                                    real(8) function fmax84(x, y) result(res)
                                        real(8), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                    end function
                                    real(8) function fmax48(x, y) result(res)
                                        real(4), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                    end function
                                    real(8) function fmin88(x, y) result (res)
                                        real(8), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                    end function
                                    real(4) function fmin44(x, y) result (res)
                                        real(4), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                    end function
                                    real(8) function fmin84(x, y) result(res)
                                        real(8), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                    end function
                                    real(8) function fmin48(x, y) result(res)
                                        real(4), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                    end function
                                end module
                                
                                real(8) function code(a, b, c)
                                use fmin_fmax_functions
                                    real(8), intent (in) :: a
                                    real(8), intent (in) :: b
                                    real(8), intent (in) :: c
                                    real(8) :: t_0
                                    real(8) :: tmp
                                    real(8) :: tmp_1
                                    real(8) :: tmp_2
                                    real(8) :: tmp_3
                                    t_0 = abs(b) - b
                                    if (b <= (-3.2d-30)) then
                                        if (b >= 0.0d0) then
                                            tmp_2 = ((-b + b) * (-0.5d0)) / a
                                        else
                                            tmp_2 = (c + c) / t_0
                                        end if
                                        tmp_1 = tmp_2
                                    else if (b <= 1.65d-130) then
                                        if (b >= 0.0d0) then
                                            tmp_3 = 0.5d0 * sqrt(((-4.0d0) * (c / a)))
                                        else
                                            tmp_3 = (-2.0d0) / sqrt(((-4.0d0) * (a / c)))
                                        end if
                                        tmp_1 = tmp_3
                                    else if (b >= 0.0d0) then
                                        tmp_1 = (-b - abs(b)) / (2.0d0 * a)
                                    else
                                        tmp_1 = c * (2.0d0 / t_0)
                                    end if
                                    code = tmp_1
                                end function
                                
                                public static double code(double a, double b, double c) {
                                	double t_0 = Math.abs(b) - b;
                                	double tmp_1;
                                	if (b <= -3.2e-30) {
                                		double tmp_2;
                                		if (b >= 0.0) {
                                			tmp_2 = ((-b + b) * -0.5) / a;
                                		} else {
                                			tmp_2 = (c + c) / t_0;
                                		}
                                		tmp_1 = tmp_2;
                                	} else if (b <= 1.65e-130) {
                                		double tmp_3;
                                		if (b >= 0.0) {
                                			tmp_3 = 0.5 * Math.sqrt((-4.0 * (c / a)));
                                		} else {
                                			tmp_3 = -2.0 / Math.sqrt((-4.0 * (a / c)));
                                		}
                                		tmp_1 = tmp_3;
                                	} else if (b >= 0.0) {
                                		tmp_1 = (-b - Math.abs(b)) / (2.0 * a);
                                	} else {
                                		tmp_1 = c * (2.0 / t_0);
                                	}
                                	return tmp_1;
                                }
                                
                                def code(a, b, c):
                                	t_0 = math.fabs(b) - b
                                	tmp_1 = 0
                                	if b <= -3.2e-30:
                                		tmp_2 = 0
                                		if b >= 0.0:
                                			tmp_2 = ((-b + b) * -0.5) / a
                                		else:
                                			tmp_2 = (c + c) / t_0
                                		tmp_1 = tmp_2
                                	elif b <= 1.65e-130:
                                		tmp_3 = 0
                                		if b >= 0.0:
                                			tmp_3 = 0.5 * math.sqrt((-4.0 * (c / a)))
                                		else:
                                			tmp_3 = -2.0 / math.sqrt((-4.0 * (a / c)))
                                		tmp_1 = tmp_3
                                	elif b >= 0.0:
                                		tmp_1 = (-b - math.fabs(b)) / (2.0 * a)
                                	else:
                                		tmp_1 = c * (2.0 / t_0)
                                	return tmp_1
                                
                                function code(a, b, c)
                                	t_0 = Float64(abs(b) - b)
                                	tmp_1 = 0.0
                                	if (b <= -3.2e-30)
                                		tmp_2 = 0.0
                                		if (b >= 0.0)
                                			tmp_2 = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                                		else
                                			tmp_2 = Float64(Float64(c + c) / t_0);
                                		end
                                		tmp_1 = tmp_2;
                                	elseif (b <= 1.65e-130)
                                		tmp_3 = 0.0
                                		if (b >= 0.0)
                                			tmp_3 = Float64(0.5 * sqrt(Float64(-4.0 * Float64(c / a))));
                                		else
                                			tmp_3 = Float64(-2.0 / sqrt(Float64(-4.0 * Float64(a / c))));
                                		end
                                		tmp_1 = tmp_3;
                                	elseif (b >= 0.0)
                                		tmp_1 = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                                	else
                                		tmp_1 = Float64(c * Float64(2.0 / t_0));
                                	end
                                	return tmp_1
                                end
                                
                                function tmp_5 = code(a, b, c)
                                	t_0 = abs(b) - b;
                                	tmp_2 = 0.0;
                                	if (b <= -3.2e-30)
                                		tmp_3 = 0.0;
                                		if (b >= 0.0)
                                			tmp_3 = ((-b + b) * -0.5) / a;
                                		else
                                			tmp_3 = (c + c) / t_0;
                                		end
                                		tmp_2 = tmp_3;
                                	elseif (b <= 1.65e-130)
                                		tmp_4 = 0.0;
                                		if (b >= 0.0)
                                			tmp_4 = 0.5 * sqrt((-4.0 * (c / a)));
                                		else
                                			tmp_4 = -2.0 / sqrt((-4.0 * (a / c)));
                                		end
                                		tmp_2 = tmp_4;
                                	elseif (b >= 0.0)
                                		tmp_2 = (-b - abs(b)) / (2.0 * a);
                                	else
                                		tmp_2 = c * (2.0 / t_0);
                                	end
                                	tmp_5 = tmp_2;
                                end
                                
                                code[a_, b_, c_] := Block[{t$95$0 = N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]}, If[LessEqual[b, -3.2e-30], If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / t$95$0), $MachinePrecision]], If[LessEqual[b, 1.65e-130], If[GreaterEqual[b, 0.0], N[(0.5 * N[Sqrt[N[(-4.0 * N[(c / a), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], N[(-2.0 / N[Sqrt[N[(-4.0 * N[(a / c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]], If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / t$95$0), $MachinePrecision]), $MachinePrecision]]]]]
                                
                                \begin{array}{l}
                                
                                \\
                                \begin{array}{l}
                                t_0 := \left|b\right| - b\\
                                \mathbf{if}\;b \leq -3.2 \cdot 10^{-30}:\\
                                \;\;\;\;\begin{array}{l}
                                \mathbf{if}\;b \geq 0:\\
                                \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                                
                                \mathbf{else}:\\
                                \;\;\;\;\frac{c + c}{t\_0}\\
                                
                                
                                \end{array}\\
                                
                                \mathbf{elif}\;b \leq 1.65 \cdot 10^{-130}:\\
                                \;\;\;\;\begin{array}{l}
                                \mathbf{if}\;b \geq 0:\\
                                \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\
                                
                                \mathbf{else}:\\
                                \;\;\;\;\frac{-2}{\sqrt{-4 \cdot \frac{a}{c}}}\\
                                
                                
                                \end{array}\\
                                
                                \mathbf{elif}\;b \geq 0:\\
                                \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                                
                                \mathbf{else}:\\
                                \;\;\;\;c \cdot \frac{2}{t\_0}\\
                                
                                
                                \end{array}
                                \end{array}
                                
                                Derivation
                                1. Split input into 3 regimes
                                2. if b < -3.2e-30

                                  1. Initial program 72.2%

                                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    17. lower-fabs.f6474.1

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. Applied rewrites74.1%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    17. lower-fabs.f6476.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  5. Applied rewrites76.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  6. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  7. Step-by-step derivation
                                    1. lower-fabs.f6472.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  8. Applied rewrites72.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  9. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  10. Step-by-step derivation
                                    1. lower-fabs.f6468.6

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                  11. Applied rewrites68.6%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  12. Step-by-step derivation
                                    1. Applied rewrites68.5%

                                      \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                                    2. Step-by-step derivation
                                      1. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                      2. lift-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                      3. associate-*r/N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                      4. lower-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                    3. Applied rewrites35.9%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]

                                    if -3.2e-30 < b < 1.6499999999999999e-130

                                    1. Initial program 72.2%

                                      \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. Taylor expanded in a around inf

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. Step-by-step derivation
                                      1. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \color{blue}{\left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      2. lower-*.f6456.1

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot \color{blue}{c}\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. Applied rewrites56.1%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{-4 \cdot \left(a \cdot c\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    5. Taylor expanded in a around inf

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    6. Step-by-step derivation
                                      1. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                      2. lower-*.f6440.2

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    7. Applied rewrites40.2%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{-4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    8. Taylor expanded in a around -inf

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    9. Step-by-step derivation
                                      1. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \color{blue}{\sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                      2. lower-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                      3. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                      4. lower-/.f6427.3

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    10. Applied rewrites27.3%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{-4 \cdot \left(a \cdot c\right)}}\\ \end{array} \]
                                    11. Taylor expanded in c around -inf

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]
                                    12. Step-by-step derivation
                                      1. lower-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{\frac{-2}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                                      2. lower-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-2}{\color{blue}{\sqrt{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                                      3. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{1}{2} \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-2}{\sqrt{\color{blue}{-4 \cdot \frac{a}{c}}}}\\ \end{array} \]
                                      4. lower-/.f6415.5

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-2}{\sqrt{-4 \cdot \color{blue}{\frac{a}{c}}}}\\ \end{array} \]
                                    13. Applied rewrites15.5%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;0.5 \cdot \sqrt{-4 \cdot \frac{c}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-2}{\sqrt{-4 \cdot \frac{a}{c}}}\\ \end{array} \]

                                    if 1.6499999999999999e-130 < b

                                    1. Initial program 72.2%

                                      \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. Step-by-step derivation
                                      1. lift-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      2. lift--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      3. sub-to-multN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      4. sqrt-prodN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      5. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      6. rem-sqrt-square-revN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      7. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      8. lower-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      9. lower--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      10. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      11. associate-/l*N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      12. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      13. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      14. *-commutativeN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      15. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      16. lower-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      17. lower-fabs.f6474.1

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. Applied rewrites74.1%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. Step-by-step derivation
                                      1. lift-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                      2. lift--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      3. sub-to-multN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                      4. sqrt-prodN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                      5. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                      6. rem-sqrt-square-revN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                      7. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                      8. lower-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      9. lower--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      10. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      11. associate-/l*N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      12. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      13. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      14. *-commutativeN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      15. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      16. lower-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      17. lower-fabs.f6476.8

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    5. Applied rewrites76.8%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    6. Taylor expanded in a around 0

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    7. Step-by-step derivation
                                      1. lower-fabs.f6472.8

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    8. Applied rewrites72.8%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    9. Taylor expanded in a around 0

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    10. Step-by-step derivation
                                      1. lower-fabs.f6468.6

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                    11. Applied rewrites68.6%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    12. Step-by-step derivation
                                      1. lift-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                      2. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                      3. *-commutativeN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                      4. associate-/l*N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                      5. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                      6. lower-/.f6468.5

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                      7. lift-+.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                      8. +-commutativeN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                                      9. lift-neg.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                                      10. sub-flip-reverseN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                      11. lower--.f6468.5

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                    13. Applied rewrites68.5%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                                  13. Recombined 3 regimes into one program.
                                  14. Add Preprocessing

                                  Alternative 17: 68.6% accurate, 1.8× speedup?

                                  \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \end{array} \]
                                  (FPCore (a b c)
                                   :precision binary64
                                   (if (>= b 0.0)
                                     (/ (- (- b) (fabs b)) (* 2.0 a))
                                     (/ (* 2.0 c) (+ (- b) (fabs b)))))
                                  double code(double a, double b, double c) {
                                  	double tmp;
                                  	if (b >= 0.0) {
                                  		tmp = (-b - fabs(b)) / (2.0 * a);
                                  	} else {
                                  		tmp = (2.0 * c) / (-b + fabs(b));
                                  	}
                                  	return tmp;
                                  }
                                  
                                  module fmin_fmax_functions
                                      implicit none
                                      private
                                      public fmax
                                      public fmin
                                  
                                      interface fmax
                                          module procedure fmax88
                                          module procedure fmax44
                                          module procedure fmax84
                                          module procedure fmax48
                                      end interface
                                      interface fmin
                                          module procedure fmin88
                                          module procedure fmin44
                                          module procedure fmin84
                                          module procedure fmin48
                                      end interface
                                  contains
                                      real(8) function fmax88(x, y) result (res)
                                          real(8), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                      end function
                                      real(4) function fmax44(x, y) result (res)
                                          real(4), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                      end function
                                      real(8) function fmax84(x, y) result(res)
                                          real(8), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                      end function
                                      real(8) function fmax48(x, y) result(res)
                                          real(4), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                      end function
                                      real(8) function fmin88(x, y) result (res)
                                          real(8), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                      end function
                                      real(4) function fmin44(x, y) result (res)
                                          real(4), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                      end function
                                      real(8) function fmin84(x, y) result(res)
                                          real(8), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                      end function
                                      real(8) function fmin48(x, y) result(res)
                                          real(4), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                      end function
                                  end module
                                  
                                  real(8) function code(a, b, c)
                                  use fmin_fmax_functions
                                      real(8), intent (in) :: a
                                      real(8), intent (in) :: b
                                      real(8), intent (in) :: c
                                      real(8) :: tmp
                                      if (b >= 0.0d0) then
                                          tmp = (-b - abs(b)) / (2.0d0 * a)
                                      else
                                          tmp = (2.0d0 * c) / (-b + abs(b))
                                      end if
                                      code = tmp
                                  end function
                                  
                                  public static double code(double a, double b, double c) {
                                  	double tmp;
                                  	if (b >= 0.0) {
                                  		tmp = (-b - Math.abs(b)) / (2.0 * a);
                                  	} else {
                                  		tmp = (2.0 * c) / (-b + Math.abs(b));
                                  	}
                                  	return tmp;
                                  }
                                  
                                  def code(a, b, c):
                                  	tmp = 0
                                  	if b >= 0.0:
                                  		tmp = (-b - math.fabs(b)) / (2.0 * a)
                                  	else:
                                  		tmp = (2.0 * c) / (-b + math.fabs(b))
                                  	return tmp
                                  
                                  function code(a, b, c)
                                  	tmp = 0.0
                                  	if (b >= 0.0)
                                  		tmp = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                                  	else
                                  		tmp = Float64(Float64(2.0 * c) / Float64(Float64(-b) + abs(b)));
                                  	end
                                  	return tmp
                                  end
                                  
                                  function tmp_2 = code(a, b, c)
                                  	tmp = 0.0;
                                  	if (b >= 0.0)
                                  		tmp = (-b - abs(b)) / (2.0 * a);
                                  	else
                                  		tmp = (2.0 * c) / (-b + abs(b));
                                  	end
                                  	tmp_2 = tmp;
                                  end
                                  
                                  code[a_, b_, c_] := If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + N[Abs[b], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
                                  
                                  \begin{array}{l}
                                  
                                  \\
                                  \begin{array}{l}
                                  \mathbf{if}\;b \geq 0:\\
                                  \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                                  
                                  \mathbf{else}:\\
                                  \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\
                                  
                                  
                                  \end{array}
                                  \end{array}
                                  
                                  Derivation
                                  1. Initial program 72.2%

                                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    17. lower-fabs.f6474.1

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. Applied rewrites74.1%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    17. lower-fabs.f6476.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  5. Applied rewrites76.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  6. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  7. Step-by-step derivation
                                    1. lower-fabs.f6472.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  8. Applied rewrites72.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  9. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  10. Step-by-step derivation
                                    1. lower-fabs.f6468.6

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                  11. Applied rewrites68.6%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  12. Add Preprocessing

                                  Alternative 18: 68.5% accurate, 1.8× speedup?

                                  \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \end{array} \]
                                  (FPCore (a b c)
                                   :precision binary64
                                   (if (>= b 0.0) (/ (- (- b) (fabs b)) (* 2.0 a)) (* c (/ 2.0 (- (fabs b) b)))))
                                  double code(double a, double b, double c) {
                                  	double tmp;
                                  	if (b >= 0.0) {
                                  		tmp = (-b - fabs(b)) / (2.0 * a);
                                  	} else {
                                  		tmp = c * (2.0 / (fabs(b) - b));
                                  	}
                                  	return tmp;
                                  }
                                  
                                  module fmin_fmax_functions
                                      implicit none
                                      private
                                      public fmax
                                      public fmin
                                  
                                      interface fmax
                                          module procedure fmax88
                                          module procedure fmax44
                                          module procedure fmax84
                                          module procedure fmax48
                                      end interface
                                      interface fmin
                                          module procedure fmin88
                                          module procedure fmin44
                                          module procedure fmin84
                                          module procedure fmin48
                                      end interface
                                  contains
                                      real(8) function fmax88(x, y) result (res)
                                          real(8), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                      end function
                                      real(4) function fmax44(x, y) result (res)
                                          real(4), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                      end function
                                      real(8) function fmax84(x, y) result(res)
                                          real(8), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                      end function
                                      real(8) function fmax48(x, y) result(res)
                                          real(4), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                      end function
                                      real(8) function fmin88(x, y) result (res)
                                          real(8), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                      end function
                                      real(4) function fmin44(x, y) result (res)
                                          real(4), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                      end function
                                      real(8) function fmin84(x, y) result(res)
                                          real(8), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                      end function
                                      real(8) function fmin48(x, y) result(res)
                                          real(4), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                      end function
                                  end module
                                  
                                  real(8) function code(a, b, c)
                                  use fmin_fmax_functions
                                      real(8), intent (in) :: a
                                      real(8), intent (in) :: b
                                      real(8), intent (in) :: c
                                      real(8) :: tmp
                                      if (b >= 0.0d0) then
                                          tmp = (-b - abs(b)) / (2.0d0 * a)
                                      else
                                          tmp = c * (2.0d0 / (abs(b) - b))
                                      end if
                                      code = tmp
                                  end function
                                  
                                  public static double code(double a, double b, double c) {
                                  	double tmp;
                                  	if (b >= 0.0) {
                                  		tmp = (-b - Math.abs(b)) / (2.0 * a);
                                  	} else {
                                  		tmp = c * (2.0 / (Math.abs(b) - b));
                                  	}
                                  	return tmp;
                                  }
                                  
                                  def code(a, b, c):
                                  	tmp = 0
                                  	if b >= 0.0:
                                  		tmp = (-b - math.fabs(b)) / (2.0 * a)
                                  	else:
                                  		tmp = c * (2.0 / (math.fabs(b) - b))
                                  	return tmp
                                  
                                  function code(a, b, c)
                                  	tmp = 0.0
                                  	if (b >= 0.0)
                                  		tmp = Float64(Float64(Float64(-b) - abs(b)) / Float64(2.0 * a));
                                  	else
                                  		tmp = Float64(c * Float64(2.0 / Float64(abs(b) - b)));
                                  	end
                                  	return tmp
                                  end
                                  
                                  function tmp_2 = code(a, b, c)
                                  	tmp = 0.0;
                                  	if (b >= 0.0)
                                  		tmp = (-b - abs(b)) / (2.0 * a);
                                  	else
                                  		tmp = c * (2.0 / (abs(b) - b));
                                  	end
                                  	tmp_2 = tmp;
                                  end
                                  
                                  code[a_, b_, c_] := If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Abs[b], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(c * N[(2.0 / N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
                                  
                                  \begin{array}{l}
                                  
                                  \\
                                  \begin{array}{l}
                                  \mathbf{if}\;b \geq 0:\\
                                  \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\
                                  
                                  \mathbf{else}:\\
                                  \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\
                                  
                                  
                                  \end{array}
                                  \end{array}
                                  
                                  Derivation
                                  1. Initial program 72.2%

                                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    17. lower-fabs.f6474.1

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. Applied rewrites74.1%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    17. lower-fabs.f6476.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  5. Applied rewrites76.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  6. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  7. Step-by-step derivation
                                    1. lower-fabs.f6472.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  8. Applied rewrites72.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  9. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  10. Step-by-step derivation
                                    1. lower-fabs.f6468.6

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                  11. Applied rewrites68.6%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  12. Step-by-step derivation
                                    1. lift-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    2. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    3. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c \cdot 2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    4. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    5. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left(-b\right) + \left|b\right|}\\ \end{array} \]
                                    6. lower-/.f6468.5

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\color{blue}{c \cdot \frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    7. lift-+.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    8. +-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| + \left(-b\right)}}\\ \end{array} \]
                                    9. lift-neg.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\color{blue}{\left|b\right| + \left(\mathsf{neg}\left(b\right)\right)}}\\ \end{array} \]
                                    10. sub-flip-reverseN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                    11. lower--.f6468.5

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \color{blue}{\frac{2}{\left|b\right| - b}}\\ \end{array} \]
                                  13. Applied rewrites68.5%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;c \cdot \frac{2}{\left|b\right| - b}\\ \end{array} \]
                                  14. Add Preprocessing

                                  Alternative 19: 68.5% accurate, 1.9× speedup?

                                  \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \end{array} \]
                                  (FPCore (a b c)
                                   :precision binary64
                                   (if (>= b 0.0) (* (+ (fabs b) b) (/ -0.5 a)) (/ (+ c c) (- (fabs b) b))))
                                  double code(double a, double b, double c) {
                                  	double tmp;
                                  	if (b >= 0.0) {
                                  		tmp = (fabs(b) + b) * (-0.5 / a);
                                  	} else {
                                  		tmp = (c + c) / (fabs(b) - b);
                                  	}
                                  	return tmp;
                                  }
                                  
                                  module fmin_fmax_functions
                                      implicit none
                                      private
                                      public fmax
                                      public fmin
                                  
                                      interface fmax
                                          module procedure fmax88
                                          module procedure fmax44
                                          module procedure fmax84
                                          module procedure fmax48
                                      end interface
                                      interface fmin
                                          module procedure fmin88
                                          module procedure fmin44
                                          module procedure fmin84
                                          module procedure fmin48
                                      end interface
                                  contains
                                      real(8) function fmax88(x, y) result (res)
                                          real(8), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                      end function
                                      real(4) function fmax44(x, y) result (res)
                                          real(4), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                      end function
                                      real(8) function fmax84(x, y) result(res)
                                          real(8), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                      end function
                                      real(8) function fmax48(x, y) result(res)
                                          real(4), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                      end function
                                      real(8) function fmin88(x, y) result (res)
                                          real(8), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                      end function
                                      real(4) function fmin44(x, y) result (res)
                                          real(4), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                      end function
                                      real(8) function fmin84(x, y) result(res)
                                          real(8), intent (in) :: x
                                          real(4), intent (in) :: y
                                          res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                      end function
                                      real(8) function fmin48(x, y) result(res)
                                          real(4), intent (in) :: x
                                          real(8), intent (in) :: y
                                          res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                      end function
                                  end module
                                  
                                  real(8) function code(a, b, c)
                                  use fmin_fmax_functions
                                      real(8), intent (in) :: a
                                      real(8), intent (in) :: b
                                      real(8), intent (in) :: c
                                      real(8) :: tmp
                                      if (b >= 0.0d0) then
                                          tmp = (abs(b) + b) * ((-0.5d0) / a)
                                      else
                                          tmp = (c + c) / (abs(b) - b)
                                      end if
                                      code = tmp
                                  end function
                                  
                                  public static double code(double a, double b, double c) {
                                  	double tmp;
                                  	if (b >= 0.0) {
                                  		tmp = (Math.abs(b) + b) * (-0.5 / a);
                                  	} else {
                                  		tmp = (c + c) / (Math.abs(b) - b);
                                  	}
                                  	return tmp;
                                  }
                                  
                                  def code(a, b, c):
                                  	tmp = 0
                                  	if b >= 0.0:
                                  		tmp = (math.fabs(b) + b) * (-0.5 / a)
                                  	else:
                                  		tmp = (c + c) / (math.fabs(b) - b)
                                  	return tmp
                                  
                                  function code(a, b, c)
                                  	tmp = 0.0
                                  	if (b >= 0.0)
                                  		tmp = Float64(Float64(abs(b) + b) * Float64(-0.5 / a));
                                  	else
                                  		tmp = Float64(Float64(c + c) / Float64(abs(b) - b));
                                  	end
                                  	return tmp
                                  end
                                  
                                  function tmp_2 = code(a, b, c)
                                  	tmp = 0.0;
                                  	if (b >= 0.0)
                                  		tmp = (abs(b) + b) * (-0.5 / a);
                                  	else
                                  		tmp = (c + c) / (abs(b) - b);
                                  	end
                                  	tmp_2 = tmp;
                                  end
                                  
                                  code[a_, b_, c_] := If[GreaterEqual[b, 0.0], N[(N[(N[Abs[b], $MachinePrecision] + b), $MachinePrecision] * N[(-0.5 / a), $MachinePrecision]), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]]
                                  
                                  \begin{array}{l}
                                  
                                  \\
                                  \begin{array}{l}
                                  \mathbf{if}\;b \geq 0:\\
                                  \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\
                                  
                                  \mathbf{else}:\\
                                  \;\;\;\;\frac{c + c}{\left|b\right| - b}\\
                                  
                                  
                                  \end{array}
                                  \end{array}
                                  
                                  Derivation
                                  1. Initial program 72.2%

                                    \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  2. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    17. lower-fabs.f6474.1

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  3. Applied rewrites74.1%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                  4. Step-by-step derivation
                                    1. lift-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                    2. lift--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. sub-to-multN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                    4. sqrt-prodN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                    5. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                    6. rem-sqrt-square-revN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    7. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    8. lower-sqrt.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    9. lower--.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    10. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    11. associate-/l*N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    12. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    13. lift-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    14. *-commutativeN/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    15. lower-*.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    16. lower-/.f64N/A

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    17. lower-fabs.f6476.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  5. Applied rewrites76.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                  6. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  7. Step-by-step derivation
                                    1. lower-fabs.f6472.8

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  8. Applied rewrites72.8%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                  9. Taylor expanded in a around 0

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  10. Step-by-step derivation
                                    1. lower-fabs.f6468.6

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                  11. Applied rewrites68.6%

                                    \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                  12. Step-by-step derivation
                                    1. Applied rewrites68.5%

                                      \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                                    2. Add Preprocessing

                                    Alternative 20: 35.9% accurate, 1.9× speedup?

                                    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \end{array} \]
                                    (FPCore (a b c)
                                     :precision binary64
                                     (if (>= b 0.0) (/ (* (+ (- b) b) -0.5) a) (/ (+ c c) (- (fabs b) b))))
                                    double code(double a, double b, double c) {
                                    	double tmp;
                                    	if (b >= 0.0) {
                                    		tmp = ((-b + b) * -0.5) / a;
                                    	} else {
                                    		tmp = (c + c) / (fabs(b) - b);
                                    	}
                                    	return tmp;
                                    }
                                    
                                    module fmin_fmax_functions
                                        implicit none
                                        private
                                        public fmax
                                        public fmin
                                    
                                        interface fmax
                                            module procedure fmax88
                                            module procedure fmax44
                                            module procedure fmax84
                                            module procedure fmax48
                                        end interface
                                        interface fmin
                                            module procedure fmin88
                                            module procedure fmin44
                                            module procedure fmin84
                                            module procedure fmin48
                                        end interface
                                    contains
                                        real(8) function fmax88(x, y) result (res)
                                            real(8), intent (in) :: x
                                            real(8), intent (in) :: y
                                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                        end function
                                        real(4) function fmax44(x, y) result (res)
                                            real(4), intent (in) :: x
                                            real(4), intent (in) :: y
                                            res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                        end function
                                        real(8) function fmax84(x, y) result(res)
                                            real(8), intent (in) :: x
                                            real(4), intent (in) :: y
                                            res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                        end function
                                        real(8) function fmax48(x, y) result(res)
                                            real(4), intent (in) :: x
                                            real(8), intent (in) :: y
                                            res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                        end function
                                        real(8) function fmin88(x, y) result (res)
                                            real(8), intent (in) :: x
                                            real(8), intent (in) :: y
                                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                        end function
                                        real(4) function fmin44(x, y) result (res)
                                            real(4), intent (in) :: x
                                            real(4), intent (in) :: y
                                            res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                        end function
                                        real(8) function fmin84(x, y) result(res)
                                            real(8), intent (in) :: x
                                            real(4), intent (in) :: y
                                            res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                        end function
                                        real(8) function fmin48(x, y) result(res)
                                            real(4), intent (in) :: x
                                            real(8), intent (in) :: y
                                            res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                        end function
                                    end module
                                    
                                    real(8) function code(a, b, c)
                                    use fmin_fmax_functions
                                        real(8), intent (in) :: a
                                        real(8), intent (in) :: b
                                        real(8), intent (in) :: c
                                        real(8) :: tmp
                                        if (b >= 0.0d0) then
                                            tmp = ((-b + b) * (-0.5d0)) / a
                                        else
                                            tmp = (c + c) / (abs(b) - b)
                                        end if
                                        code = tmp
                                    end function
                                    
                                    public static double code(double a, double b, double c) {
                                    	double tmp;
                                    	if (b >= 0.0) {
                                    		tmp = ((-b + b) * -0.5) / a;
                                    	} else {
                                    		tmp = (c + c) / (Math.abs(b) - b);
                                    	}
                                    	return tmp;
                                    }
                                    
                                    def code(a, b, c):
                                    	tmp = 0
                                    	if b >= 0.0:
                                    		tmp = ((-b + b) * -0.5) / a
                                    	else:
                                    		tmp = (c + c) / (math.fabs(b) - b)
                                    	return tmp
                                    
                                    function code(a, b, c)
                                    	tmp = 0.0
                                    	if (b >= 0.0)
                                    		tmp = Float64(Float64(Float64(Float64(-b) + b) * -0.5) / a);
                                    	else
                                    		tmp = Float64(Float64(c + c) / Float64(abs(b) - b));
                                    	end
                                    	return tmp
                                    end
                                    
                                    function tmp_2 = code(a, b, c)
                                    	tmp = 0.0;
                                    	if (b >= 0.0)
                                    		tmp = ((-b + b) * -0.5) / a;
                                    	else
                                    		tmp = (c + c) / (abs(b) - b);
                                    	end
                                    	tmp_2 = tmp;
                                    end
                                    
                                    code[a_, b_, c_] := If[GreaterEqual[b, 0.0], N[(N[(N[((-b) + b), $MachinePrecision] * -0.5), $MachinePrecision] / a), $MachinePrecision], N[(N[(c + c), $MachinePrecision] / N[(N[Abs[b], $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]]
                                    
                                    \begin{array}{l}
                                    
                                    \\
                                    \begin{array}{l}
                                    \mathbf{if}\;b \geq 0:\\
                                    \;\;\;\;\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}\\
                                    
                                    \mathbf{else}:\\
                                    \;\;\;\;\frac{c + c}{\left|b\right| - b}\\
                                    
                                    
                                    \end{array}
                                    \end{array}
                                    
                                    Derivation
                                    1. Initial program 72.2%

                                      \[\begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    2. Step-by-step derivation
                                      1. lift-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      2. lift--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{b \cdot b - \left(4 \cdot a\right) \cdot c}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      3. sub-to-multN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      4. sqrt-prodN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      5. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{\color{blue}{b \cdot b}}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      6. rem-sqrt-square-revN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      7. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      8. lower-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      9. lower--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{\color{blue}{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      10. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \frac{\color{blue}{\left(4 \cdot a\right) \cdot c}}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      11. associate-/l*N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      12. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      13. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(4 \cdot a\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      14. *-commutativeN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      15. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \color{blue}{\left(a \cdot 4\right)} \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      16. lower-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \color{blue}{\frac{c}{b \cdot b}}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      17. lower-fabs.f6474.1

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    3. Applied rewrites74.1%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                    4. Step-by-step derivation
                                      1. lift-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}}\\ \end{array} \]
                                      2. lift--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{b \cdot b - \left(4 \cdot a\right) \cdot c}}\\ \end{array} \]
                                      3. sub-to-multN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{\left(1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}\right) \cdot \left(b \cdot b\right)}}\\ \end{array} \]
                                      4. sqrt-prodN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \sqrt{b \cdot b}}}\\ \end{array} \]
                                      5. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}}} \cdot \sqrt{b \cdot b}}\\ \end{array} \]
                                      6. rem-sqrt-square-revN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                      7. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                      8. lower-sqrt.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right)} + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      9. lower--.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-\color{blue}{b}\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      10. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \frac{\left(4 \cdot a\right) \cdot c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      11. associate-/l*N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      12. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      13. lift-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(4 \cdot a\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      14. *-commutativeN/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      15. lower-*.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      16. lower-/.f64N/A

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                      17. lower-fabs.f6476.8

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    5. Applied rewrites76.8%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}}\\ \end{array} \]
                                    6. Taylor expanded in a around 0

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    7. Step-by-step derivation
                                      1. lower-fabs.f6472.8

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    8. Applied rewrites72.8%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \color{blue}{\left|b\right|}}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \sqrt{1 - \left(a \cdot 4\right) \cdot \frac{c}{b \cdot b}} \cdot \left|b\right|}\\ \end{array} \]
                                    9. Taylor expanded in a around 0

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    10. Step-by-step derivation
                                      1. lower-fabs.f6468.6

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\left(-b\right) + \color{blue}{\left|b\right|}}\\ \end{array} \]
                                    11. Applied rewrites68.6%

                                      \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\frac{\left(-b\right) - \left|b\right|}{2 \cdot a}\\ \mathbf{else}:\\ \;\;\;\;\frac{2 \cdot c}{\color{blue}{\left(-b\right) + \left|b\right|}}\\ \end{array} \]
                                    12. Step-by-step derivation
                                      1. Applied rewrites68.5%

                                        \[\leadsto \color{blue}{\begin{array}{l} \color{blue}{\mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \frac{-0.5}{a}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ } \end{array}} \]
                                      2. Step-by-step derivation
                                        1. lift-*.f64N/A

                                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\left(\left|b\right| + b\right) \cdot \frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                        2. lift-/.f64N/A

                                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\left(\left|b\right| + b\right) \cdot \color{blue}{\frac{\frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                        3. associate-*r/N/A

                                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                        4. lower-/.f64N/A

                                          \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left|b\right| + b\right) \cdot \frac{-1}{2}}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                      3. Applied rewrites35.9%

                                        \[\leadsto \begin{array}{l} \mathbf{if}\;b \geq 0:\\ \;\;\;\;\color{blue}{\frac{\left(\left(-b\right) + b\right) \cdot -0.5}{a}}\\ \mathbf{else}:\\ \;\;\;\;\frac{c + c}{\left|b\right| - b}\\ \end{array} \]
                                      4. Add Preprocessing

                                      Reproduce

                                      ?
                                      herbie shell --seed 2025149 
                                      (FPCore (a b c)
                                        :name "jeff quadratic root 1"
                                        :precision binary64
                                        (if (>= b 0.0) (/ (- (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))) (* 2.0 a)) (/ (* 2.0 c) (+ (- b) (sqrt (- (* b b) (* (* 4.0 a) c)))))))