Numeric.SpecFunctions:logBeta from math-functions-0.1.5.2, B

Percentage Accurate: 99.7% → 99.8%
Time: 10.6s
Alternatives: 23
Speedup: 1.0×

Specification

?
\[\begin{array}{l} \\ \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \end{array} \]
(FPCore (x y z t a b c i)
 :precision binary64
 (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i)))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
	return (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
}
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(x, y, z, t, a, b, c, i)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8), intent (in) :: i
    code = (((((x * log(y)) + z) + t) + a) + ((b - 0.5d0) * log(c))) + (y * i)
end function
public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
	return (((((x * Math.log(y)) + z) + t) + a) + ((b - 0.5) * Math.log(c))) + (y * i);
}
def code(x, y, z, t, a, b, c, i):
	return (((((x * math.log(y)) + z) + t) + a) + ((b - 0.5) * math.log(c))) + (y * i)
function code(x, y, z, t, a, b, c, i)
	return Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i))
end
function tmp = code(x, y, z, t, a, b, c, i)
	tmp = (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
end
code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i
\end{array}

Sampling outcomes in binary64 precision:

Local Percentage Accuracy vs ?

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

Accuracy vs Speed?

Herbie found 23 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: 99.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \end{array} \]
(FPCore (x y z t a b c i)
 :precision binary64
 (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i)))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
	return (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
}
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(x, y, z, t, a, b, c, i)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8), intent (in) :: i
    code = (((((x * log(y)) + z) + t) + a) + ((b - 0.5d0) * log(c))) + (y * i)
end function
public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
	return (((((x * Math.log(y)) + z) + t) + a) + ((b - 0.5) * Math.log(c))) + (y * i);
}
def code(x, y, z, t, a, b, c, i):
	return (((((x * math.log(y)) + z) + t) + a) + ((b - 0.5) * math.log(c))) + (y * i)
function code(x, y, z, t, a, b, c, i)
	return Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i))
end
function tmp = code(x, y, z, t, a, b, c, i)
	tmp = (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
end
code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i
\end{array}

Alternative 1: 99.8% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right) \end{array} \]
(FPCore (x y z t a b c i)
 :precision binary64
 (fma y i (fma (log c) (- b 0.5) (+ (+ a t) (fma (log y) x z)))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
	return fma(y, i, fma(log(c), (b - 0.5), ((a + t) + fma(log(y), x, z))));
}
function code(x, y, z, t, a, b, c, i)
	return fma(y, i, fma(log(c), Float64(b - 0.5), Float64(Float64(a + t) + fma(log(y), x, z))))
end
code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(y * i + N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + N[(N[(a + t), $MachinePrecision] + N[(N[Log[y], $MachinePrecision] * x + z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)
\end{array}
Derivation
  1. Initial program 99.9%

    \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-+.f64N/A

      \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
    2. lift-+.f64N/A

      \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
    3. lift-+.f64N/A

      \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
    4. lift-+.f64N/A

      \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
    5. lift-+.f64N/A

      \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
    6. lift-*.f64N/A

      \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
    7. lift-log.f64N/A

      \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
    8. lift--.f64N/A

      \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
    9. lift-*.f64N/A

      \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
    10. lift-log.f64N/A

      \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
    11. +-commutativeN/A

      \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
    12. lift-*.f64N/A

      \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
    13. lower-fma.f64N/A

      \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
  4. Applied rewrites99.9%

    \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
  5. Add Preprocessing

Alternative 2: 27.8% accurate, 0.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\ \mathbf{if}\;t\_1 \leq -\infty:\\ \;\;\;\;i \cdot y\\ \mathbf{elif}\;t\_1 \leq -50:\\ \;\;\;\;z\\ \mathbf{elif}\;t\_1 \leq 5 \cdot 10^{+307}:\\ \;\;\;\;a\\ \mathbf{else}:\\ \;\;\;\;i \cdot y\\ \end{array} \end{array} \]
(FPCore (x y z t a b c i)
 :precision binary64
 (let* ((t_1
         (+
          (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c)))
          (* y i))))
   (if (<= t_1 (- INFINITY))
     (* i y)
     (if (<= t_1 -50.0) z (if (<= t_1 5e+307) a (* i y))))))
double code(double x, double y, double z, double t, double a, double b, double c, double i) {
	double t_1 = (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
	double tmp;
	if (t_1 <= -((double) INFINITY)) {
		tmp = i * y;
	} else if (t_1 <= -50.0) {
		tmp = z;
	} else if (t_1 <= 5e+307) {
		tmp = a;
	} else {
		tmp = i * y;
	}
	return tmp;
}
public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
	double t_1 = (((((x * Math.log(y)) + z) + t) + a) + ((b - 0.5) * Math.log(c))) + (y * i);
	double tmp;
	if (t_1 <= -Double.POSITIVE_INFINITY) {
		tmp = i * y;
	} else if (t_1 <= -50.0) {
		tmp = z;
	} else if (t_1 <= 5e+307) {
		tmp = a;
	} else {
		tmp = i * y;
	}
	return tmp;
}
def code(x, y, z, t, a, b, c, i):
	t_1 = (((((x * math.log(y)) + z) + t) + a) + ((b - 0.5) * math.log(c))) + (y * i)
	tmp = 0
	if t_1 <= -math.inf:
		tmp = i * y
	elif t_1 <= -50.0:
		tmp = z
	elif t_1 <= 5e+307:
		tmp = a
	else:
		tmp = i * y
	return tmp
function code(x, y, z, t, a, b, c, i)
	t_1 = Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i))
	tmp = 0.0
	if (t_1 <= Float64(-Inf))
		tmp = Float64(i * y);
	elseif (t_1 <= -50.0)
		tmp = z;
	elseif (t_1 <= 5e+307)
		tmp = a;
	else
		tmp = Float64(i * y);
	end
	return tmp
end
function tmp_2 = code(x, y, z, t, a, b, c, i)
	t_1 = (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
	tmp = 0.0;
	if (t_1 <= -Inf)
		tmp = i * y;
	elseif (t_1 <= -50.0)
		tmp = z;
	elseif (t_1 <= 5e+307)
		tmp = a;
	else
		tmp = i * y;
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, (-Infinity)], N[(i * y), $MachinePrecision], If[LessEqual[t$95$1, -50.0], z, If[LessEqual[t$95$1, 5e+307], a, N[(i * y), $MachinePrecision]]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_1 := \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\
\mathbf{if}\;t\_1 \leq -\infty:\\
\;\;\;\;i \cdot y\\

\mathbf{elif}\;t\_1 \leq -50:\\
\;\;\;\;z\\

\mathbf{elif}\;t\_1 \leq 5 \cdot 10^{+307}:\\
\;\;\;\;a\\

\mathbf{else}:\\
\;\;\;\;i \cdot y\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -inf.0 or 5e307 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

    1. Initial program 100.0%

      \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
    2. Add Preprocessing
    3. Taylor expanded in y around inf

      \[\leadsto \color{blue}{i \cdot y} \]
    4. Step-by-step derivation
      1. lower-*.f64100.0

        \[\leadsto i \cdot \color{blue}{y} \]
    5. Applied rewrites100.0%

      \[\leadsto \color{blue}{i \cdot y} \]

    if -inf.0 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -50

    1. Initial program 99.8%

      \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
    2. Add Preprocessing
    3. Taylor expanded in z around inf

      \[\leadsto \color{blue}{z} \]
    4. Step-by-step derivation
      1. Applied rewrites18.6%

        \[\leadsto \color{blue}{z} \]

      if -50 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < 5e307

      1. Initial program 99.9%

        \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
      2. Add Preprocessing
      3. Taylor expanded in a around inf

        \[\leadsto \color{blue}{a} \]
      4. Step-by-step derivation
        1. Applied rewrites19.0%

          \[\leadsto \color{blue}{a} \]
      5. Recombined 3 regimes into one program.
      6. Add Preprocessing

      Alternative 3: 53.3% accurate, 0.4× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\ \mathbf{if}\;t\_1 \leq -1 \cdot 10^{+32}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, z\right)\right)\\ \mathbf{elif}\;t\_1 \leq 100:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, -0.5, z\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, a\right)\right)\\ \end{array} \end{array} \]
      (FPCore (x y z t a b c i)
       :precision binary64
       (let* ((t_1
               (+
                (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c)))
                (* y i))))
         (if (<= t_1 -1e+32)
           (fma y i (fma (log c) b z))
           (if (<= t_1 100.0)
             (fma y i (fma (log c) -0.5 z))
             (fma y i (fma (log c) b a))))))
      double code(double x, double y, double z, double t, double a, double b, double c, double i) {
      	double t_1 = (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
      	double tmp;
      	if (t_1 <= -1e+32) {
      		tmp = fma(y, i, fma(log(c), b, z));
      	} else if (t_1 <= 100.0) {
      		tmp = fma(y, i, fma(log(c), -0.5, z));
      	} else {
      		tmp = fma(y, i, fma(log(c), b, a));
      	}
      	return tmp;
      }
      
      function code(x, y, z, t, a, b, c, i)
      	t_1 = Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i))
      	tmp = 0.0
      	if (t_1 <= -1e+32)
      		tmp = fma(y, i, fma(log(c), b, z));
      	elseif (t_1 <= 100.0)
      		tmp = fma(y, i, fma(log(c), -0.5, z));
      	else
      		tmp = fma(y, i, fma(log(c), b, a));
      	end
      	return tmp
      end
      
      code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, -1e+32], N[(y * i + N[(N[Log[c], $MachinePrecision] * b + z), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$1, 100.0], N[(y * i + N[(N[Log[c], $MachinePrecision] * -0.5 + z), $MachinePrecision]), $MachinePrecision], N[(y * i + N[(N[Log[c], $MachinePrecision] * b + a), $MachinePrecision]), $MachinePrecision]]]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      t_1 := \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\
      \mathbf{if}\;t\_1 \leq -1 \cdot 10^{+32}:\\
      \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, z\right)\right)\\
      
      \mathbf{elif}\;t\_1 \leq 100:\\
      \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, -0.5, z\right)\right)\\
      
      \mathbf{else}:\\
      \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, a\right)\right)\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 3 regimes
      2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -1.00000000000000005e32

        1. Initial program 99.9%

          \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-+.f64N/A

            \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
          2. lift-+.f64N/A

            \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
          3. lift-+.f64N/A

            \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
          4. lift-+.f64N/A

            \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
          5. lift-+.f64N/A

            \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
          6. lift-*.f64N/A

            \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
          7. lift-log.f64N/A

            \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
          8. lift--.f64N/A

            \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
          9. lift-*.f64N/A

            \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
          10. lift-log.f64N/A

            \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
          11. +-commutativeN/A

            \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
          12. lift-*.f64N/A

            \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
          13. lower-fma.f64N/A

            \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
        4. Applied rewrites99.9%

          \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
        5. Taylor expanded in z around inf

          \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{z}\right)\right) \]
        6. Step-by-step derivation
          1. Applied rewrites51.5%

            \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{z}\right)\right) \]
          2. Taylor expanded in b around inf

            \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, z\right)\right) \]
          3. Step-by-step derivation
            1. Applied rewrites51.5%

              \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, z\right)\right) \]

            if -1.00000000000000005e32 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < 100

            1. Initial program 100.0%

              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
            2. Add Preprocessing
            3. Step-by-step derivation
              1. lift-+.f64N/A

                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
              2. lift-+.f64N/A

                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
              3. lift-+.f64N/A

                \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
              4. lift-+.f64N/A

                \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
              5. lift-+.f64N/A

                \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
              6. lift-*.f64N/A

                \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
              7. lift-log.f64N/A

                \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
              8. lift--.f64N/A

                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
              9. lift-*.f64N/A

                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
              10. lift-log.f64N/A

                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
              11. +-commutativeN/A

                \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
              12. lift-*.f64N/A

                \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
              13. lower-fma.f64N/A

                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
            4. Applied rewrites100.0%

              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
            5. Taylor expanded in z around inf

              \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{z}\right)\right) \]
            6. Step-by-step derivation
              1. Applied rewrites100.0%

                \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{z}\right)\right) \]
              2. Taylor expanded in b around 0

                \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{\frac{-1}{2}}, z\right)\right) \]
              3. Step-by-step derivation
                1. Applied rewrites100.0%

                  \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{-0.5}, z\right)\right) \]

                if 100 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                1. Initial program 99.9%

                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                2. Add Preprocessing
                3. Step-by-step derivation
                  1. lift-+.f64N/A

                    \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                  2. lift-+.f64N/A

                    \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                  3. lift-+.f64N/A

                    \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                  4. lift-+.f64N/A

                    \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                  5. lift-+.f64N/A

                    \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                  6. lift-*.f64N/A

                    \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                  7. lift-log.f64N/A

                    \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                  8. lift--.f64N/A

                    \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                  9. lift-*.f64N/A

                    \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                  10. lift-log.f64N/A

                    \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                  11. +-commutativeN/A

                    \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                  12. lift-*.f64N/A

                    \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                  13. lower-fma.f64N/A

                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                4. Applied rewrites100.0%

                  \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                5. Taylor expanded in a around inf

                  \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{a}\right)\right) \]
                6. Step-by-step derivation
                  1. Applied rewrites55.6%

                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{a}\right)\right) \]
                  2. Taylor expanded in b around inf

                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, a\right)\right) \]
                  3. Step-by-step derivation
                    1. Applied rewrites55.5%

                      \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, a\right)\right) \]
                  4. Recombined 3 regimes into one program.
                  5. Add Preprocessing

                  Alternative 4: 33.1% accurate, 0.5× speedup?

                  \[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\ \mathbf{if}\;t\_1 \leq -\infty:\\ \;\;\;\;i \cdot y\\ \mathbf{elif}\;t\_1 \leq -50:\\ \;\;\;\;z\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, a\right)\\ \end{array} \end{array} \]
                  (FPCore (x y z t a b c i)
                   :precision binary64
                   (let* ((t_1
                           (+
                            (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c)))
                            (* y i))))
                     (if (<= t_1 (- INFINITY)) (* i y) (if (<= t_1 -50.0) z (fma y i a)))))
                  double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                  	double t_1 = (((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i);
                  	double tmp;
                  	if (t_1 <= -((double) INFINITY)) {
                  		tmp = i * y;
                  	} else if (t_1 <= -50.0) {
                  		tmp = z;
                  	} else {
                  		tmp = fma(y, i, a);
                  	}
                  	return tmp;
                  }
                  
                  function code(x, y, z, t, a, b, c, i)
                  	t_1 = Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i))
                  	tmp = 0.0
                  	if (t_1 <= Float64(-Inf))
                  		tmp = Float64(i * y);
                  	elseif (t_1 <= -50.0)
                  		tmp = z;
                  	else
                  		tmp = fma(y, i, a);
                  	end
                  	return tmp
                  end
                  
                  code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$1, (-Infinity)], N[(i * y), $MachinePrecision], If[LessEqual[t$95$1, -50.0], z, N[(y * i + a), $MachinePrecision]]]]
                  
                  \begin{array}{l}
                  
                  \\
                  \begin{array}{l}
                  t_1 := \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\
                  \mathbf{if}\;t\_1 \leq -\infty:\\
                  \;\;\;\;i \cdot y\\
                  
                  \mathbf{elif}\;t\_1 \leq -50:\\
                  \;\;\;\;z\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;\mathsf{fma}\left(y, i, a\right)\\
                  
                  
                  \end{array}
                  \end{array}
                  
                  Derivation
                  1. Split input into 3 regimes
                  2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -inf.0

                    1. Initial program 100.0%

                      \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                    2. Add Preprocessing
                    3. Taylor expanded in y around inf

                      \[\leadsto \color{blue}{i \cdot y} \]
                    4. Step-by-step derivation
                      1. lower-*.f64100.0

                        \[\leadsto i \cdot \color{blue}{y} \]
                    5. Applied rewrites100.0%

                      \[\leadsto \color{blue}{i \cdot y} \]

                    if -inf.0 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -50

                    1. Initial program 99.8%

                      \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                    2. Add Preprocessing
                    3. Taylor expanded in z around inf

                      \[\leadsto \color{blue}{z} \]
                    4. Step-by-step derivation
                      1. Applied rewrites18.6%

                        \[\leadsto \color{blue}{z} \]

                      if -50 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                      1. Initial program 99.9%

                        \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                      2. Add Preprocessing
                      3. Step-by-step derivation
                        1. lift-+.f64N/A

                          \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                        2. lift-+.f64N/A

                          \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                        3. lift-+.f64N/A

                          \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        4. lift-+.f64N/A

                          \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        5. lift-+.f64N/A

                          \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        6. lift-*.f64N/A

                          \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        7. lift-log.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        8. lift--.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                        9. lift-*.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                        10. lift-log.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                        11. +-commutativeN/A

                          \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                        12. lift-*.f64N/A

                          \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                        13. lower-fma.f64N/A

                          \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                      4. Applied rewrites100.0%

                        \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                      5. Taylor expanded in a around inf

                        \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{a}\right) \]
                      6. Step-by-step derivation
                        1. *-commutative44.1

                          \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                        2. +-commutative44.1

                          \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                        3. *-commutative44.1

                          \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                        4. +-commutative44.1

                          \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                        5. associate-+l+44.1

                          \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                        6. +-commutative44.1

                          \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                      7. Applied rewrites44.1%

                        \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{a}\right) \]
                    5. Recombined 3 regimes into one program.
                    6. Add Preprocessing

                    Alternative 5: 61.4% accurate, 0.6× speedup?

                    \[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(b - 0.5\right) \cdot \log c\\ \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + t\_1\right) + y \cdot i \leq -1 \cdot 10^{+32}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, z\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t + a\right) + t\_1\right) + y \cdot i\\ \end{array} \end{array} \]
                    (FPCore (x y z t a b c i)
                     :precision binary64
                     (let* ((t_1 (* (- b 0.5) (log c))))
                       (if (<= (+ (+ (+ (+ (+ (* x (log y)) z) t) a) t_1) (* y i)) -1e+32)
                         (fma y i (fma (log c) b z))
                         (+ (+ (+ t a) t_1) (* y i)))))
                    double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                    	double t_1 = (b - 0.5) * log(c);
                    	double tmp;
                    	if (((((((x * log(y)) + z) + t) + a) + t_1) + (y * i)) <= -1e+32) {
                    		tmp = fma(y, i, fma(log(c), b, z));
                    	} else {
                    		tmp = ((t + a) + t_1) + (y * i);
                    	}
                    	return tmp;
                    }
                    
                    function code(x, y, z, t, a, b, c, i)
                    	t_1 = Float64(Float64(b - 0.5) * log(c))
                    	tmp = 0.0
                    	if (Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + t_1) + Float64(y * i)) <= -1e+32)
                    		tmp = fma(y, i, fma(log(c), b, z));
                    	else
                    		tmp = Float64(Float64(Float64(t + a) + t_1) + Float64(y * i));
                    	end
                    	return tmp
                    end
                    
                    code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + t$95$1), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], -1e+32], N[(y * i + N[(N[Log[c], $MachinePrecision] * b + z), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t + a), $MachinePrecision] + t$95$1), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]]]
                    
                    \begin{array}{l}
                    
                    \\
                    \begin{array}{l}
                    t_1 := \left(b - 0.5\right) \cdot \log c\\
                    \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + t\_1\right) + y \cdot i \leq -1 \cdot 10^{+32}:\\
                    \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, z\right)\right)\\
                    
                    \mathbf{else}:\\
                    \;\;\;\;\left(\left(t + a\right) + t\_1\right) + y \cdot i\\
                    
                    
                    \end{array}
                    \end{array}
                    
                    Derivation
                    1. Split input into 2 regimes
                    2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -1.00000000000000005e32

                      1. Initial program 99.9%

                        \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                      2. Add Preprocessing
                      3. Step-by-step derivation
                        1. lift-+.f64N/A

                          \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                        2. lift-+.f64N/A

                          \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                        3. lift-+.f64N/A

                          \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        4. lift-+.f64N/A

                          \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        5. lift-+.f64N/A

                          \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        6. lift-*.f64N/A

                          \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        7. lift-log.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                        8. lift--.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                        9. lift-*.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                        10. lift-log.f64N/A

                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                        11. +-commutativeN/A

                          \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                        12. lift-*.f64N/A

                          \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                        13. lower-fma.f64N/A

                          \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                      4. Applied rewrites99.9%

                        \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                      5. Taylor expanded in z around inf

                        \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{z}\right)\right) \]
                      6. Step-by-step derivation
                        1. Applied rewrites51.5%

                          \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{z}\right)\right) \]
                        2. Taylor expanded in b around inf

                          \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, z\right)\right) \]
                        3. Step-by-step derivation
                          1. Applied rewrites51.5%

                            \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, z\right)\right) \]

                          if -1.00000000000000005e32 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                          1. Initial program 99.9%

                            \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                          2. Add Preprocessing
                          3. Taylor expanded in t around inf

                            \[\leadsto \left(\left(\color{blue}{t} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                          4. Step-by-step derivation
                            1. Applied rewrites74.0%

                              \[\leadsto \left(\left(\color{blue}{t} + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                          5. Recombined 2 regimes into one program.
                          6. Add Preprocessing

                          Alternative 6: 53.5% accurate, 0.7× speedup?

                          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq 100:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, z\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, a\right)\right)\\ \end{array} \end{array} \]
                          (FPCore (x y z t a b c i)
                           :precision binary64
                           (if (<=
                                (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i))
                                100.0)
                             (fma y i (fma (log c) (- b 0.5) z))
                             (fma y i (fma (log c) b a))))
                          double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                          	double tmp;
                          	if (((((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i)) <= 100.0) {
                          		tmp = fma(y, i, fma(log(c), (b - 0.5), z));
                          	} else {
                          		tmp = fma(y, i, fma(log(c), b, a));
                          	}
                          	return tmp;
                          }
                          
                          function code(x, y, z, t, a, b, c, i)
                          	tmp = 0.0
                          	if (Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i)) <= 100.0)
                          		tmp = fma(y, i, fma(log(c), Float64(b - 0.5), z));
                          	else
                          		tmp = fma(y, i, fma(log(c), b, a));
                          	end
                          	return tmp
                          end
                          
                          code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], 100.0], N[(y * i + N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + z), $MachinePrecision]), $MachinePrecision], N[(y * i + N[(N[Log[c], $MachinePrecision] * b + a), $MachinePrecision]), $MachinePrecision]]
                          
                          \begin{array}{l}
                          
                          \\
                          \begin{array}{l}
                          \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq 100:\\
                          \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, z\right)\right)\\
                          
                          \mathbf{else}:\\
                          \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, a\right)\right)\\
                          
                          
                          \end{array}
                          \end{array}
                          
                          Derivation
                          1. Split input into 2 regimes
                          2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < 100

                            1. Initial program 99.9%

                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                            2. Add Preprocessing
                            3. Step-by-step derivation
                              1. lift-+.f64N/A

                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                              2. lift-+.f64N/A

                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                              3. lift-+.f64N/A

                                \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                              4. lift-+.f64N/A

                                \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                              5. lift-+.f64N/A

                                \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                              6. lift-*.f64N/A

                                \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                              7. lift-log.f64N/A

                                \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                              8. lift--.f64N/A

                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                              9. lift-*.f64N/A

                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                              10. lift-log.f64N/A

                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                              11. +-commutativeN/A

                                \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                              12. lift-*.f64N/A

                                \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                              13. lower-fma.f64N/A

                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                            4. Applied rewrites99.9%

                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                            5. Taylor expanded in z around inf

                              \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{z}\right)\right) \]
                            6. Step-by-step derivation
                              1. Applied rewrites53.5%

                                \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{z}\right)\right) \]

                              if 100 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                              1. Initial program 99.9%

                                \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                              2. Add Preprocessing
                              3. Step-by-step derivation
                                1. lift-+.f64N/A

                                  \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                2. lift-+.f64N/A

                                  \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                3. lift-+.f64N/A

                                  \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                4. lift-+.f64N/A

                                  \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                5. lift-+.f64N/A

                                  \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                6. lift-*.f64N/A

                                  \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                7. lift-log.f64N/A

                                  \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                8. lift--.f64N/A

                                  \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                9. lift-*.f64N/A

                                  \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                10. lift-log.f64N/A

                                  \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                11. +-commutativeN/A

                                  \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                12. lift-*.f64N/A

                                  \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                13. lower-fma.f64N/A

                                  \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                              4. Applied rewrites100.0%

                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                              5. Taylor expanded in a around inf

                                \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{a}\right)\right) \]
                              6. Step-by-step derivation
                                1. Applied rewrites55.6%

                                  \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{a}\right)\right) \]
                                2. Taylor expanded in b around inf

                                  \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, a\right)\right) \]
                                3. Step-by-step derivation
                                  1. Applied rewrites55.5%

                                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, a\right)\right) \]
                                4. Recombined 2 regimes into one program.
                                5. Add Preprocessing

                                Alternative 7: 54.0% accurate, 0.7× speedup?

                                \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -1 \cdot 10^{+32}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, z\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, a\right)\right)\\ \end{array} \end{array} \]
                                (FPCore (x y z t a b c i)
                                 :precision binary64
                                 (if (<=
                                      (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i))
                                      -1e+32)
                                   (fma y i (fma (log c) b z))
                                   (fma y i (fma (log c) (- b 0.5) a))))
                                double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                	double tmp;
                                	if (((((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i)) <= -1e+32) {
                                		tmp = fma(y, i, fma(log(c), b, z));
                                	} else {
                                		tmp = fma(y, i, fma(log(c), (b - 0.5), a));
                                	}
                                	return tmp;
                                }
                                
                                function code(x, y, z, t, a, b, c, i)
                                	tmp = 0.0
                                	if (Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i)) <= -1e+32)
                                		tmp = fma(y, i, fma(log(c), b, z));
                                	else
                                		tmp = fma(y, i, fma(log(c), Float64(b - 0.5), a));
                                	end
                                	return tmp
                                end
                                
                                code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], -1e+32], N[(y * i + N[(N[Log[c], $MachinePrecision] * b + z), $MachinePrecision]), $MachinePrecision], N[(y * i + N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + a), $MachinePrecision]), $MachinePrecision]]
                                
                                \begin{array}{l}
                                
                                \\
                                \begin{array}{l}
                                \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -1 \cdot 10^{+32}:\\
                                \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, z\right)\right)\\
                                
                                \mathbf{else}:\\
                                \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, a\right)\right)\\
                                
                                
                                \end{array}
                                \end{array}
                                
                                Derivation
                                1. Split input into 2 regimes
                                2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -1.00000000000000005e32

                                  1. Initial program 99.9%

                                    \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                  2. Add Preprocessing
                                  3. Step-by-step derivation
                                    1. lift-+.f64N/A

                                      \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                    2. lift-+.f64N/A

                                      \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                    3. lift-+.f64N/A

                                      \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                    4. lift-+.f64N/A

                                      \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                    5. lift-+.f64N/A

                                      \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                    6. lift-*.f64N/A

                                      \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                    7. lift-log.f64N/A

                                      \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                    8. lift--.f64N/A

                                      \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                    9. lift-*.f64N/A

                                      \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                    10. lift-log.f64N/A

                                      \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                    11. +-commutativeN/A

                                      \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                    12. lift-*.f64N/A

                                      \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                    13. lower-fma.f64N/A

                                      \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                  4. Applied rewrites99.9%

                                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                  5. Taylor expanded in z around inf

                                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{z}\right)\right) \]
                                  6. Step-by-step derivation
                                    1. Applied rewrites51.5%

                                      \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{z}\right)\right) \]
                                    2. Taylor expanded in b around inf

                                      \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, z\right)\right) \]
                                    3. Step-by-step derivation
                                      1. Applied rewrites51.5%

                                        \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, z\right)\right) \]

                                      if -1.00000000000000005e32 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                                      1. Initial program 99.9%

                                        \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                      2. Add Preprocessing
                                      3. Step-by-step derivation
                                        1. lift-+.f64N/A

                                          \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                        2. lift-+.f64N/A

                                          \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                        3. lift-+.f64N/A

                                          \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                        4. lift-+.f64N/A

                                          \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                        5. lift-+.f64N/A

                                          \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                        6. lift-*.f64N/A

                                          \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                        7. lift-log.f64N/A

                                          \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                        8. lift--.f64N/A

                                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                        9. lift-*.f64N/A

                                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                        10. lift-log.f64N/A

                                          \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                        11. +-commutativeN/A

                                          \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                        12. lift-*.f64N/A

                                          \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                        13. lower-fma.f64N/A

                                          \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                      4. Applied rewrites100.0%

                                        \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                      5. Taylor expanded in a around inf

                                        \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{a}\right)\right) \]
                                      6. Step-by-step derivation
                                        1. Applied rewrites57.2%

                                          \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{a}\right)\right) \]
                                      7. Recombined 2 regimes into one program.
                                      8. Add Preprocessing

                                      Alternative 8: 70.8% accurate, 0.7× speedup?

                                      \[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(b - 0.5\right) \cdot \log c\\ \mathbf{if}\;t\_1 \leq -1 \cdot 10^{+272} \lor \neg \left(t\_1 \leq 2 \cdot 10^{+223}\right):\\ \;\;\;\;\log c \cdot b\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\ \end{array} \end{array} \]
                                      (FPCore (x y z t a b c i)
                                       :precision binary64
                                       (let* ((t_1 (* (- b 0.5) (log c))))
                                         (if (or (<= t_1 -1e+272) (not (<= t_1 2e+223)))
                                           (* (log c) b)
                                           (fma y i (+ (+ z t) a)))))
                                      double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                      	double t_1 = (b - 0.5) * log(c);
                                      	double tmp;
                                      	if ((t_1 <= -1e+272) || !(t_1 <= 2e+223)) {
                                      		tmp = log(c) * b;
                                      	} else {
                                      		tmp = fma(y, i, ((z + t) + a));
                                      	}
                                      	return tmp;
                                      }
                                      
                                      function code(x, y, z, t, a, b, c, i)
                                      	t_1 = Float64(Float64(b - 0.5) * log(c))
                                      	tmp = 0.0
                                      	if ((t_1 <= -1e+272) || !(t_1 <= 2e+223))
                                      		tmp = Float64(log(c) * b);
                                      	else
                                      		tmp = fma(y, i, Float64(Float64(z + t) + a));
                                      	end
                                      	return tmp
                                      end
                                      
                                      code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]}, If[Or[LessEqual[t$95$1, -1e+272], N[Not[LessEqual[t$95$1, 2e+223]], $MachinePrecision]], N[(N[Log[c], $MachinePrecision] * b), $MachinePrecision], N[(y * i + N[(N[(z + t), $MachinePrecision] + a), $MachinePrecision]), $MachinePrecision]]]
                                      
                                      \begin{array}{l}
                                      
                                      \\
                                      \begin{array}{l}
                                      t_1 := \left(b - 0.5\right) \cdot \log c\\
                                      \mathbf{if}\;t\_1 \leq -1 \cdot 10^{+272} \lor \neg \left(t\_1 \leq 2 \cdot 10^{+223}\right):\\
                                      \;\;\;\;\log c \cdot b\\
                                      
                                      \mathbf{else}:\\
                                      \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\
                                      
                                      
                                      \end{array}
                                      \end{array}
                                      
                                      Derivation
                                      1. Split input into 2 regimes
                                      2. if (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c)) < -1.0000000000000001e272 or 2.00000000000000009e223 < (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))

                                        1. Initial program 99.7%

                                          \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                        2. Add Preprocessing
                                        3. Taylor expanded in b around inf

                                          \[\leadsto \color{blue}{b \cdot \log c} \]
                                        4. Step-by-step derivation
                                          1. *-commutativeN/A

                                            \[\leadsto \log c \cdot \color{blue}{b} \]
                                          2. lower-*.f64N/A

                                            \[\leadsto \log c \cdot \color{blue}{b} \]
                                          3. lift-log.f6473.3

                                            \[\leadsto \log c \cdot b \]
                                        5. Applied rewrites73.3%

                                          \[\leadsto \color{blue}{\log c \cdot b} \]

                                        if -1.0000000000000001e272 < (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c)) < 2.00000000000000009e223

                                        1. Initial program 99.9%

                                          \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                        2. Add Preprocessing
                                        3. Taylor expanded in x around 0

                                          \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                        4. Step-by-step derivation
                                          1. +-commutativeN/A

                                            \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                          2. lower-+.f64N/A

                                            \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                          3. +-commutativeN/A

                                            \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                          4. lower-+.f64N/A

                                            \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                          5. +-commutativeN/A

                                            \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                          6. lower-fma.f64N/A

                                            \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                          7. lift-log.f64N/A

                                            \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                          8. lift--.f6481.9

                                            \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                        5. Applied rewrites81.9%

                                          \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                        6. Taylor expanded in z around inf

                                          \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                        7. Step-by-step derivation
                                          1. Applied rewrites74.9%

                                            \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                          2. Step-by-step derivation
                                            1. lift-+.f64N/A

                                              \[\leadsto \color{blue}{\left(\left(z + t\right) + a\right) + y \cdot i} \]
                                            2. lift-*.f64N/A

                                              \[\leadsto \left(\left(z + t\right) + a\right) + \color{blue}{y \cdot i} \]
                                            3. +-commutativeN/A

                                              \[\leadsto \color{blue}{y \cdot i + \left(\left(z + t\right) + a\right)} \]
                                            4. lower-fma.f6474.9

                                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                          3. Applied rewrites74.9%

                                            \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                        8. Recombined 2 regimes into one program.
                                        9. Final simplification74.7%

                                          \[\leadsto \begin{array}{l} \mathbf{if}\;\left(b - 0.5\right) \cdot \log c \leq -1 \cdot 10^{+272} \lor \neg \left(\left(b - 0.5\right) \cdot \log c \leq 2 \cdot 10^{+223}\right):\\ \;\;\;\;\log c \cdot b\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\ \end{array} \]
                                        10. Add Preprocessing

                                        Alternative 9: 45.3% accurate, 0.9× speedup?

                                        \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -50:\\ \;\;\;\;\mathsf{fma}\left(y, i, z\right)\\ \mathbf{else}:\\ \;\;\;\;\left(t + a\right) + y \cdot i\\ \end{array} \end{array} \]
                                        (FPCore (x y z t a b c i)
                                         :precision binary64
                                         (if (<=
                                              (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i))
                                              -50.0)
                                           (fma y i z)
                                           (+ (+ t a) (* y i))))
                                        double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                        	double tmp;
                                        	if (((((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i)) <= -50.0) {
                                        		tmp = fma(y, i, z);
                                        	} else {
                                        		tmp = (t + a) + (y * i);
                                        	}
                                        	return tmp;
                                        }
                                        
                                        function code(x, y, z, t, a, b, c, i)
                                        	tmp = 0.0
                                        	if (Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i)) <= -50.0)
                                        		tmp = fma(y, i, z);
                                        	else
                                        		tmp = Float64(Float64(t + a) + Float64(y * i));
                                        	end
                                        	return tmp
                                        end
                                        
                                        code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], -50.0], N[(y * i + z), $MachinePrecision], N[(N[(t + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]]
                                        
                                        \begin{array}{l}
                                        
                                        \\
                                        \begin{array}{l}
                                        \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -50:\\
                                        \;\;\;\;\mathsf{fma}\left(y, i, z\right)\\
                                        
                                        \mathbf{else}:\\
                                        \;\;\;\;\left(t + a\right) + y \cdot i\\
                                        
                                        
                                        \end{array}
                                        \end{array}
                                        
                                        Derivation
                                        1. Split input into 2 regimes
                                        2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -50

                                          1. Initial program 99.9%

                                            \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                          2. Add Preprocessing
                                          3. Step-by-step derivation
                                            1. lift-+.f64N/A

                                              \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                            2. lift-+.f64N/A

                                              \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                            3. lift-+.f64N/A

                                              \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                            4. lift-+.f64N/A

                                              \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                            5. lift-+.f64N/A

                                              \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                            6. lift-*.f64N/A

                                              \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                            7. lift-log.f64N/A

                                              \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                            8. lift--.f64N/A

                                              \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                            9. lift-*.f64N/A

                                              \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                            10. lift-log.f64N/A

                                              \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                            11. +-commutativeN/A

                                              \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                            12. lift-*.f64N/A

                                              \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                            13. lower-fma.f64N/A

                                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                          4. Applied rewrites99.9%

                                            \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                          5. Taylor expanded in z around inf

                                            \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{z}\right) \]
                                          6. Step-by-step derivation
                                            1. *-commutative34.7

                                              \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                            2. +-commutative34.7

                                              \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                            3. *-commutative34.7

                                              \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                            4. +-commutative34.7

                                              \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                            5. associate-+l+34.7

                                              \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                            6. +-commutative34.7

                                              \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                          7. Applied rewrites34.7%

                                            \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{z}\right) \]

                                          if -50 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                                          1. Initial program 99.9%

                                            \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                          2. Add Preprocessing
                                          3. Taylor expanded in x around 0

                                            \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                          4. Step-by-step derivation
                                            1. +-commutativeN/A

                                              \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                            2. lower-+.f64N/A

                                              \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                            3. +-commutativeN/A

                                              \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                            4. lower-+.f64N/A

                                              \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                            5. +-commutativeN/A

                                              \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                            6. lower-fma.f64N/A

                                              \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                            7. lift-log.f64N/A

                                              \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                            8. lift--.f6483.7

                                              \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                          5. Applied rewrites83.7%

                                            \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                          6. Taylor expanded in t around inf

                                            \[\leadsto \left(t + a\right) + y \cdot i \]
                                          7. Step-by-step derivation
                                            1. Applied rewrites60.7%

                                              \[\leadsto \left(t + a\right) + y \cdot i \]
                                          8. Recombined 2 regimes into one program.
                                          9. Add Preprocessing

                                          Alternative 10: 38.1% accurate, 1.0× speedup?

                                          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -50:\\ \;\;\;\;\mathsf{fma}\left(y, i, z\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, a\right)\\ \end{array} \end{array} \]
                                          (FPCore (x y z t a b c i)
                                           :precision binary64
                                           (if (<=
                                                (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i))
                                                -50.0)
                                             (fma y i z)
                                             (fma y i a)))
                                          double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                          	double tmp;
                                          	if (((((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i)) <= -50.0) {
                                          		tmp = fma(y, i, z);
                                          	} else {
                                          		tmp = fma(y, i, a);
                                          	}
                                          	return tmp;
                                          }
                                          
                                          function code(x, y, z, t, a, b, c, i)
                                          	tmp = 0.0
                                          	if (Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i)) <= -50.0)
                                          		tmp = fma(y, i, z);
                                          	else
                                          		tmp = fma(y, i, a);
                                          	end
                                          	return tmp
                                          end
                                          
                                          code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], -50.0], N[(y * i + z), $MachinePrecision], N[(y * i + a), $MachinePrecision]]
                                          
                                          \begin{array}{l}
                                          
                                          \\
                                          \begin{array}{l}
                                          \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -50:\\
                                          \;\;\;\;\mathsf{fma}\left(y, i, z\right)\\
                                          
                                          \mathbf{else}:\\
                                          \;\;\;\;\mathsf{fma}\left(y, i, a\right)\\
                                          
                                          
                                          \end{array}
                                          \end{array}
                                          
                                          Derivation
                                          1. Split input into 2 regimes
                                          2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -50

                                            1. Initial program 99.9%

                                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                            2. Add Preprocessing
                                            3. Step-by-step derivation
                                              1. lift-+.f64N/A

                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                              2. lift-+.f64N/A

                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                              3. lift-+.f64N/A

                                                \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              4. lift-+.f64N/A

                                                \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              5. lift-+.f64N/A

                                                \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              6. lift-*.f64N/A

                                                \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              7. lift-log.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              8. lift--.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                              9. lift-*.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                              10. lift-log.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                              11. +-commutativeN/A

                                                \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                              12. lift-*.f64N/A

                                                \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                              13. lower-fma.f64N/A

                                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                            4. Applied rewrites99.9%

                                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                            5. Taylor expanded in z around inf

                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{z}\right) \]
                                            6. Step-by-step derivation
                                              1. *-commutative34.7

                                                \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                              2. +-commutative34.7

                                                \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                              3. *-commutative34.7

                                                \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                              4. +-commutative34.7

                                                \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                              5. associate-+l+34.7

                                                \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                              6. +-commutative34.7

                                                \[\leadsto \mathsf{fma}\left(y, i, z\right) \]
                                            7. Applied rewrites34.7%

                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{z}\right) \]

                                            if -50 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                                            1. Initial program 99.9%

                                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                            2. Add Preprocessing
                                            3. Step-by-step derivation
                                              1. lift-+.f64N/A

                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                              2. lift-+.f64N/A

                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                              3. lift-+.f64N/A

                                                \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              4. lift-+.f64N/A

                                                \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              5. lift-+.f64N/A

                                                \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              6. lift-*.f64N/A

                                                \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              7. lift-log.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                              8. lift--.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                              9. lift-*.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                              10. lift-log.f64N/A

                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                              11. +-commutativeN/A

                                                \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                              12. lift-*.f64N/A

                                                \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                              13. lower-fma.f64N/A

                                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                            4. Applied rewrites100.0%

                                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                            5. Taylor expanded in a around inf

                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{a}\right) \]
                                            6. Step-by-step derivation
                                              1. *-commutative44.1

                                                \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                                              2. +-commutative44.1

                                                \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                                              3. *-commutative44.1

                                                \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                                              4. +-commutative44.1

                                                \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                                              5. associate-+l+44.1

                                                \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                                              6. +-commutative44.1

                                                \[\leadsto \mathsf{fma}\left(y, i, a\right) \]
                                            7. Applied rewrites44.1%

                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{a}\right) \]
                                          3. Recombined 2 regimes into one program.
                                          4. Add Preprocessing

                                          Alternative 11: 16.0% accurate, 1.0× speedup?

                                          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -50:\\ \;\;\;\;z\\ \mathbf{else}:\\ \;\;\;\;a\\ \end{array} \end{array} \]
                                          (FPCore (x y z t a b c i)
                                           :precision binary64
                                           (if (<=
                                                (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i))
                                                -50.0)
                                             z
                                             a))
                                          double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                          	double tmp;
                                          	if (((((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i)) <= -50.0) {
                                          		tmp = z;
                                          	} else {
                                          		tmp = a;
                                          	}
                                          	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(x, y, z, t, a, b, c, i)
                                          use fmin_fmax_functions
                                              real(8), intent (in) :: x
                                              real(8), intent (in) :: y
                                              real(8), intent (in) :: z
                                              real(8), intent (in) :: t
                                              real(8), intent (in) :: a
                                              real(8), intent (in) :: b
                                              real(8), intent (in) :: c
                                              real(8), intent (in) :: i
                                              real(8) :: tmp
                                              if (((((((x * log(y)) + z) + t) + a) + ((b - 0.5d0) * log(c))) + (y * i)) <= (-50.0d0)) then
                                                  tmp = z
                                              else
                                                  tmp = a
                                              end if
                                              code = tmp
                                          end function
                                          
                                          public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                          	double tmp;
                                          	if (((((((x * Math.log(y)) + z) + t) + a) + ((b - 0.5) * Math.log(c))) + (y * i)) <= -50.0) {
                                          		tmp = z;
                                          	} else {
                                          		tmp = a;
                                          	}
                                          	return tmp;
                                          }
                                          
                                          def code(x, y, z, t, a, b, c, i):
                                          	tmp = 0
                                          	if ((((((x * math.log(y)) + z) + t) + a) + ((b - 0.5) * math.log(c))) + (y * i)) <= -50.0:
                                          		tmp = z
                                          	else:
                                          		tmp = a
                                          	return tmp
                                          
                                          function code(x, y, z, t, a, b, c, i)
                                          	tmp = 0.0
                                          	if (Float64(Float64(Float64(Float64(Float64(Float64(x * log(y)) + z) + t) + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i)) <= -50.0)
                                          		tmp = z;
                                          	else
                                          		tmp = a;
                                          	end
                                          	return tmp
                                          end
                                          
                                          function tmp_2 = code(x, y, z, t, a, b, c, i)
                                          	tmp = 0.0;
                                          	if (((((((x * log(y)) + z) + t) + a) + ((b - 0.5) * log(c))) + (y * i)) <= -50.0)
                                          		tmp = z;
                                          	else
                                          		tmp = a;
                                          	end
                                          	tmp_2 = tmp;
                                          end
                                          
                                          code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[N[(N[(N[(N[(N[(N[(x * N[Log[y], $MachinePrecision]), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], -50.0], z, a]
                                          
                                          \begin{array}{l}
                                          
                                          \\
                                          \begin{array}{l}
                                          \mathbf{if}\;\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \leq -50:\\
                                          \;\;\;\;z\\
                                          
                                          \mathbf{else}:\\
                                          \;\;\;\;a\\
                                          
                                          
                                          \end{array}
                                          \end{array}
                                          
                                          Derivation
                                          1. Split input into 2 regimes
                                          2. if (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i)) < -50

                                            1. Initial program 99.9%

                                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                            2. Add Preprocessing
                                            3. Taylor expanded in z around inf

                                              \[\leadsto \color{blue}{z} \]
                                            4. Step-by-step derivation
                                              1. Applied rewrites16.9%

                                                \[\leadsto \color{blue}{z} \]

                                              if -50 < (+.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 x (log.f64 y)) z) t) a) (*.f64 (-.f64 b #s(literal 1/2 binary64)) (log.f64 c))) (*.f64 y i))

                                              1. Initial program 99.9%

                                                \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                              2. Add Preprocessing
                                              3. Taylor expanded in a around inf

                                                \[\leadsto \color{blue}{a} \]
                                              4. Step-by-step derivation
                                                1. Applied rewrites16.7%

                                                  \[\leadsto \color{blue}{a} \]
                                              5. Recombined 2 regimes into one program.
                                              6. Add Preprocessing

                                              Alternative 12: 89.7% accurate, 1.0× speedup?

                                              \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \leq 3.3 \cdot 10^{+93}:\\ \;\;\;\;\left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - 0.5, \log y \cdot x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \end{array} \end{array} \]
                                              (FPCore (x y z t a b c i)
                                               :precision binary64
                                               (if (<= a 3.3e+93)
                                                 (+ (+ t z) (fma i y (fma (log c) (- b 0.5) (* (log y) x))))
                                                 (+ (+ (+ (fma (log c) (- b 0.5) z) t) a) (* y i))))
                                              double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                              	double tmp;
                                              	if (a <= 3.3e+93) {
                                              		tmp = (t + z) + fma(i, y, fma(log(c), (b - 0.5), (log(y) * x)));
                                              	} else {
                                              		tmp = ((fma(log(c), (b - 0.5), z) + t) + a) + (y * i);
                                              	}
                                              	return tmp;
                                              }
                                              
                                              function code(x, y, z, t, a, b, c, i)
                                              	tmp = 0.0
                                              	if (a <= 3.3e+93)
                                              		tmp = Float64(Float64(t + z) + fma(i, y, fma(log(c), Float64(b - 0.5), Float64(log(y) * x))));
                                              	else
                                              		tmp = Float64(Float64(Float64(fma(log(c), Float64(b - 0.5), z) + t) + a) + Float64(y * i));
                                              	end
                                              	return tmp
                                              end
                                              
                                              code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[a, 3.3e+93], N[(N[(t + z), $MachinePrecision] + N[(i * y + N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + N[(N[Log[y], $MachinePrecision] * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]]
                                              
                                              \begin{array}{l}
                                              
                                              \\
                                              \begin{array}{l}
                                              \mathbf{if}\;a \leq 3.3 \cdot 10^{+93}:\\
                                              \;\;\;\;\left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - 0.5, \log y \cdot x\right)\right)\\
                                              
                                              \mathbf{else}:\\
                                              \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\
                                              
                                              
                                              \end{array}
                                              \end{array}
                                              
                                              Derivation
                                              1. Split input into 2 regimes
                                              2. if a < 3.30000000000000009e93

                                                1. Initial program 99.9%

                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                2. Add Preprocessing
                                                3. Taylor expanded in a around 0

                                                  \[\leadsto \color{blue}{t + \left(z + \left(i \cdot y + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} \]
                                                4. Step-by-step derivation
                                                  1. associate-+r+N/A

                                                    \[\leadsto \left(t + z\right) + \color{blue}{\left(i \cdot y + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)} \]
                                                  2. lower-+.f64N/A

                                                    \[\leadsto \left(t + z\right) + \color{blue}{\left(i \cdot y + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)} \]
                                                  3. lower-+.f64N/A

                                                    \[\leadsto \left(t + z\right) + \left(\color{blue}{i \cdot y} + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) \]
                                                  4. lower-fma.f64N/A

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, \color{blue}{y}, x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right) \]
                                                  5. +-commutativeN/A

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, y, \log c \cdot \left(b - \frac{1}{2}\right) + x \cdot \log y\right) \]
                                                  6. lower-fma.f64N/A

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - \frac{1}{2}, x \cdot \log y\right)\right) \]
                                                  7. lift-log.f64N/A

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - \frac{1}{2}, x \cdot \log y\right)\right) \]
                                                  8. lift--.f64N/A

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - \frac{1}{2}, x \cdot \log y\right)\right) \]
                                                  9. *-commutativeN/A

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \log y \cdot x\right)\right) \]
                                                  10. lower-*.f64N/A

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \log y \cdot x\right)\right) \]
                                                  11. lift-log.f6490.3

                                                    \[\leadsto \left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - 0.5, \log y \cdot x\right)\right) \]
                                                5. Applied rewrites90.3%

                                                  \[\leadsto \color{blue}{\left(t + z\right) + \mathsf{fma}\left(i, y, \mathsf{fma}\left(\log c, b - 0.5, \log y \cdot x\right)\right)} \]

                                                if 3.30000000000000009e93 < a

                                                1. Initial program 99.9%

                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                2. Add Preprocessing
                                                3. Taylor expanded in x around 0

                                                  \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                4. Step-by-step derivation
                                                  1. +-commutativeN/A

                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                  2. lower-+.f64N/A

                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                  3. +-commutativeN/A

                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                  4. lower-+.f64N/A

                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                  5. +-commutativeN/A

                                                    \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                  6. lower-fma.f64N/A

                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                  7. lift-log.f64N/A

                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                  8. lift--.f6490.6

                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                5. Applied rewrites90.6%

                                                  \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                              3. Recombined 2 regimes into one program.
                                              4. Add Preprocessing

                                              Alternative 13: 91.8% accurate, 1.0× speedup?

                                              \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -5.7 \cdot 10^{+128}:\\ \;\;\;\;\left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \log c \cdot \left(b - 0.5\right)\right)\\ \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, \log y \cdot x\right)\right)\\ \end{array} \end{array} \]
                                              (FPCore (x y z t a b c i)
                                               :precision binary64
                                               (if (<= x -5.7e+128)
                                                 (+ (+ a t) (+ (fma (log y) x z) (* (log c) (- b 0.5))))
                                                 (if (<= x 3.4e+202)
                                                   (+ (+ (+ (fma (log c) (- b 0.5) z) t) a) (* y i))
                                                   (fma y i (fma (log c) b (* (log y) x))))))
                                              double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                              	double tmp;
                                              	if (x <= -5.7e+128) {
                                              		tmp = (a + t) + (fma(log(y), x, z) + (log(c) * (b - 0.5)));
                                              	} else if (x <= 3.4e+202) {
                                              		tmp = ((fma(log(c), (b - 0.5), z) + t) + a) + (y * i);
                                              	} else {
                                              		tmp = fma(y, i, fma(log(c), b, (log(y) * x)));
                                              	}
                                              	return tmp;
                                              }
                                              
                                              function code(x, y, z, t, a, b, c, i)
                                              	tmp = 0.0
                                              	if (x <= -5.7e+128)
                                              		tmp = Float64(Float64(a + t) + Float64(fma(log(y), x, z) + Float64(log(c) * Float64(b - 0.5))));
                                              	elseif (x <= 3.4e+202)
                                              		tmp = Float64(Float64(Float64(fma(log(c), Float64(b - 0.5), z) + t) + a) + Float64(y * i));
                                              	else
                                              		tmp = fma(y, i, fma(log(c), b, Float64(log(y) * x)));
                                              	end
                                              	return tmp
                                              end
                                              
                                              code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[x, -5.7e+128], N[(N[(a + t), $MachinePrecision] + N[(N[(N[Log[y], $MachinePrecision] * x + z), $MachinePrecision] + N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 3.4e+202], N[(N[(N[(N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], N[(y * i + N[(N[Log[c], $MachinePrecision] * b + N[(N[Log[y], $MachinePrecision] * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
                                              
                                              \begin{array}{l}
                                              
                                              \\
                                              \begin{array}{l}
                                              \mathbf{if}\;x \leq -5.7 \cdot 10^{+128}:\\
                                              \;\;\;\;\left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \log c \cdot \left(b - 0.5\right)\right)\\
                                              
                                              \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\
                                              \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\
                                              
                                              \mathbf{else}:\\
                                              \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, \log y \cdot x\right)\right)\\
                                              
                                              
                                              \end{array}
                                              \end{array}
                                              
                                              Derivation
                                              1. Split input into 3 regimes
                                              2. if x < -5.70000000000000024e128

                                                1. Initial program 99.8%

                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                2. Add Preprocessing
                                                3. Taylor expanded in y around 0

                                                  \[\leadsto \color{blue}{a + \left(t + \left(z + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} \]
                                                4. Step-by-step derivation
                                                  1. associate-+r+N/A

                                                    \[\leadsto \left(a + t\right) + \color{blue}{\left(z + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)} \]
                                                  2. lower-+.f64N/A

                                                    \[\leadsto \left(a + t\right) + \color{blue}{\left(z + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)} \]
                                                  3. lower-+.f64N/A

                                                    \[\leadsto \left(a + t\right) + \left(\color{blue}{z} + \left(x \cdot \log y + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) \]
                                                  4. associate-+r+N/A

                                                    \[\leadsto \left(a + t\right) + \left(\left(z + x \cdot \log y\right) + \color{blue}{\log c \cdot \left(b - \frac{1}{2}\right)}\right) \]
                                                  5. lower-+.f64N/A

                                                    \[\leadsto \left(a + t\right) + \left(\left(z + x \cdot \log y\right) + \color{blue}{\log c \cdot \left(b - \frac{1}{2}\right)}\right) \]
                                                  6. +-commutativeN/A

                                                    \[\leadsto \left(a + t\right) + \left(\left(x \cdot \log y + z\right) + \color{blue}{\log c} \cdot \left(b - \frac{1}{2}\right)\right) \]
                                                  7. *-commutativeN/A

                                                    \[\leadsto \left(a + t\right) + \left(\left(\log y \cdot x + z\right) + \log \color{blue}{c} \cdot \left(b - \frac{1}{2}\right)\right) \]
                                                  8. lower-fma.f64N/A

                                                    \[\leadsto \left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \color{blue}{\log c} \cdot \left(b - \frac{1}{2}\right)\right) \]
                                                  9. lift-log.f64N/A

                                                    \[\leadsto \left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \log \color{blue}{c} \cdot \left(b - \frac{1}{2}\right)\right) \]
                                                  10. lower-*.f64N/A

                                                    \[\leadsto \left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \log c \cdot \color{blue}{\left(b - \frac{1}{2}\right)}\right) \]
                                                  11. lift-log.f64N/A

                                                    \[\leadsto \left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \log c \cdot \left(\color{blue}{b} - \frac{1}{2}\right)\right) \]
                                                  12. lift--.f6485.1

                                                    \[\leadsto \left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \log c \cdot \left(b - \color{blue}{0.5}\right)\right) \]
                                                5. Applied rewrites85.1%

                                                  \[\leadsto \color{blue}{\left(a + t\right) + \left(\mathsf{fma}\left(\log y, x, z\right) + \log c \cdot \left(b - 0.5\right)\right)} \]

                                                if -5.70000000000000024e128 < x < 3.4e202

                                                1. Initial program 99.9%

                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                2. Add Preprocessing
                                                3. Taylor expanded in x around 0

                                                  \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                4. Step-by-step derivation
                                                  1. +-commutativeN/A

                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                  2. lower-+.f64N/A

                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                  3. +-commutativeN/A

                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                  4. lower-+.f64N/A

                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                  5. +-commutativeN/A

                                                    \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                  6. lower-fma.f64N/A

                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                  7. lift-log.f64N/A

                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                  8. lift--.f6498.1

                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                5. Applied rewrites98.1%

                                                  \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]

                                                if 3.4e202 < x

                                                1. Initial program 99.8%

                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                2. Add Preprocessing
                                                3. Step-by-step derivation
                                                  1. lift-+.f64N/A

                                                    \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                                  2. lift-+.f64N/A

                                                    \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                                  3. lift-+.f64N/A

                                                    \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                  4. lift-+.f64N/A

                                                    \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                  5. lift-+.f64N/A

                                                    \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                  6. lift-*.f64N/A

                                                    \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                  7. lift-log.f64N/A

                                                    \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                  8. lift--.f64N/A

                                                    \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                                  9. lift-*.f64N/A

                                                    \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                                  10. lift-log.f64N/A

                                                    \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                                  11. +-commutativeN/A

                                                    \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                  12. lift-*.f64N/A

                                                    \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                                  13. lower-fma.f64N/A

                                                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                4. Applied rewrites99.8%

                                                  \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                                5. Taylor expanded in x around inf

                                                  \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{x \cdot \log y}\right)\right) \]
                                                6. Step-by-step derivation
                                                  1. *-commutativeN/A

                                                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \log y \cdot \color{blue}{x}\right)\right) \]
                                                  2. lift-log.f64N/A

                                                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \log y \cdot x\right)\right) \]
                                                  3. lift-*.f6494.1

                                                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \log y \cdot \color{blue}{x}\right)\right) \]
                                                7. Applied rewrites94.1%

                                                  \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{\log y \cdot x}\right)\right) \]
                                                8. Taylor expanded in b around inf

                                                  \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, \log y \cdot x\right)\right) \]
                                                9. Step-by-step derivation
                                                  1. Applied rewrites94.1%

                                                    \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, \log y \cdot x\right)\right) \]
                                                10. Recombined 3 regimes into one program.
                                                11. Add Preprocessing

                                                Alternative 14: 90.7% accurate, 1.0× speedup?

                                                \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -4.4 \cdot 10^{+137}:\\ \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\ \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, \log y \cdot x\right)\right)\\ \end{array} \end{array} \]
                                                (FPCore (x y z t a b c i)
                                                 :precision binary64
                                                 (if (<= x -4.4e+137)
                                                   (+ (* (fma (/ a x) -1.0 (- (log y))) (- x)) (* y i))
                                                   (if (<= x 3.4e+202)
                                                     (+ (+ (+ (fma (log c) (- b 0.5) z) t) a) (* y i))
                                                     (fma y i (fma (log c) b (* (log y) x))))))
                                                double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                	double tmp;
                                                	if (x <= -4.4e+137) {
                                                		tmp = (fma((a / x), -1.0, -log(y)) * -x) + (y * i);
                                                	} else if (x <= 3.4e+202) {
                                                		tmp = ((fma(log(c), (b - 0.5), z) + t) + a) + (y * i);
                                                	} else {
                                                		tmp = fma(y, i, fma(log(c), b, (log(y) * x)));
                                                	}
                                                	return tmp;
                                                }
                                                
                                                function code(x, y, z, t, a, b, c, i)
                                                	tmp = 0.0
                                                	if (x <= -4.4e+137)
                                                		tmp = Float64(Float64(fma(Float64(a / x), -1.0, Float64(-log(y))) * Float64(-x)) + Float64(y * i));
                                                	elseif (x <= 3.4e+202)
                                                		tmp = Float64(Float64(Float64(fma(log(c), Float64(b - 0.5), z) + t) + a) + Float64(y * i));
                                                	else
                                                		tmp = fma(y, i, fma(log(c), b, Float64(log(y) * x)));
                                                	end
                                                	return tmp
                                                end
                                                
                                                code[x_, y_, z_, t_, a_, b_, c_, i_] := If[LessEqual[x, -4.4e+137], N[(N[(N[(N[(a / x), $MachinePrecision] * -1.0 + (-N[Log[y], $MachinePrecision])), $MachinePrecision] * (-x)), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 3.4e+202], N[(N[(N[(N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], N[(y * i + N[(N[Log[c], $MachinePrecision] * b + N[(N[Log[y], $MachinePrecision] * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
                                                
                                                \begin{array}{l}
                                                
                                                \\
                                                \begin{array}{l}
                                                \mathbf{if}\;x \leq -4.4 \cdot 10^{+137}:\\
                                                \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\
                                                
                                                \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\
                                                \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\
                                                
                                                \mathbf{else}:\\
                                                \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, \log y \cdot x\right)\right)\\
                                                
                                                
                                                \end{array}
                                                \end{array}
                                                
                                                Derivation
                                                1. Split input into 3 regimes
                                                2. if x < -4.40000000000000031e137

                                                  1. Initial program 99.8%

                                                    \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                  2. Add Preprocessing
                                                  3. Taylor expanded in x around -inf

                                                    \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)} + y \cdot i \]
                                                  4. Step-by-step derivation
                                                    1. mul-1-negN/A

                                                      \[\leadsto \left(\mathsf{neg}\left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)\right) + y \cdot i \]
                                                    2. lower-neg.f64N/A

                                                      \[\leadsto \left(-x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right) + y \cdot i \]
                                                    3. *-commutativeN/A

                                                      \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                    4. lower-*.f64N/A

                                                      \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                  5. Applied rewrites99.7%

                                                    \[\leadsto \color{blue}{\left(-\mathsf{fma}\left(\frac{\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a}{x}, -1, -\log y\right) \cdot x\right)} + y \cdot i \]
                                                  6. Taylor expanded in a around inf

                                                    \[\leadsto \left(-\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]
                                                  7. Step-by-step derivation
                                                    1. Applied rewrites72.6%

                                                      \[\leadsto \left(-\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]

                                                    if -4.40000000000000031e137 < x < 3.4e202

                                                    1. Initial program 99.9%

                                                      \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                    2. Add Preprocessing
                                                    3. Taylor expanded in x around 0

                                                      \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                    4. Step-by-step derivation
                                                      1. +-commutativeN/A

                                                        \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                      2. lower-+.f64N/A

                                                        \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                      3. +-commutativeN/A

                                                        \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                      4. lower-+.f64N/A

                                                        \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                      5. +-commutativeN/A

                                                        \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                      6. lower-fma.f64N/A

                                                        \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                      7. lift-log.f64N/A

                                                        \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                      8. lift--.f6498.1

                                                        \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                    5. Applied rewrites98.1%

                                                      \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]

                                                    if 3.4e202 < x

                                                    1. Initial program 99.8%

                                                      \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                    2. Add Preprocessing
                                                    3. Step-by-step derivation
                                                      1. lift-+.f64N/A

                                                        \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                                      2. lift-+.f64N/A

                                                        \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                                      3. lift-+.f64N/A

                                                        \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                      4. lift-+.f64N/A

                                                        \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                      5. lift-+.f64N/A

                                                        \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                      6. lift-*.f64N/A

                                                        \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                      7. lift-log.f64N/A

                                                        \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                      8. lift--.f64N/A

                                                        \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                                      9. lift-*.f64N/A

                                                        \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                                      10. lift-log.f64N/A

                                                        \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                                      11. +-commutativeN/A

                                                        \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                      12. lift-*.f64N/A

                                                        \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                                      13. lower-fma.f64N/A

                                                        \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                    4. Applied rewrites99.8%

                                                      \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                                    5. Taylor expanded in x around inf

                                                      \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \color{blue}{x \cdot \log y}\right)\right) \]
                                                    6. Step-by-step derivation
                                                      1. *-commutativeN/A

                                                        \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \log y \cdot \color{blue}{x}\right)\right) \]
                                                      2. lift-log.f64N/A

                                                        \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - \frac{1}{2}, \log y \cdot x\right)\right) \]
                                                      3. lift-*.f6494.1

                                                        \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \log y \cdot \color{blue}{x}\right)\right) \]
                                                    7. Applied rewrites94.1%

                                                      \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \color{blue}{\log y \cdot x}\right)\right) \]
                                                    8. Taylor expanded in b around inf

                                                      \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, \log y \cdot x\right)\right) \]
                                                    9. Step-by-step derivation
                                                      1. Applied rewrites94.1%

                                                        \[\leadsto \mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, \color{blue}{b}, \log y \cdot x\right)\right) \]
                                                    10. Recombined 3 regimes into one program.
                                                    11. Final simplification93.8%

                                                      \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -4.4 \cdot 10^{+137}:\\ \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\ \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b, \log y \cdot x\right)\right)\\ \end{array} \]
                                                    12. Add Preprocessing

                                                    Alternative 15: 90.7% accurate, 1.6× speedup?

                                                    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -4.4 \cdot 10^{+137} \lor \neg \left(x \leq 1.55 \cdot 10^{+190}\right):\\ \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \end{array} \end{array} \]
                                                    (FPCore (x y z t a b c i)
                                                     :precision binary64
                                                     (if (or (<= x -4.4e+137) (not (<= x 1.55e+190)))
                                                       (+ (* (fma (/ a x) -1.0 (- (log y))) (- x)) (* y i))
                                                       (+ (+ (+ (fma (log c) (- b 0.5) z) t) a) (* y i))))
                                                    double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                    	double tmp;
                                                    	if ((x <= -4.4e+137) || !(x <= 1.55e+190)) {
                                                    		tmp = (fma((a / x), -1.0, -log(y)) * -x) + (y * i);
                                                    	} else {
                                                    		tmp = ((fma(log(c), (b - 0.5), z) + t) + a) + (y * i);
                                                    	}
                                                    	return tmp;
                                                    }
                                                    
                                                    function code(x, y, z, t, a, b, c, i)
                                                    	tmp = 0.0
                                                    	if ((x <= -4.4e+137) || !(x <= 1.55e+190))
                                                    		tmp = Float64(Float64(fma(Float64(a / x), -1.0, Float64(-log(y))) * Float64(-x)) + Float64(y * i));
                                                    	else
                                                    		tmp = Float64(Float64(Float64(fma(log(c), Float64(b - 0.5), z) + t) + a) + Float64(y * i));
                                                    	end
                                                    	return tmp
                                                    end
                                                    
                                                    code[x_, y_, z_, t_, a_, b_, c_, i_] := If[Or[LessEqual[x, -4.4e+137], N[Not[LessEqual[x, 1.55e+190]], $MachinePrecision]], N[(N[(N[(N[(a / x), $MachinePrecision] * -1.0 + (-N[Log[y], $MachinePrecision])), $MachinePrecision] * (-x)), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]]
                                                    
                                                    \begin{array}{l}
                                                    
                                                    \\
                                                    \begin{array}{l}
                                                    \mathbf{if}\;x \leq -4.4 \cdot 10^{+137} \lor \neg \left(x \leq 1.55 \cdot 10^{+190}\right):\\
                                                    \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\
                                                    
                                                    \mathbf{else}:\\
                                                    \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\
                                                    
                                                    
                                                    \end{array}
                                                    \end{array}
                                                    
                                                    Derivation
                                                    1. Split input into 2 regimes
                                                    2. if x < -4.40000000000000031e137 or 1.5500000000000001e190 < x

                                                      1. Initial program 99.8%

                                                        \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                      2. Add Preprocessing
                                                      3. Taylor expanded in x around -inf

                                                        \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)} + y \cdot i \]
                                                      4. Step-by-step derivation
                                                        1. mul-1-negN/A

                                                          \[\leadsto \left(\mathsf{neg}\left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)\right) + y \cdot i \]
                                                        2. lower-neg.f64N/A

                                                          \[\leadsto \left(-x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right) + y \cdot i \]
                                                        3. *-commutativeN/A

                                                          \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                        4. lower-*.f64N/A

                                                          \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                      5. Applied rewrites99.8%

                                                        \[\leadsto \color{blue}{\left(-\mathsf{fma}\left(\frac{\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a}{x}, -1, -\log y\right) \cdot x\right)} + y \cdot i \]
                                                      6. Taylor expanded in a around inf

                                                        \[\leadsto \left(-\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]
                                                      7. Step-by-step derivation
                                                        1. Applied rewrites77.9%

                                                          \[\leadsto \left(-\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]

                                                        if -4.40000000000000031e137 < x < 1.5500000000000001e190

                                                        1. Initial program 99.9%

                                                          \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                        2. Add Preprocessing
                                                        3. Taylor expanded in x around 0

                                                          \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                        4. Step-by-step derivation
                                                          1. +-commutativeN/A

                                                            \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                          2. lower-+.f64N/A

                                                            \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                          3. +-commutativeN/A

                                                            \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                          4. lower-+.f64N/A

                                                            \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                          5. +-commutativeN/A

                                                            \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                          6. lower-fma.f64N/A

                                                            \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                          7. lift-log.f64N/A

                                                            \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                          8. lift--.f6498.6

                                                            \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                        5. Applied rewrites98.6%

                                                          \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                                      8. Recombined 2 regimes into one program.
                                                      9. Final simplification93.3%

                                                        \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -4.4 \cdot 10^{+137} \lor \neg \left(x \leq 1.55 \cdot 10^{+190}\right):\\ \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \end{array} \]
                                                      10. Add Preprocessing

                                                      Alternative 16: 90.7% accurate, 1.6× speedup?

                                                      \[\begin{array}{l} \\ \begin{array}{l} t_1 := -\log y\\ \mathbf{if}\;x \leq -4.4 \cdot 10^{+137}:\\ \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, t\_1\right) \cdot \left(-x\right) + y \cdot i\\ \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{z}{x}, -1, t\_1\right) \cdot \left(-x\right) + y \cdot i\\ \end{array} \end{array} \]
                                                      (FPCore (x y z t a b c i)
                                                       :precision binary64
                                                       (let* ((t_1 (- (log y))))
                                                         (if (<= x -4.4e+137)
                                                           (+ (* (fma (/ a x) -1.0 t_1) (- x)) (* y i))
                                                           (if (<= x 3.4e+202)
                                                             (+ (+ (+ (fma (log c) (- b 0.5) z) t) a) (* y i))
                                                             (+ (* (fma (/ z x) -1.0 t_1) (- x)) (* y i))))))
                                                      double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                      	double t_1 = -log(y);
                                                      	double tmp;
                                                      	if (x <= -4.4e+137) {
                                                      		tmp = (fma((a / x), -1.0, t_1) * -x) + (y * i);
                                                      	} else if (x <= 3.4e+202) {
                                                      		tmp = ((fma(log(c), (b - 0.5), z) + t) + a) + (y * i);
                                                      	} else {
                                                      		tmp = (fma((z / x), -1.0, t_1) * -x) + (y * i);
                                                      	}
                                                      	return tmp;
                                                      }
                                                      
                                                      function code(x, y, z, t, a, b, c, i)
                                                      	t_1 = Float64(-log(y))
                                                      	tmp = 0.0
                                                      	if (x <= -4.4e+137)
                                                      		tmp = Float64(Float64(fma(Float64(a / x), -1.0, t_1) * Float64(-x)) + Float64(y * i));
                                                      	elseif (x <= 3.4e+202)
                                                      		tmp = Float64(Float64(Float64(fma(log(c), Float64(b - 0.5), z) + t) + a) + Float64(y * i));
                                                      	else
                                                      		tmp = Float64(Float64(fma(Float64(z / x), -1.0, t_1) * Float64(-x)) + Float64(y * i));
                                                      	end
                                                      	return tmp
                                                      end
                                                      
                                                      code[x_, y_, z_, t_, a_, b_, c_, i_] := Block[{t$95$1 = (-N[Log[y], $MachinePrecision])}, If[LessEqual[x, -4.4e+137], N[(N[(N[(N[(a / x), $MachinePrecision] * -1.0 + t$95$1), $MachinePrecision] * (-x)), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 3.4e+202], N[(N[(N[(N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(z / x), $MachinePrecision] * -1.0 + t$95$1), $MachinePrecision] * (-x)), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]]]]
                                                      
                                                      \begin{array}{l}
                                                      
                                                      \\
                                                      \begin{array}{l}
                                                      t_1 := -\log y\\
                                                      \mathbf{if}\;x \leq -4.4 \cdot 10^{+137}:\\
                                                      \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, t\_1\right) \cdot \left(-x\right) + y \cdot i\\
                                                      
                                                      \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\
                                                      \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\
                                                      
                                                      \mathbf{else}:\\
                                                      \;\;\;\;\mathsf{fma}\left(\frac{z}{x}, -1, t\_1\right) \cdot \left(-x\right) + y \cdot i\\
                                                      
                                                      
                                                      \end{array}
                                                      \end{array}
                                                      
                                                      Derivation
                                                      1. Split input into 3 regimes
                                                      2. if x < -4.40000000000000031e137

                                                        1. Initial program 99.8%

                                                          \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                        2. Add Preprocessing
                                                        3. Taylor expanded in x around -inf

                                                          \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)} + y \cdot i \]
                                                        4. Step-by-step derivation
                                                          1. mul-1-negN/A

                                                            \[\leadsto \left(\mathsf{neg}\left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)\right) + y \cdot i \]
                                                          2. lower-neg.f64N/A

                                                            \[\leadsto \left(-x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right) + y \cdot i \]
                                                          3. *-commutativeN/A

                                                            \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                          4. lower-*.f64N/A

                                                            \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                        5. Applied rewrites99.7%

                                                          \[\leadsto \color{blue}{\left(-\mathsf{fma}\left(\frac{\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a}{x}, -1, -\log y\right) \cdot x\right)} + y \cdot i \]
                                                        6. Taylor expanded in a around inf

                                                          \[\leadsto \left(-\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]
                                                        7. Step-by-step derivation
                                                          1. Applied rewrites72.6%

                                                            \[\leadsto \left(-\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]

                                                          if -4.40000000000000031e137 < x < 3.4e202

                                                          1. Initial program 99.9%

                                                            \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                          2. Add Preprocessing
                                                          3. Taylor expanded in x around 0

                                                            \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                          4. Step-by-step derivation
                                                            1. +-commutativeN/A

                                                              \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                            2. lower-+.f64N/A

                                                              \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                            3. +-commutativeN/A

                                                              \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                            4. lower-+.f64N/A

                                                              \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                            5. +-commutativeN/A

                                                              \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                            6. lower-fma.f64N/A

                                                              \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                            7. lift-log.f64N/A

                                                              \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                            8. lift--.f6498.1

                                                              \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                          5. Applied rewrites98.1%

                                                            \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]

                                                          if 3.4e202 < x

                                                          1. Initial program 99.8%

                                                            \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                          2. Add Preprocessing
                                                          3. Taylor expanded in x around -inf

                                                            \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)} + y \cdot i \]
                                                          4. Step-by-step derivation
                                                            1. mul-1-negN/A

                                                              \[\leadsto \left(\mathsf{neg}\left(x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right)\right) + y \cdot i \]
                                                            2. lower-neg.f64N/A

                                                              \[\leadsto \left(-x \cdot \left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right)\right) + y \cdot i \]
                                                            3. *-commutativeN/A

                                                              \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                            4. lower-*.f64N/A

                                                              \[\leadsto \left(-\left(-1 \cdot \log y + -1 \cdot \frac{a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)}{x}\right) \cdot x\right) + y \cdot i \]
                                                          5. Applied rewrites99.8%

                                                            \[\leadsto \color{blue}{\left(-\mathsf{fma}\left(\frac{\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a}{x}, -1, -\log y\right) \cdot x\right)} + y \cdot i \]
                                                          6. Taylor expanded in z around inf

                                                            \[\leadsto \left(-\mathsf{fma}\left(\frac{z}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]
                                                          7. Step-by-step derivation
                                                            1. Applied rewrites85.0%

                                                              \[\leadsto \left(-\mathsf{fma}\left(\frac{z}{x}, -1, -\log y\right) \cdot x\right) + y \cdot i \]
                                                          8. Recombined 3 regimes into one program.
                                                          9. Final simplification92.9%

                                                            \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -4.4 \cdot 10^{+137}:\\ \;\;\;\;\mathsf{fma}\left(\frac{a}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\ \mathbf{elif}\;x \leq 3.4 \cdot 10^{+202}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{z}{x}, -1, -\log y\right) \cdot \left(-x\right) + y \cdot i\\ \end{array} \]
                                                          10. Add Preprocessing

                                                          Alternative 17: 90.2% accurate, 1.7× speedup?

                                                          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -9.6 \cdot 10^{+181} \lor \neg \left(x \leq 3.5 \cdot 10^{+202}\right):\\ \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \end{array} \end{array} \]
                                                          (FPCore (x y z t a b c i)
                                                           :precision binary64
                                                           (if (or (<= x -9.6e+181) (not (<= x 3.5e+202)))
                                                             (fma y i (* (log y) x))
                                                             (+ (+ (+ (fma (log c) (- b 0.5) z) t) a) (* y i))))
                                                          double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                          	double tmp;
                                                          	if ((x <= -9.6e+181) || !(x <= 3.5e+202)) {
                                                          		tmp = fma(y, i, (log(y) * x));
                                                          	} else {
                                                          		tmp = ((fma(log(c), (b - 0.5), z) + t) + a) + (y * i);
                                                          	}
                                                          	return tmp;
                                                          }
                                                          
                                                          function code(x, y, z, t, a, b, c, i)
                                                          	tmp = 0.0
                                                          	if ((x <= -9.6e+181) || !(x <= 3.5e+202))
                                                          		tmp = fma(y, i, Float64(log(y) * x));
                                                          	else
                                                          		tmp = Float64(Float64(Float64(fma(log(c), Float64(b - 0.5), z) + t) + a) + Float64(y * i));
                                                          	end
                                                          	return tmp
                                                          end
                                                          
                                                          code[x_, y_, z_, t_, a_, b_, c_, i_] := If[Or[LessEqual[x, -9.6e+181], N[Not[LessEqual[x, 3.5e+202]], $MachinePrecision]], N[(y * i + N[(N[Log[y], $MachinePrecision] * x), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(N[Log[c], $MachinePrecision] * N[(b - 0.5), $MachinePrecision] + z), $MachinePrecision] + t), $MachinePrecision] + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]]
                                                          
                                                          \begin{array}{l}
                                                          
                                                          \\
                                                          \begin{array}{l}
                                                          \mathbf{if}\;x \leq -9.6 \cdot 10^{+181} \lor \neg \left(x \leq 3.5 \cdot 10^{+202}\right):\\
                                                          \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\
                                                          
                                                          \mathbf{else}:\\
                                                          \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\
                                                          
                                                          
                                                          \end{array}
                                                          \end{array}
                                                          
                                                          Derivation
                                                          1. Split input into 2 regimes
                                                          2. if x < -9.60000000000000009e181 or 3.49999999999999987e202 < x

                                                            1. Initial program 99.8%

                                                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                            2. Add Preprocessing
                                                            3. Step-by-step derivation
                                                              1. lift-+.f64N/A

                                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                                              2. lift-+.f64N/A

                                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                                              3. lift-+.f64N/A

                                                                \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              4. lift-+.f64N/A

                                                                \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              5. lift-+.f64N/A

                                                                \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              6. lift-*.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              7. lift-log.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              8. lift--.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                                              9. lift-*.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                                              10. lift-log.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                                              11. +-commutativeN/A

                                                                \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                              12. lift-*.f64N/A

                                                                \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                                              13. lower-fma.f64N/A

                                                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                            4. Applied rewrites99.8%

                                                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                                            5. Taylor expanded in x around inf

                                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{x \cdot \log y}\right) \]
                                                            6. Step-by-step derivation
                                                              1. *-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              2. +-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              3. *-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              4. +-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              5. associate-+l+N/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              6. +-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{x} \cdot \log y\right) \]
                                                              7. *-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot \color{blue}{x}\right) \]
                                                              8. lift-log.f64N/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot x\right) \]
                                                              9. lift-*.f6477.7

                                                                \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot \color{blue}{x}\right) \]
                                                            7. Applied rewrites77.7%

                                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{\log y \cdot x}\right) \]

                                                            if -9.60000000000000009e181 < x < 3.49999999999999987e202

                                                            1. Initial program 99.9%

                                                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                            2. Add Preprocessing
                                                            3. Taylor expanded in x around 0

                                                              \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                            4. Step-by-step derivation
                                                              1. +-commutativeN/A

                                                                \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                              2. lower-+.f64N/A

                                                                \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                              3. +-commutativeN/A

                                                                \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                              4. lower-+.f64N/A

                                                                \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                              5. +-commutativeN/A

                                                                \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                              6. lower-fma.f64N/A

                                                                \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                              7. lift-log.f64N/A

                                                                \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                              8. lift--.f6496.6

                                                                \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                            5. Applied rewrites96.6%

                                                              \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                                          3. Recombined 2 regimes into one program.
                                                          4. Final simplification92.5%

                                                            \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -9.6 \cdot 10^{+181} \lor \neg \left(x \leq 3.5 \cdot 10^{+202}\right):\\ \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i\\ \end{array} \]
                                                          5. Add Preprocessing

                                                          Alternative 18: 76.4% accurate, 1.7× speedup?

                                                          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -9.6 \cdot 10^{+181} \lor \neg \left(x \leq 3.5 \cdot 10^{+202}\right):\\ \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(z + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\ \end{array} \end{array} \]
                                                          (FPCore (x y z t a b c i)
                                                           :precision binary64
                                                           (if (or (<= x -9.6e+181) (not (<= x 3.5e+202)))
                                                             (fma y i (* (log y) x))
                                                             (+ (+ (+ z a) (* (- b 0.5) (log c))) (* y i))))
                                                          double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                          	double tmp;
                                                          	if ((x <= -9.6e+181) || !(x <= 3.5e+202)) {
                                                          		tmp = fma(y, i, (log(y) * x));
                                                          	} else {
                                                          		tmp = ((z + a) + ((b - 0.5) * log(c))) + (y * i);
                                                          	}
                                                          	return tmp;
                                                          }
                                                          
                                                          function code(x, y, z, t, a, b, c, i)
                                                          	tmp = 0.0
                                                          	if ((x <= -9.6e+181) || !(x <= 3.5e+202))
                                                          		tmp = fma(y, i, Float64(log(y) * x));
                                                          	else
                                                          		tmp = Float64(Float64(Float64(z + a) + Float64(Float64(b - 0.5) * log(c))) + Float64(y * i));
                                                          	end
                                                          	return tmp
                                                          end
                                                          
                                                          code[x_, y_, z_, t_, a_, b_, c_, i_] := If[Or[LessEqual[x, -9.6e+181], N[Not[LessEqual[x, 3.5e+202]], $MachinePrecision]], N[(y * i + N[(N[Log[y], $MachinePrecision] * x), $MachinePrecision]), $MachinePrecision], N[(N[(N[(z + a), $MachinePrecision] + N[(N[(b - 0.5), $MachinePrecision] * N[Log[c], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]]
                                                          
                                                          \begin{array}{l}
                                                          
                                                          \\
                                                          \begin{array}{l}
                                                          \mathbf{if}\;x \leq -9.6 \cdot 10^{+181} \lor \neg \left(x \leq 3.5 \cdot 10^{+202}\right):\\
                                                          \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\
                                                          
                                                          \mathbf{else}:\\
                                                          \;\;\;\;\left(\left(z + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\
                                                          
                                                          
                                                          \end{array}
                                                          \end{array}
                                                          
                                                          Derivation
                                                          1. Split input into 2 regimes
                                                          2. if x < -9.60000000000000009e181 or 3.49999999999999987e202 < x

                                                            1. Initial program 99.8%

                                                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                            2. Add Preprocessing
                                                            3. Step-by-step derivation
                                                              1. lift-+.f64N/A

                                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                                              2. lift-+.f64N/A

                                                                \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                                              3. lift-+.f64N/A

                                                                \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              4. lift-+.f64N/A

                                                                \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              5. lift-+.f64N/A

                                                                \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              6. lift-*.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              7. lift-log.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                              8. lift--.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                                              9. lift-*.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                                              10. lift-log.f64N/A

                                                                \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                                              11. +-commutativeN/A

                                                                \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                              12. lift-*.f64N/A

                                                                \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                                              13. lower-fma.f64N/A

                                                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                            4. Applied rewrites99.8%

                                                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                                            5. Taylor expanded in x around inf

                                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{x \cdot \log y}\right) \]
                                                            6. Step-by-step derivation
                                                              1. *-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              2. +-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              3. *-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              4. +-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              5. associate-+l+N/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                              6. +-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{x} \cdot \log y\right) \]
                                                              7. *-commutativeN/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot \color{blue}{x}\right) \]
                                                              8. lift-log.f64N/A

                                                                \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot x\right) \]
                                                              9. lift-*.f6477.7

                                                                \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot \color{blue}{x}\right) \]
                                                            7. Applied rewrites77.7%

                                                              \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{\log y \cdot x}\right) \]

                                                            if -9.60000000000000009e181 < x < 3.49999999999999987e202

                                                            1. Initial program 99.9%

                                                              \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                            2. Add Preprocessing
                                                            3. Taylor expanded in z around inf

                                                              \[\leadsto \left(\left(\color{blue}{z} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                            4. Step-by-step derivation
                                                              1. Applied rewrites77.4%

                                                                \[\leadsto \left(\left(\color{blue}{z} + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                            5. Recombined 2 regimes into one program.
                                                            6. Final simplification77.5%

                                                              \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -9.6 \cdot 10^{+181} \lor \neg \left(x \leq 3.5 \cdot 10^{+202}\right):\\ \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(z + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i\\ \end{array} \]
                                                            7. Add Preprocessing

                                                            Alternative 19: 74.4% accurate, 1.9× speedup?

                                                            \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -3.1 \cdot 10^{+140} \lor \neg \left(x \leq 3.4 \cdot 10^{+202}\right):\\ \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\ \end{array} \end{array} \]
                                                            (FPCore (x y z t a b c i)
                                                             :precision binary64
                                                             (if (or (<= x -3.1e+140) (not (<= x 3.4e+202)))
                                                               (fma y i (* (log y) x))
                                                               (fma y i (+ (+ z t) a))))
                                                            double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                            	double tmp;
                                                            	if ((x <= -3.1e+140) || !(x <= 3.4e+202)) {
                                                            		tmp = fma(y, i, (log(y) * x));
                                                            	} else {
                                                            		tmp = fma(y, i, ((z + t) + a));
                                                            	}
                                                            	return tmp;
                                                            }
                                                            
                                                            function code(x, y, z, t, a, b, c, i)
                                                            	tmp = 0.0
                                                            	if ((x <= -3.1e+140) || !(x <= 3.4e+202))
                                                            		tmp = fma(y, i, Float64(log(y) * x));
                                                            	else
                                                            		tmp = fma(y, i, Float64(Float64(z + t) + a));
                                                            	end
                                                            	return tmp
                                                            end
                                                            
                                                            code[x_, y_, z_, t_, a_, b_, c_, i_] := If[Or[LessEqual[x, -3.1e+140], N[Not[LessEqual[x, 3.4e+202]], $MachinePrecision]], N[(y * i + N[(N[Log[y], $MachinePrecision] * x), $MachinePrecision]), $MachinePrecision], N[(y * i + N[(N[(z + t), $MachinePrecision] + a), $MachinePrecision]), $MachinePrecision]]
                                                            
                                                            \begin{array}{l}
                                                            
                                                            \\
                                                            \begin{array}{l}
                                                            \mathbf{if}\;x \leq -3.1 \cdot 10^{+140} \lor \neg \left(x \leq 3.4 \cdot 10^{+202}\right):\\
                                                            \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\
                                                            
                                                            \mathbf{else}:\\
                                                            \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\
                                                            
                                                            
                                                            \end{array}
                                                            \end{array}
                                                            
                                                            Derivation
                                                            1. Split input into 2 regimes
                                                            2. if x < -3.1e140 or 3.4e202 < x

                                                              1. Initial program 99.8%

                                                                \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                              2. Add Preprocessing
                                                              3. Step-by-step derivation
                                                                1. lift-+.f64N/A

                                                                  \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i} \]
                                                                2. lift-+.f64N/A

                                                                  \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} + y \cdot i \]
                                                                3. lift-+.f64N/A

                                                                  \[\leadsto \left(\color{blue}{\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right)} + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                                4. lift-+.f64N/A

                                                                  \[\leadsto \left(\left(\color{blue}{\left(\left(x \cdot \log y + z\right) + t\right)} + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                                5. lift-+.f64N/A

                                                                  \[\leadsto \left(\left(\left(\color{blue}{\left(x \cdot \log y + z\right)} + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                                6. lift-*.f64N/A

                                                                  \[\leadsto \left(\left(\left(\left(\color{blue}{x \cdot \log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                                7. lift-log.f64N/A

                                                                  \[\leadsto \left(\left(\left(\left(x \cdot \color{blue}{\log y} + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) + y \cdot i \]
                                                                8. lift--.f64N/A

                                                                  \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right)} \cdot \log c\right) + y \cdot i \]
                                                                9. lift-*.f64N/A

                                                                  \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \color{blue}{\left(b - \frac{1}{2}\right) \cdot \log c}\right) + y \cdot i \]
                                                                10. lift-log.f64N/A

                                                                  \[\leadsto \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \color{blue}{\log c}\right) + y \cdot i \]
                                                                11. +-commutativeN/A

                                                                  \[\leadsto \color{blue}{y \cdot i + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                                12. lift-*.f64N/A

                                                                  \[\leadsto \color{blue}{y \cdot i} + \left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right) \]
                                                                13. lower-fma.f64N/A

                                                                  \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - \frac{1}{2}\right) \cdot \log c\right)} \]
                                                              4. Applied rewrites99.8%

                                                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \mathsf{fma}\left(\log c, b - 0.5, \left(a + t\right) + \mathsf{fma}\left(\log y, x, z\right)\right)\right)} \]
                                                              5. Taylor expanded in x around inf

                                                                \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{x \cdot \log y}\right) \]
                                                              6. Step-by-step derivation
                                                                1. *-commutativeN/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                                2. +-commutativeN/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                                3. *-commutativeN/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                                4. +-commutativeN/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                                5. associate-+l+N/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, x \cdot \log y\right) \]
                                                                6. +-commutativeN/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{x} \cdot \log y\right) \]
                                                                7. *-commutativeN/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot \color{blue}{x}\right) \]
                                                                8. lift-log.f64N/A

                                                                  \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot x\right) \]
                                                                9. lift-*.f6475.7

                                                                  \[\leadsto \mathsf{fma}\left(y, i, \log y \cdot \color{blue}{x}\right) \]
                                                              7. Applied rewrites75.7%

                                                                \[\leadsto \mathsf{fma}\left(y, i, \color{blue}{\log y \cdot x}\right) \]

                                                              if -3.1e140 < x < 3.4e202

                                                              1. Initial program 99.9%

                                                                \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                              2. Add Preprocessing
                                                              3. Taylor expanded in x around 0

                                                                \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                              4. Step-by-step derivation
                                                                1. +-commutativeN/A

                                                                  \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                2. lower-+.f64N/A

                                                                  \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                3. +-commutativeN/A

                                                                  \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                4. lower-+.f64N/A

                                                                  \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                5. +-commutativeN/A

                                                                  \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                                6. lower-fma.f64N/A

                                                                  \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                7. lift-log.f64N/A

                                                                  \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                8. lift--.f6498.0

                                                                  \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                              5. Applied rewrites98.0%

                                                                \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                                              6. Taylor expanded in z around inf

                                                                \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                                              7. Step-by-step derivation
                                                                1. Applied rewrites80.1%

                                                                  \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                                                2. Step-by-step derivation
                                                                  1. lift-+.f64N/A

                                                                    \[\leadsto \color{blue}{\left(\left(z + t\right) + a\right) + y \cdot i} \]
                                                                  2. lift-*.f64N/A

                                                                    \[\leadsto \left(\left(z + t\right) + a\right) + \color{blue}{y \cdot i} \]
                                                                  3. +-commutativeN/A

                                                                    \[\leadsto \color{blue}{y \cdot i + \left(\left(z + t\right) + a\right)} \]
                                                                  4. lower-fma.f6480.1

                                                                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                                                3. Applied rewrites80.1%

                                                                  \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                                              8. Recombined 2 regimes into one program.
                                                              9. Final simplification79.0%

                                                                \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -3.1 \cdot 10^{+140} \lor \neg \left(x \leq 3.4 \cdot 10^{+202}\right):\\ \;\;\;\;\mathsf{fma}\left(y, i, \log y \cdot x\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\ \end{array} \]
                                                              10. Add Preprocessing

                                                              Alternative 20: 72.0% accurate, 2.0× speedup?

                                                              \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -4.2 \cdot 10^{+221} \lor \neg \left(x \leq 9 \cdot 10^{+202}\right):\\ \;\;\;\;\log y \cdot x\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\ \end{array} \end{array} \]
                                                              (FPCore (x y z t a b c i)
                                                               :precision binary64
                                                               (if (or (<= x -4.2e+221) (not (<= x 9e+202)))
                                                                 (* (log y) x)
                                                                 (fma y i (+ (+ z t) a))))
                                                              double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                              	double tmp;
                                                              	if ((x <= -4.2e+221) || !(x <= 9e+202)) {
                                                              		tmp = log(y) * x;
                                                              	} else {
                                                              		tmp = fma(y, i, ((z + t) + a));
                                                              	}
                                                              	return tmp;
                                                              }
                                                              
                                                              function code(x, y, z, t, a, b, c, i)
                                                              	tmp = 0.0
                                                              	if ((x <= -4.2e+221) || !(x <= 9e+202))
                                                              		tmp = Float64(log(y) * x);
                                                              	else
                                                              		tmp = fma(y, i, Float64(Float64(z + t) + a));
                                                              	end
                                                              	return tmp
                                                              end
                                                              
                                                              code[x_, y_, z_, t_, a_, b_, c_, i_] := If[Or[LessEqual[x, -4.2e+221], N[Not[LessEqual[x, 9e+202]], $MachinePrecision]], N[(N[Log[y], $MachinePrecision] * x), $MachinePrecision], N[(y * i + N[(N[(z + t), $MachinePrecision] + a), $MachinePrecision]), $MachinePrecision]]
                                                              
                                                              \begin{array}{l}
                                                              
                                                              \\
                                                              \begin{array}{l}
                                                              \mathbf{if}\;x \leq -4.2 \cdot 10^{+221} \lor \neg \left(x \leq 9 \cdot 10^{+202}\right):\\
                                                              \;\;\;\;\log y \cdot x\\
                                                              
                                                              \mathbf{else}:\\
                                                              \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\
                                                              
                                                              
                                                              \end{array}
                                                              \end{array}
                                                              
                                                              Derivation
                                                              1. Split input into 2 regimes
                                                              2. if x < -4.20000000000000004e221 or 8.99999999999999955e202 < x

                                                                1. Initial program 99.8%

                                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                                2. Add Preprocessing
                                                                3. Taylor expanded in x around inf

                                                                  \[\leadsto \color{blue}{x \cdot \log y} \]
                                                                4. Step-by-step derivation
                                                                  1. *-commutativeN/A

                                                                    \[\leadsto \log y \cdot \color{blue}{x} \]
                                                                  2. lower-*.f64N/A

                                                                    \[\leadsto \log y \cdot \color{blue}{x} \]
                                                                  3. lift-log.f6472.8

                                                                    \[\leadsto \log y \cdot x \]
                                                                5. Applied rewrites72.8%

                                                                  \[\leadsto \color{blue}{\log y \cdot x} \]

                                                                if -4.20000000000000004e221 < x < 8.99999999999999955e202

                                                                1. Initial program 99.9%

                                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                                2. Add Preprocessing
                                                                3. Taylor expanded in x around 0

                                                                  \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                                4. Step-by-step derivation
                                                                  1. +-commutativeN/A

                                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                  2. lower-+.f64N/A

                                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                  3. +-commutativeN/A

                                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                  4. lower-+.f64N/A

                                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                  5. +-commutativeN/A

                                                                    \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                                  6. lower-fma.f64N/A

                                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                  7. lift-log.f64N/A

                                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                  8. lift--.f6494.2

                                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                                5. Applied rewrites94.2%

                                                                  \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                                                6. Taylor expanded in z around inf

                                                                  \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                                                7. Step-by-step derivation
                                                                  1. Applied rewrites78.0%

                                                                    \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                                                  2. Step-by-step derivation
                                                                    1. lift-+.f64N/A

                                                                      \[\leadsto \color{blue}{\left(\left(z + t\right) + a\right) + y \cdot i} \]
                                                                    2. lift-*.f64N/A

                                                                      \[\leadsto \left(\left(z + t\right) + a\right) + \color{blue}{y \cdot i} \]
                                                                    3. +-commutativeN/A

                                                                      \[\leadsto \color{blue}{y \cdot i + \left(\left(z + t\right) + a\right)} \]
                                                                    4. lower-fma.f6478.0

                                                                      \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                                                  3. Applied rewrites78.0%

                                                                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                                                8. Recombined 2 regimes into one program.
                                                                9. Final simplification77.1%

                                                                  \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -4.2 \cdot 10^{+221} \lor \neg \left(x \leq 9 \cdot 10^{+202}\right):\\ \;\;\;\;\log y \cdot x\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)\\ \end{array} \]
                                                                10. Add Preprocessing

                                                                Alternative 21: 67.5% accurate, 18.0× speedup?

                                                                \[\begin{array}{l} \\ \mathsf{fma}\left(y, i, \left(z + t\right) + a\right) \end{array} \]
                                                                (FPCore (x y z t a b c i) :precision binary64 (fma y i (+ (+ z t) a)))
                                                                double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                                	return fma(y, i, ((z + t) + a));
                                                                }
                                                                
                                                                function code(x, y, z, t, a, b, c, i)
                                                                	return fma(y, i, Float64(Float64(z + t) + a))
                                                                end
                                                                
                                                                code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(y * i + N[(N[(z + t), $MachinePrecision] + a), $MachinePrecision]), $MachinePrecision]
                                                                
                                                                \begin{array}{l}
                                                                
                                                                \\
                                                                \mathsf{fma}\left(y, i, \left(z + t\right) + a\right)
                                                                \end{array}
                                                                
                                                                Derivation
                                                                1. Initial program 99.9%

                                                                  \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                                2. Add Preprocessing
                                                                3. Taylor expanded in x around 0

                                                                  \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                                4. Step-by-step derivation
                                                                  1. +-commutativeN/A

                                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                  2. lower-+.f64N/A

                                                                    \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                  3. +-commutativeN/A

                                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                  4. lower-+.f64N/A

                                                                    \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                  5. +-commutativeN/A

                                                                    \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                                  6. lower-fma.f64N/A

                                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                  7. lift-log.f64N/A

                                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                  8. lift--.f6483.2

                                                                    \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                                5. Applied rewrites83.2%

                                                                  \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                                                6. Taylor expanded in z around inf

                                                                  \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                                                7. Step-by-step derivation
                                                                  1. Applied rewrites67.5%

                                                                    \[\leadsto \left(\left(z + t\right) + a\right) + y \cdot i \]
                                                                  2. Step-by-step derivation
                                                                    1. lift-+.f64N/A

                                                                      \[\leadsto \color{blue}{\left(\left(z + t\right) + a\right) + y \cdot i} \]
                                                                    2. lift-*.f64N/A

                                                                      \[\leadsto \left(\left(z + t\right) + a\right) + \color{blue}{y \cdot i} \]
                                                                    3. +-commutativeN/A

                                                                      \[\leadsto \color{blue}{y \cdot i + \left(\left(z + t\right) + a\right)} \]
                                                                    4. lower-fma.f6467.5

                                                                      \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                                                  3. Applied rewrites67.5%

                                                                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, i, \left(z + t\right) + a\right)} \]
                                                                  4. Add Preprocessing

                                                                  Alternative 22: 53.0% accurate, 19.5× speedup?

                                                                  \[\begin{array}{l} \\ \left(z + a\right) + y \cdot i \end{array} \]
                                                                  (FPCore (x y z t a b c i) :precision binary64 (+ (+ z a) (* y i)))
                                                                  double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                                  	return (z + a) + (y * i);
                                                                  }
                                                                  
                                                                  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(x, y, z, t, a, b, c, i)
                                                                  use fmin_fmax_functions
                                                                      real(8), intent (in) :: x
                                                                      real(8), intent (in) :: y
                                                                      real(8), intent (in) :: z
                                                                      real(8), intent (in) :: t
                                                                      real(8), intent (in) :: a
                                                                      real(8), intent (in) :: b
                                                                      real(8), intent (in) :: c
                                                                      real(8), intent (in) :: i
                                                                      code = (z + a) + (y * i)
                                                                  end function
                                                                  
                                                                  public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                                  	return (z + a) + (y * i);
                                                                  }
                                                                  
                                                                  def code(x, y, z, t, a, b, c, i):
                                                                  	return (z + a) + (y * i)
                                                                  
                                                                  function code(x, y, z, t, a, b, c, i)
                                                                  	return Float64(Float64(z + a) + Float64(y * i))
                                                                  end
                                                                  
                                                                  function tmp = code(x, y, z, t, a, b, c, i)
                                                                  	tmp = (z + a) + (y * i);
                                                                  end
                                                                  
                                                                  code[x_, y_, z_, t_, a_, b_, c_, i_] := N[(N[(z + a), $MachinePrecision] + N[(y * i), $MachinePrecision]), $MachinePrecision]
                                                                  
                                                                  \begin{array}{l}
                                                                  
                                                                  \\
                                                                  \left(z + a\right) + y \cdot i
                                                                  \end{array}
                                                                  
                                                                  Derivation
                                                                  1. Initial program 99.9%

                                                                    \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                                  2. Add Preprocessing
                                                                  3. Taylor expanded in x around 0

                                                                    \[\leadsto \color{blue}{\left(a + \left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right)\right)} + y \cdot i \]
                                                                  4. Step-by-step derivation
                                                                    1. +-commutativeN/A

                                                                      \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                    2. lower-+.f64N/A

                                                                      \[\leadsto \left(\left(t + \left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right)\right) + \color{blue}{a}\right) + y \cdot i \]
                                                                    3. +-commutativeN/A

                                                                      \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                    4. lower-+.f64N/A

                                                                      \[\leadsto \left(\left(\left(z + \log c \cdot \left(b - \frac{1}{2}\right)\right) + t\right) + a\right) + y \cdot i \]
                                                                    5. +-commutativeN/A

                                                                      \[\leadsto \left(\left(\left(\log c \cdot \left(b - \frac{1}{2}\right) + z\right) + t\right) + a\right) + y \cdot i \]
                                                                    6. lower-fma.f64N/A

                                                                      \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                    7. lift-log.f64N/A

                                                                      \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - \frac{1}{2}, z\right) + t\right) + a\right) + y \cdot i \]
                                                                    8. lift--.f6483.2

                                                                      \[\leadsto \left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right) + y \cdot i \]
                                                                  5. Applied rewrites83.2%

                                                                    \[\leadsto \color{blue}{\left(\left(\mathsf{fma}\left(\log c, b - 0.5, z\right) + t\right) + a\right)} + y \cdot i \]
                                                                  6. Taylor expanded in z around inf

                                                                    \[\leadsto \left(z + a\right) + y \cdot i \]
                                                                  7. Step-by-step derivation
                                                                    1. Applied rewrites51.6%

                                                                      \[\leadsto \left(z + a\right) + y \cdot i \]
                                                                    2. Add Preprocessing

                                                                    Alternative 23: 16.3% accurate, 234.0× speedup?

                                                                    \[\begin{array}{l} \\ a \end{array} \]
                                                                    (FPCore (x y z t a b c i) :precision binary64 a)
                                                                    double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                                    	return a;
                                                                    }
                                                                    
                                                                    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(x, y, z, t, a, b, c, i)
                                                                    use fmin_fmax_functions
                                                                        real(8), intent (in) :: x
                                                                        real(8), intent (in) :: y
                                                                        real(8), intent (in) :: z
                                                                        real(8), intent (in) :: t
                                                                        real(8), intent (in) :: a
                                                                        real(8), intent (in) :: b
                                                                        real(8), intent (in) :: c
                                                                        real(8), intent (in) :: i
                                                                        code = a
                                                                    end function
                                                                    
                                                                    public static double code(double x, double y, double z, double t, double a, double b, double c, double i) {
                                                                    	return a;
                                                                    }
                                                                    
                                                                    def code(x, y, z, t, a, b, c, i):
                                                                    	return a
                                                                    
                                                                    function code(x, y, z, t, a, b, c, i)
                                                                    	return a
                                                                    end
                                                                    
                                                                    function tmp = code(x, y, z, t, a, b, c, i)
                                                                    	tmp = a;
                                                                    end
                                                                    
                                                                    code[x_, y_, z_, t_, a_, b_, c_, i_] := a
                                                                    
                                                                    \begin{array}{l}
                                                                    
                                                                    \\
                                                                    a
                                                                    \end{array}
                                                                    
                                                                    Derivation
                                                                    1. Initial program 99.9%

                                                                      \[\left(\left(\left(\left(x \cdot \log y + z\right) + t\right) + a\right) + \left(b - 0.5\right) \cdot \log c\right) + y \cdot i \]
                                                                    2. Add Preprocessing
                                                                    3. Taylor expanded in a around inf

                                                                      \[\leadsto \color{blue}{a} \]
                                                                    4. Step-by-step derivation
                                                                      1. Applied rewrites16.4%

                                                                        \[\leadsto \color{blue}{a} \]
                                                                      2. Add Preprocessing

                                                                      Reproduce

                                                                      ?
                                                                      herbie shell --seed 2025051 
                                                                      (FPCore (x y z t a b c i)
                                                                        :name "Numeric.SpecFunctions:logBeta from math-functions-0.1.5.2, B"
                                                                        :precision binary64
                                                                        (+ (+ (+ (+ (+ (* x (log y)) z) t) a) (* (- b 0.5) (log c))) (* y i)))