Numeric.SpecFunctions:$slogFactorial from math-functions-0.1.5.2, B

Percentage Accurate: 93.5% → 98.7%
Time: 12.4s
Alternatives: 15
Speedup: 1.0×

Specification

?
\[\begin{array}{l} \\ \left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (+
  (+ (- (* (- x 0.5) (log x)) x) 0.91893853320467)
  (/
   (+
    (* (- (* (+ y 0.0007936500793651) z) 0.0027777777777778) z)
    0.083333333333333)
   x)))
double code(double x, double y, double z) {
	return ((((x - 0.5) * log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x);
}
real(8) function code(x, y, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = ((((x - 0.5d0) * log(x)) - x) + 0.91893853320467d0) + ((((((y + 0.0007936500793651d0) * z) - 0.0027777777777778d0) * z) + 0.083333333333333d0) / x)
end function
public static double code(double x, double y, double z) {
	return ((((x - 0.5) * Math.log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x);
}
def code(x, y, z):
	return ((((x - 0.5) * math.log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x)
function code(x, y, z)
	return Float64(Float64(Float64(Float64(Float64(x - 0.5) * log(x)) - x) + 0.91893853320467) + Float64(Float64(Float64(Float64(Float64(Float64(y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x))
end
function tmp = code(x, y, z)
	tmp = ((((x - 0.5) * log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x);
end
code[x_, y_, z_] := N[(N[(N[(N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision]), $MachinePrecision] - x), $MachinePrecision] + 0.91893853320467), $MachinePrecision] + N[(N[(N[(N[(N[(N[(y + 0.0007936500793651), $MachinePrecision] * z), $MachinePrecision] - 0.0027777777777778), $MachinePrecision] * z), $MachinePrecision] + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x}
\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 15 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: 93.5% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (+
  (+ (- (* (- x 0.5) (log x)) x) 0.91893853320467)
  (/
   (+
    (* (- (* (+ y 0.0007936500793651) z) 0.0027777777777778) z)
    0.083333333333333)
   x)))
double code(double x, double y, double z) {
	return ((((x - 0.5) * log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x);
}
real(8) function code(x, y, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = ((((x - 0.5d0) * log(x)) - x) + 0.91893853320467d0) + ((((((y + 0.0007936500793651d0) * z) - 0.0027777777777778d0) * z) + 0.083333333333333d0) / x)
end function
public static double code(double x, double y, double z) {
	return ((((x - 0.5) * Math.log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x);
}
def code(x, y, z):
	return ((((x - 0.5) * math.log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x)
function code(x, y, z)
	return Float64(Float64(Float64(Float64(Float64(x - 0.5) * log(x)) - x) + 0.91893853320467) + Float64(Float64(Float64(Float64(Float64(Float64(y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x))
end
function tmp = code(x, y, z)
	tmp = ((((x - 0.5) * log(x)) - x) + 0.91893853320467) + ((((((y + 0.0007936500793651) * z) - 0.0027777777777778) * z) + 0.083333333333333) / x);
end
code[x_, y_, z_] := N[(N[(N[(N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision]), $MachinePrecision] - x), $MachinePrecision] + 0.91893853320467), $MachinePrecision] + N[(N[(N[(N[(N[(N[(y + 0.0007936500793651), $MachinePrecision] * z), $MachinePrecision] - 0.0027777777777778), $MachinePrecision] * z), $MachinePrecision] + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x}
\end{array}

Alternative 1: 98.7% accurate, 0.5× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 8 \cdot 10^{-20}:\\ \;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(\frac{-\log x}{x}, 0.5, \frac{0.083333333333333}{x \cdot x} + \mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right)\right) + \log x, x, -x\right)\\ \end{array} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (if (<= x 8e-20)
   (+
    (/
     (+
      0.083333333333333
      (* (- (* z (+ 0.0007936500793651 y)) 0.0027777777777778) z))
     x)
    (fma (log x) -0.5 0.91893853320467))
   (fma
    (+
     (fma
      (/ (- (log x)) x)
      0.5
      (+
       (/ 0.083333333333333 (* x x))
       (fma
        (/ (fma (+ 0.0007936500793651 y) z -0.0027777777777778) x)
        (/ z x)
        (/ 0.91893853320467 x))))
     (log x))
    x
    (- x))))
double code(double x, double y, double z) {
	double tmp;
	if (x <= 8e-20) {
		tmp = ((0.083333333333333 + (((z * (0.0007936500793651 + y)) - 0.0027777777777778) * z)) / x) + fma(log(x), -0.5, 0.91893853320467);
	} else {
		tmp = fma((fma((-log(x) / x), 0.5, ((0.083333333333333 / (x * x)) + fma((fma((0.0007936500793651 + y), z, -0.0027777777777778) / x), (z / x), (0.91893853320467 / x)))) + log(x)), x, -x);
	}
	return tmp;
}
function code(x, y, z)
	tmp = 0.0
	if (x <= 8e-20)
		tmp = Float64(Float64(Float64(0.083333333333333 + Float64(Float64(Float64(z * Float64(0.0007936500793651 + y)) - 0.0027777777777778) * z)) / x) + fma(log(x), -0.5, 0.91893853320467));
	else
		tmp = fma(Float64(fma(Float64(Float64(-log(x)) / x), 0.5, Float64(Float64(0.083333333333333 / Float64(x * x)) + fma(Float64(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778) / x), Float64(z / x), Float64(0.91893853320467 / x)))) + log(x)), x, Float64(-x));
	end
	return tmp
end
code[x_, y_, z_] := If[LessEqual[x, 8e-20], N[(N[(N[(0.083333333333333 + N[(N[(N[(z * N[(0.0007936500793651 + y), $MachinePrecision]), $MachinePrecision] - 0.0027777777777778), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision] / x), $MachinePrecision] + N[(N[Log[x], $MachinePrecision] * -0.5 + 0.91893853320467), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[((-N[Log[x], $MachinePrecision]) / x), $MachinePrecision] * 0.5 + N[(N[(0.083333333333333 / N[(x * x), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] / x), $MachinePrecision] * N[(z / x), $MachinePrecision] + N[(0.91893853320467 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[Log[x], $MachinePrecision]), $MachinePrecision] * x + (-x)), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 8 \cdot 10^{-20}:\\
\;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\

\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(\frac{-\log x}{x}, 0.5, \frac{0.083333333333333}{x \cdot x} + \mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right)\right) + \log x, x, -x\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if x < 7.99999999999999956e-20

    1. Initial program 99.7%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\left(\frac{91893853320467}{100000000000000} + \frac{-1}{2} \cdot \log x\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
    4. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \color{blue}{\left(\frac{-1}{2} \cdot \log x + \frac{91893853320467}{100000000000000}\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      2. *-commutativeN/A

        \[\leadsto \left(\color{blue}{\log x \cdot \frac{-1}{2}} + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      3. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, \frac{-1}{2}, \frac{91893853320467}{100000000000000}\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      4. lower-log.f6499.7

        \[\leadsto \mathsf{fma}\left(\color{blue}{\log x}, -0.5, 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    5. Applied rewrites99.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)} + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]

    if 7.99999999999999956e-20 < x

    1. Initial program 89.1%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\left(-1 \cdot \log \left(\frac{1}{x}\right) + \left(\frac{1}{2} \cdot \frac{\log \left(\frac{1}{x}\right)}{x} + \left(\frac{\frac{83333333333333}{1000000000000000}}{{x}^{2}} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{x} + \frac{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{{x}^{2}}\right)\right)\right)\right) - 1\right)} \]
    4. Applied rewrites98.4%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{-\log x}{x}, 0.5, \mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right) + \frac{0.083333333333333}{x \cdot x}\right) + \log x, x, -x\right)} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification99.0%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 8 \cdot 10^{-20}:\\ \;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(\frac{-\log x}{x}, 0.5, \frac{0.083333333333333}{x \cdot x} + \mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right)\right) + \log x, x, -x\right)\\ \end{array} \]
  5. Add Preprocessing

Alternative 2: 98.7% accurate, 0.8× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 5.5 \cdot 10^{-18}:\\ \;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \mathsf{fma}\left(\frac{0.083333333333333}{x \cdot x} + \mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right), x, -x\right)\right)\\ \end{array} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (if (<= x 5.5e-18)
   (+
    (/
     (+
      0.083333333333333
      (* (- (* z (+ 0.0007936500793651 y)) 0.0027777777777778) z))
     x)
    (fma (log x) -0.5 0.91893853320467))
   (fma
    (- x 0.5)
    (log x)
    (fma
     (+
      (/ 0.083333333333333 (* x x))
      (fma
       (/ (fma (+ 0.0007936500793651 y) z -0.0027777777777778) x)
       (/ z x)
       (/ 0.91893853320467 x)))
     x
     (- x)))))
double code(double x, double y, double z) {
	double tmp;
	if (x <= 5.5e-18) {
		tmp = ((0.083333333333333 + (((z * (0.0007936500793651 + y)) - 0.0027777777777778) * z)) / x) + fma(log(x), -0.5, 0.91893853320467);
	} else {
		tmp = fma((x - 0.5), log(x), fma(((0.083333333333333 / (x * x)) + fma((fma((0.0007936500793651 + y), z, -0.0027777777777778) / x), (z / x), (0.91893853320467 / x))), x, -x));
	}
	return tmp;
}
function code(x, y, z)
	tmp = 0.0
	if (x <= 5.5e-18)
		tmp = Float64(Float64(Float64(0.083333333333333 + Float64(Float64(Float64(z * Float64(0.0007936500793651 + y)) - 0.0027777777777778) * z)) / x) + fma(log(x), -0.5, 0.91893853320467));
	else
		tmp = fma(Float64(x - 0.5), log(x), fma(Float64(Float64(0.083333333333333 / Float64(x * x)) + fma(Float64(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778) / x), Float64(z / x), Float64(0.91893853320467 / x))), x, Float64(-x)));
	end
	return tmp
end
code[x_, y_, z_] := If[LessEqual[x, 5.5e-18], N[(N[(N[(0.083333333333333 + N[(N[(N[(z * N[(0.0007936500793651 + y), $MachinePrecision]), $MachinePrecision] - 0.0027777777777778), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision] / x), $MachinePrecision] + N[(N[Log[x], $MachinePrecision] * -0.5 + 0.91893853320467), $MachinePrecision]), $MachinePrecision], N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision] + N[(N[(N[(0.083333333333333 / N[(x * x), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] / x), $MachinePrecision] * N[(z / x), $MachinePrecision] + N[(0.91893853320467 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * x + (-x)), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 5.5 \cdot 10^{-18}:\\
\;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\

\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \mathsf{fma}\left(\frac{0.083333333333333}{x \cdot x} + \mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right), x, -x\right)\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if x < 5.5e-18

    1. Initial program 99.7%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\left(\frac{91893853320467}{100000000000000} + \frac{-1}{2} \cdot \log x\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
    4. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \color{blue}{\left(\frac{-1}{2} \cdot \log x + \frac{91893853320467}{100000000000000}\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      2. *-commutativeN/A

        \[\leadsto \left(\color{blue}{\log x \cdot \frac{-1}{2}} + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      3. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, \frac{-1}{2}, \frac{91893853320467}{100000000000000}\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      4. lower-log.f6499.7

        \[\leadsto \mathsf{fma}\left(\color{blue}{\log x}, -0.5, 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    5. Applied rewrites99.7%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)} + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]

    if 5.5e-18 < x

    1. Initial program 88.9%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      3. lift-/.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      4. div-invN/A

        \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      6. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      7. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      8. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      9. lift--.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      10. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      11. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      14. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      15. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      16. lower-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      17. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      18. inv-powN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      19. lower-pow.f6488.9

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
    4. Applied rewrites89.1%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
    5. Step-by-step derivation
      1. lift-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} + \mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1}} \]
      3. lift-fma.f64N/A

        \[\leadsto \color{blue}{\left(\log x \cdot \left(x - \frac{1}{2}\right) + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      4. *-commutativeN/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      5. lift-*.f64N/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      6. *-commutativeN/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)} \]
      7. lift-pow.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      8. unpow-1N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{x}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      9. associate-/r/N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      10. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \frac{1}{\color{blue}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      11. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      12. associate-+l+N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      13. lift-*.f64N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right) \]
      14. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(x - \frac{1}{2}, \log x, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      15. lower-+.f6489.1

        \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \color{blue}{\mathsf{fma}\left(-1, x, 0.91893853320467\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right)}}}\right) \]
    6. Applied rewrites89.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\mathsf{fma}\left(\mathsf{fma}\left(y + 0.0007936500793651, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\right)} \]
    7. Taylor expanded in x around inf

      \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \color{blue}{x \cdot \left(\left(\frac{\frac{83333333333333}{1000000000000000}}{{x}^{2}} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{x} + \frac{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{{x}^{2}}\right)\right) - 1\right)}\right) \]
    8. Step-by-step derivation
      1. sub-negN/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, x \cdot \color{blue}{\left(\left(\frac{\frac{83333333333333}{1000000000000000}}{{x}^{2}} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{x} + \frac{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{{x}^{2}}\right)\right) + \left(\mathsf{neg}\left(1\right)\right)\right)}\right) \]
      2. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, x \cdot \left(\left(\frac{\frac{83333333333333}{1000000000000000}}{{x}^{2}} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{x} + \frac{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{{x}^{2}}\right)\right) + \color{blue}{-1}\right)\right) \]
      3. distribute-rgt-inN/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \color{blue}{\left(\frac{\frac{83333333333333}{1000000000000000}}{{x}^{2}} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{x} + \frac{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{{x}^{2}}\right)\right) \cdot x + -1 \cdot x}\right) \]
      4. mul-1-negN/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{\frac{83333333333333}{1000000000000000}}{{x}^{2}} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{x} + \frac{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{{x}^{2}}\right)\right) \cdot x + \color{blue}{\left(\mathsf{neg}\left(x\right)\right)}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \color{blue}{\mathsf{fma}\left(\frac{\frac{83333333333333}{1000000000000000}}{{x}^{2}} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{x} + \frac{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{{x}^{2}}\right), x, \mathsf{neg}\left(x\right)\right)}\right) \]
    9. Applied rewrites98.3%

      \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right) + \frac{0.083333333333333}{x \cdot x}, x, -x\right)}\right) \]
  3. Recombined 2 regimes into one program.
  4. Final simplification99.0%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 5.5 \cdot 10^{-18}:\\ \;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \mathsf{fma}\left(\frac{0.083333333333333}{x \cdot x} + \mathsf{fma}\left(\frac{\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right)}{x}, \frac{z}{x}, \frac{0.91893853320467}{x}\right), x, -x\right)\right)\\ \end{array} \]
  5. Add Preprocessing

Alternative 3: 90.8% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 16200000:\\ \;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\ \mathbf{elif}\;x \leq 2.9 \cdot 10^{+208}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\left(z \cdot z\right) \cdot y}{x} + \left(0.91893853320467 - x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\log x - 1\right) \cdot x\\ \end{array} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (if (<= x 16200000.0)
   (+
    (/
     (+
      0.083333333333333
      (* (- (* z (+ 0.0007936500793651 y)) 0.0027777777777778) z))
     x)
    (fma (log x) -0.5 0.91893853320467))
   (if (<= x 2.9e+208)
     (fma (- x 0.5) (log x) (+ (/ (* (* z z) y) x) (- 0.91893853320467 x)))
     (* (- (log x) 1.0) x))))
double code(double x, double y, double z) {
	double tmp;
	if (x <= 16200000.0) {
		tmp = ((0.083333333333333 + (((z * (0.0007936500793651 + y)) - 0.0027777777777778) * z)) / x) + fma(log(x), -0.5, 0.91893853320467);
	} else if (x <= 2.9e+208) {
		tmp = fma((x - 0.5), log(x), ((((z * z) * y) / x) + (0.91893853320467 - x)));
	} else {
		tmp = (log(x) - 1.0) * x;
	}
	return tmp;
}
function code(x, y, z)
	tmp = 0.0
	if (x <= 16200000.0)
		tmp = Float64(Float64(Float64(0.083333333333333 + Float64(Float64(Float64(z * Float64(0.0007936500793651 + y)) - 0.0027777777777778) * z)) / x) + fma(log(x), -0.5, 0.91893853320467));
	elseif (x <= 2.9e+208)
		tmp = fma(Float64(x - 0.5), log(x), Float64(Float64(Float64(Float64(z * z) * y) / x) + Float64(0.91893853320467 - x)));
	else
		tmp = Float64(Float64(log(x) - 1.0) * x);
	end
	return tmp
end
code[x_, y_, z_] := If[LessEqual[x, 16200000.0], N[(N[(N[(0.083333333333333 + N[(N[(N[(z * N[(0.0007936500793651 + y), $MachinePrecision]), $MachinePrecision] - 0.0027777777777778), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision] / x), $MachinePrecision] + N[(N[Log[x], $MachinePrecision] * -0.5 + 0.91893853320467), $MachinePrecision]), $MachinePrecision], If[LessEqual[x, 2.9e+208], N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision] + N[(N[(N[(N[(z * z), $MachinePrecision] * y), $MachinePrecision] / x), $MachinePrecision] + N[(0.91893853320467 - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[Log[x], $MachinePrecision] - 1.0), $MachinePrecision] * x), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 16200000:\\
\;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\

\mathbf{elif}\;x \leq 2.9 \cdot 10^{+208}:\\
\;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\left(z \cdot z\right) \cdot y}{x} + \left(0.91893853320467 - x\right)\right)\\

\mathbf{else}:\\
\;\;\;\;\left(\log x - 1\right) \cdot x\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if x < 1.62e7

    1. Initial program 99.7%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\left(\frac{91893853320467}{100000000000000} + \frac{-1}{2} \cdot \log x\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
    4. Step-by-step derivation
      1. +-commutativeN/A

        \[\leadsto \color{blue}{\left(\frac{-1}{2} \cdot \log x + \frac{91893853320467}{100000000000000}\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      2. *-commutativeN/A

        \[\leadsto \left(\color{blue}{\log x \cdot \frac{-1}{2}} + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      3. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, \frac{-1}{2}, \frac{91893853320467}{100000000000000}\right)} + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} \]
      4. lower-log.f6499.2

        \[\leadsto \mathsf{fma}\left(\color{blue}{\log x}, -0.5, 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    5. Applied rewrites99.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)} + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]

    if 1.62e7 < x < 2.90000000000000008e208

    1. Initial program 90.9%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      3. lift-/.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      4. div-invN/A

        \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      6. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      7. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      8. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      9. lift--.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      10. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      11. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      14. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      15. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      16. lower-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      17. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      18. inv-powN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      19. lower-pow.f6490.9

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
    4. Applied rewrites91.0%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
    5. Step-by-step derivation
      1. lift-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} + \mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1}} \]
      3. lift-fma.f64N/A

        \[\leadsto \color{blue}{\left(\log x \cdot \left(x - \frac{1}{2}\right) + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      4. *-commutativeN/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      5. lift-*.f64N/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      6. *-commutativeN/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)} \]
      7. lift-pow.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      8. unpow-1N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{x}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      9. associate-/r/N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      10. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \frac{1}{\color{blue}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      11. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      12. associate-+l+N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      13. lift-*.f64N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right) \]
      14. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(x - \frac{1}{2}, \log x, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      15. lower-+.f6491.0

        \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \color{blue}{\mathsf{fma}\left(-1, x, 0.91893853320467\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right)}}}\right) \]
    6. Applied rewrites91.0%

      \[\leadsto \color{blue}{\mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\mathsf{fma}\left(\mathsf{fma}\left(y + 0.0007936500793651, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\right)} \]
    7. Taylor expanded in y around inf

      \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{y \cdot {z}^{2}}}{x}\right) \]
    8. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{{z}^{2} \cdot y}}{x}\right) \]
      2. lower-*.f64N/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{{z}^{2} \cdot y}}{x}\right) \]
      3. unpow2N/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x}\right) \]
      4. lower-*.f6488.4

        \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x}\right) \]
    9. Applied rewrites88.4%

      \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\color{blue}{\left(z \cdot z\right) \cdot y}}{x}\right) \]

    if 2.90000000000000008e208 < x

    1. Initial program 82.8%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      3. lift-/.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      4. div-invN/A

        \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      6. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      7. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      8. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      9. lift--.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      10. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      11. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      14. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      15. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      16. lower-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      17. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      18. inv-powN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      19. lower-pow.f6482.8

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
    4. Applied rewrites83.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
    5. Taylor expanded in x around inf

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

        \[\leadsto \color{blue}{\left(-1 \cdot \log \left(\frac{1}{x}\right) - 1\right) \cdot x} \]
      2. mul-1-negN/A

        \[\leadsto \left(\color{blue}{\left(\mathsf{neg}\left(\log \left(\frac{1}{x}\right)\right)\right)} - 1\right) \cdot x \]
      3. log-recN/A

        \[\leadsto \left(\left(\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(\log x\right)\right)}\right)\right) - 1\right) \cdot x \]
      4. remove-double-negN/A

        \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
      5. lower-*.f64N/A

        \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
      6. lower--.f64N/A

        \[\leadsto \color{blue}{\left(\log x - 1\right)} \cdot x \]
      7. lower-log.f6499.8

        \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
    7. Applied rewrites99.8%

      \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification95.7%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 16200000:\\ \;\;\;\;\frac{0.083333333333333 + \left(z \cdot \left(0.0007936500793651 + y\right) - 0.0027777777777778\right) \cdot z}{x} + \mathsf{fma}\left(\log x, -0.5, 0.91893853320467\right)\\ \mathbf{elif}\;x \leq 2.9 \cdot 10^{+208}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\left(z \cdot z\right) \cdot y}{x} + \left(0.91893853320467 - x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\log x - 1\right) \cdot x\\ \end{array} \]
  5. Add Preprocessing

Alternative 4: 90.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 16200000:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{elif}\;x \leq 2.9 \cdot 10^{+208}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\left(z \cdot z\right) \cdot y}{x} + \left(0.91893853320467 - x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\log x - 1\right) \cdot x\\ \end{array} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (if (<= x 16200000.0)
   (/
    (fma
     (fma (+ 0.0007936500793651 y) z -0.0027777777777778)
     z
     0.083333333333333)
    x)
   (if (<= x 2.9e+208)
     (fma (- x 0.5) (log x) (+ (/ (* (* z z) y) x) (- 0.91893853320467 x)))
     (* (- (log x) 1.0) x))))
double code(double x, double y, double z) {
	double tmp;
	if (x <= 16200000.0) {
		tmp = fma(fma((0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x;
	} else if (x <= 2.9e+208) {
		tmp = fma((x - 0.5), log(x), ((((z * z) * y) / x) + (0.91893853320467 - x)));
	} else {
		tmp = (log(x) - 1.0) * x;
	}
	return tmp;
}
function code(x, y, z)
	tmp = 0.0
	if (x <= 16200000.0)
		tmp = Float64(fma(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x);
	elseif (x <= 2.9e+208)
		tmp = fma(Float64(x - 0.5), log(x), Float64(Float64(Float64(Float64(z * z) * y) / x) + Float64(0.91893853320467 - x)));
	else
		tmp = Float64(Float64(log(x) - 1.0) * x);
	end
	return tmp
end
code[x_, y_, z_] := If[LessEqual[x, 16200000.0], N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] * z + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision], If[LessEqual[x, 2.9e+208], N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision] + N[(N[(N[(N[(z * z), $MachinePrecision] * y), $MachinePrecision] / x), $MachinePrecision] + N[(0.91893853320467 - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[Log[x], $MachinePrecision] - 1.0), $MachinePrecision] * x), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 16200000:\\
\;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\

\mathbf{elif}\;x \leq 2.9 \cdot 10^{+208}:\\
\;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\left(z \cdot z\right) \cdot y}{x} + \left(0.91893853320467 - x\right)\right)\\

\mathbf{else}:\\
\;\;\;\;\left(\log x - 1\right) \cdot x\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if x < 1.62e7

    1. Initial program 99.7%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
    4. Step-by-step derivation
      1. lower-/.f64N/A

        \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \frac{\color{blue}{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) + \frac{83333333333333}{1000000000000000}}}{x} \]
      3. *-commutativeN/A

        \[\leadsto \frac{\color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}}{x} \]
      4. lower-fma.f64N/A

        \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}}{x} \]
      5. sub-negN/A

        \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      6. *-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      7. metadata-evalN/A

        \[\leadsto \frac{\mathsf{fma}\left(\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z + \color{blue}{\frac{-13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      8. lower-fma.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\frac{7936500793651}{10000000000000000} + y, z, \frac{-13888888888889}{5000000000000000}\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      9. lower-+.f6499.0

        \[\leadsto \frac{\mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{0.0007936500793651 + y}, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} \]
    5. Applied rewrites99.0%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}} \]

    if 1.62e7 < x < 2.90000000000000008e208

    1. Initial program 90.9%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      3. lift-/.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      4. div-invN/A

        \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      6. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      7. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      8. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      9. lift--.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      10. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      11. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      14. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      15. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      16. lower-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      17. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      18. inv-powN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      19. lower-pow.f6490.9

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
    4. Applied rewrites91.0%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
    5. Step-by-step derivation
      1. lift-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} + \mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1}} \]
      3. lift-fma.f64N/A

        \[\leadsto \color{blue}{\left(\log x \cdot \left(x - \frac{1}{2}\right) + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      4. *-commutativeN/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      5. lift-*.f64N/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      6. *-commutativeN/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)} \]
      7. lift-pow.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      8. unpow-1N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{x}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      9. associate-/r/N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      10. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \frac{1}{\color{blue}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      11. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      12. associate-+l+N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      13. lift-*.f64N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right) \]
      14. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(x - \frac{1}{2}, \log x, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      15. lower-+.f6491.0

        \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \color{blue}{\mathsf{fma}\left(-1, x, 0.91893853320467\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right)}}}\right) \]
    6. Applied rewrites91.0%

      \[\leadsto \color{blue}{\mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\mathsf{fma}\left(\mathsf{fma}\left(y + 0.0007936500793651, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\right)} \]
    7. Taylor expanded in y around inf

      \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{y \cdot {z}^{2}}}{x}\right) \]
    8. Step-by-step derivation
      1. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{{z}^{2} \cdot y}}{x}\right) \]
      2. lower-*.f64N/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{{z}^{2} \cdot y}}{x}\right) \]
      3. unpow2N/A

        \[\leadsto \mathsf{fma}\left(x - \frac{1}{2}, \log x, \left(\frac{91893853320467}{100000000000000} - x\right) + \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x}\right) \]
      4. lower-*.f6488.4

        \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x}\right) \]
    9. Applied rewrites88.4%

      \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\color{blue}{\left(z \cdot z\right) \cdot y}}{x}\right) \]

    if 2.90000000000000008e208 < x

    1. Initial program 82.8%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      3. lift-/.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      4. div-invN/A

        \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      6. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      7. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      8. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      9. lift--.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      10. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      11. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      14. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      15. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      16. lower-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      17. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      18. inv-powN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      19. lower-pow.f6482.8

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
    4. Applied rewrites83.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
    5. Taylor expanded in x around inf

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

        \[\leadsto \color{blue}{\left(-1 \cdot \log \left(\frac{1}{x}\right) - 1\right) \cdot x} \]
      2. mul-1-negN/A

        \[\leadsto \left(\color{blue}{\left(\mathsf{neg}\left(\log \left(\frac{1}{x}\right)\right)\right)} - 1\right) \cdot x \]
      3. log-recN/A

        \[\leadsto \left(\left(\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(\log x\right)\right)}\right)\right) - 1\right) \cdot x \]
      4. remove-double-negN/A

        \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
      5. lower-*.f64N/A

        \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
      6. lower--.f64N/A

        \[\leadsto \color{blue}{\left(\log x - 1\right)} \cdot x \]
      7. lower-log.f6499.8

        \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
    7. Applied rewrites99.8%

      \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification95.6%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 16200000:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{elif}\;x \leq 2.9 \cdot 10^{+208}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\left(z \cdot z\right) \cdot y}{x} + \left(0.91893853320467 - x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\log x - 1\right) \cdot x\\ \end{array} \]
  5. Add Preprocessing

Alternative 5: 94.4% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 2.9 \cdot 10^{+208}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} + \left(0.91893853320467 - x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\log x - 1\right) \cdot x\\ \end{array} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (if (<= x 2.9e+208)
   (fma
    (- x 0.5)
    (log x)
    (+
     (/
      (fma
       (fma (+ 0.0007936500793651 y) z -0.0027777777777778)
       z
       0.083333333333333)
      x)
     (- 0.91893853320467 x)))
   (* (- (log x) 1.0) x)))
double code(double x, double y, double z) {
	double tmp;
	if (x <= 2.9e+208) {
		tmp = fma((x - 0.5), log(x), ((fma(fma((0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x) + (0.91893853320467 - x)));
	} else {
		tmp = (log(x) - 1.0) * x;
	}
	return tmp;
}
function code(x, y, z)
	tmp = 0.0
	if (x <= 2.9e+208)
		tmp = fma(Float64(x - 0.5), log(x), Float64(Float64(fma(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x) + Float64(0.91893853320467 - x)));
	else
		tmp = Float64(Float64(log(x) - 1.0) * x);
	end
	return tmp
end
code[x_, y_, z_] := If[LessEqual[x, 2.9e+208], N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision] + N[(N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] * z + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision] + N[(0.91893853320467 - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[Log[x], $MachinePrecision] - 1.0), $MachinePrecision] * x), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 2.9 \cdot 10^{+208}:\\
\;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} + \left(0.91893853320467 - x\right)\right)\\

\mathbf{else}:\\
\;\;\;\;\left(\log x - 1\right) \cdot x\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if x < 2.90000000000000008e208

    1. Initial program 96.3%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      3. lift-/.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      4. div-invN/A

        \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      6. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      7. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      8. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      9. lift--.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      10. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      11. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      14. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      15. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      16. lower-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      17. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      18. inv-powN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      19. lower-pow.f6496.2

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
    4. Applied rewrites96.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
    5. Step-by-step derivation
      1. lift-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} + \mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\log x, x - \frac{1}{2}, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1}} \]
      3. lift-fma.f64N/A

        \[\leadsto \color{blue}{\left(\log x \cdot \left(x - \frac{1}{2}\right) + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right)} + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      4. *-commutativeN/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      5. lift-*.f64N/A

        \[\leadsto \left(\color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \cdot {x}^{-1} \]
      6. *-commutativeN/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)} \]
      7. lift-pow.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{{x}^{-1}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      8. unpow-1N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{x}} \cdot \mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right) \]
      9. associate-/r/N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      10. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \frac{1}{\color{blue}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      11. lift-/.f64N/A

        \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)\right) + \color{blue}{\frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}} \]
      12. associate-+l+N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      13. lift-*.f64N/A

        \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right) \]
      14. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(x - \frac{1}{2}, \log x, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right)}}\right)} \]
      15. lower-+.f6496.3

        \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \color{blue}{\mathsf{fma}\left(-1, x, 0.91893853320467\right) + \frac{1}{\frac{x}{\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right)}}}\right) \]
    6. Applied rewrites96.3%

      \[\leadsto \color{blue}{\mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{\mathsf{fma}\left(\mathsf{fma}\left(y + 0.0007936500793651, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\right)} \]

    if 2.90000000000000008e208 < x

    1. Initial program 82.8%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      3. lift-/.f64N/A

        \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      4. div-invN/A

        \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      5. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
      6. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      7. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      8. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      9. lift--.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      10. sub-negN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      11. lift-*.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      12. *-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      13. lower-fma.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      14. lift-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      15. +-commutativeN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      16. lower-+.f64N/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      17. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      18. inv-powN/A

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
      19. lower-pow.f6482.8

        \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
    4. Applied rewrites83.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
    5. Taylor expanded in x around inf

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

        \[\leadsto \color{blue}{\left(-1 \cdot \log \left(\frac{1}{x}\right) - 1\right) \cdot x} \]
      2. mul-1-negN/A

        \[\leadsto \left(\color{blue}{\left(\mathsf{neg}\left(\log \left(\frac{1}{x}\right)\right)\right)} - 1\right) \cdot x \]
      3. log-recN/A

        \[\leadsto \left(\left(\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(\log x\right)\right)}\right)\right) - 1\right) \cdot x \]
      4. remove-double-negN/A

        \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
      5. lower-*.f64N/A

        \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
      6. lower--.f64N/A

        \[\leadsto \color{blue}{\left(\log x - 1\right)} \cdot x \]
      7. lower-log.f6499.8

        \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
    7. Applied rewrites99.8%

      \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification96.9%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 2.9 \cdot 10^{+208}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} + \left(0.91893853320467 - x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\log x - 1\right) \cdot x\\ \end{array} \]
  5. Add Preprocessing

Alternative 6: 84.3% accurate, 1.1× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 10^{+31}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{0.083333333333333}{x} + \left(0.91893853320467 - x\right)\right)\\ \end{array} \end{array} \]
(FPCore (x y z)
 :precision binary64
 (if (<= x 1e+31)
   (/
    (fma
     (fma (+ 0.0007936500793651 y) z -0.0027777777777778)
     z
     0.083333333333333)
    x)
   (fma (- x 0.5) (log x) (+ (/ 0.083333333333333 x) (- 0.91893853320467 x)))))
double code(double x, double y, double z) {
	double tmp;
	if (x <= 1e+31) {
		tmp = fma(fma((0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x;
	} else {
		tmp = fma((x - 0.5), log(x), ((0.083333333333333 / x) + (0.91893853320467 - x)));
	}
	return tmp;
}
function code(x, y, z)
	tmp = 0.0
	if (x <= 1e+31)
		tmp = Float64(fma(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x);
	else
		tmp = fma(Float64(x - 0.5), log(x), Float64(Float64(0.083333333333333 / x) + Float64(0.91893853320467 - x)));
	end
	return tmp
end
code[x_, y_, z_] := If[LessEqual[x, 1e+31], N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] * z + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision], N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision] + N[(N[(0.083333333333333 / x), $MachinePrecision] + N[(0.91893853320467 - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 10^{+31}:\\
\;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\

\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{0.083333333333333}{x} + \left(0.91893853320467 - x\right)\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if x < 9.9999999999999996e30

    1. Initial program 99.7%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
    4. Step-by-step derivation
      1. lower-/.f64N/A

        \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
      2. +-commutativeN/A

        \[\leadsto \frac{\color{blue}{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) + \frac{83333333333333}{1000000000000000}}}{x} \]
      3. *-commutativeN/A

        \[\leadsto \frac{\color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}}{x} \]
      4. lower-fma.f64N/A

        \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}}{x} \]
      5. sub-negN/A

        \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      6. *-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      7. metadata-evalN/A

        \[\leadsto \frac{\mathsf{fma}\left(\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z + \color{blue}{\frac{-13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      8. lower-fma.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\frac{7936500793651}{10000000000000000} + y, z, \frac{-13888888888889}{5000000000000000}\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
      9. lower-+.f6497.7

        \[\leadsto \frac{\mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{0.0007936500793651 + y}, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} \]
    5. Applied rewrites97.7%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}} \]

    if 9.9999999999999996e30 < x

    1. Initial program 87.6%

      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
    2. Add Preprocessing
    3. Taylor expanded in z around 0

      \[\leadsto \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\color{blue}{\frac{83333333333333}{1000000000000000}}}{x} \]
    4. Step-by-step derivation
      1. Applied rewrites80.8%

        \[\leadsto \left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\color{blue}{0.083333333333333}}{x} \]
      2. Step-by-step derivation
        1. lift-+.f64N/A

          \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\frac{83333333333333}{1000000000000000}}{x}} \]
        2. lift-+.f64N/A

          \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} + \frac{\frac{83333333333333}{1000000000000000}}{x} \]
        3. lift--.f64N/A

          \[\leadsto \left(\color{blue}{\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right)} + \frac{91893853320467}{100000000000000}\right) + \frac{\frac{83333333333333}{1000000000000000}}{x} \]
        4. sub-negN/A

          \[\leadsto \left(\color{blue}{\left(\left(x - \frac{1}{2}\right) \cdot \log x + \left(\mathsf{neg}\left(x\right)\right)\right)} + \frac{91893853320467}{100000000000000}\right) + \frac{\frac{83333333333333}{1000000000000000}}{x} \]
        5. associate-+r+N/A

          \[\leadsto \color{blue}{\left(\left(x - \frac{1}{2}\right) \cdot \log x + \left(\left(\mathsf{neg}\left(x\right)\right) + \frac{91893853320467}{100000000000000}\right)\right)} + \frac{\frac{83333333333333}{1000000000000000}}{x} \]
        6. mul-1-negN/A

          \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \left(\color{blue}{-1 \cdot x} + \frac{91893853320467}{100000000000000}\right)\right) + \frac{\frac{83333333333333}{1000000000000000}}{x} \]
        7. lift-fma.f64N/A

          \[\leadsto \left(\left(x - \frac{1}{2}\right) \cdot \log x + \color{blue}{\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right)}\right) + \frac{\frac{83333333333333}{1000000000000000}}{x} \]
        8. associate-+l+N/A

          \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{\frac{83333333333333}{1000000000000000}}{x}\right)} \]
        9. lift-*.f64N/A

          \[\leadsto \color{blue}{\left(x - \frac{1}{2}\right) \cdot \log x} + \left(\mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{\frac{83333333333333}{1000000000000000}}{x}\right) \]
        10. lower-fma.f64N/A

          \[\leadsto \color{blue}{\mathsf{fma}\left(x - \frac{1}{2}, \log x, \mathsf{fma}\left(-1, x, \frac{91893853320467}{100000000000000}\right) + \frac{\frac{83333333333333}{1000000000000000}}{x}\right)} \]
        11. lower-+.f6481.1

          \[\leadsto \mathsf{fma}\left(x - 0.5, \log x, \color{blue}{\mathsf{fma}\left(-1, x, 0.91893853320467\right) + \frac{0.083333333333333}{x}}\right) \]
      3. Applied rewrites81.1%

        \[\leadsto \color{blue}{\mathsf{fma}\left(x - 0.5, \log x, \left(0.91893853320467 - x\right) + \frac{0.083333333333333}{x}\right)} \]
    5. Recombined 2 regimes into one program.
    6. Final simplification90.2%

      \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 10^{+31}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(x - 0.5, \log x, \frac{0.083333333333333}{x} + \left(0.91893853320467 - x\right)\right)\\ \end{array} \]
    7. Add Preprocessing

    Alternative 7: 84.3% accurate, 1.3× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 10^{+31}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{else}:\\ \;\;\;\;\left(\log x - 1\right) \cdot x\\ \end{array} \end{array} \]
    (FPCore (x y z)
     :precision binary64
     (if (<= x 1e+31)
       (/
        (fma
         (fma (+ 0.0007936500793651 y) z -0.0027777777777778)
         z
         0.083333333333333)
        x)
       (* (- (log x) 1.0) x)))
    double code(double x, double y, double z) {
    	double tmp;
    	if (x <= 1e+31) {
    		tmp = fma(fma((0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x;
    	} else {
    		tmp = (log(x) - 1.0) * x;
    	}
    	return tmp;
    }
    
    function code(x, y, z)
    	tmp = 0.0
    	if (x <= 1e+31)
    		tmp = Float64(fma(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x);
    	else
    		tmp = Float64(Float64(log(x) - 1.0) * x);
    	end
    	return tmp
    end
    
    code[x_, y_, z_] := If[LessEqual[x, 1e+31], N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] * z + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision], N[(N[(N[Log[x], $MachinePrecision] - 1.0), $MachinePrecision] * x), $MachinePrecision]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    \mathbf{if}\;x \leq 10^{+31}:\\
    \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\
    
    \mathbf{else}:\\
    \;\;\;\;\left(\log x - 1\right) \cdot x\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if x < 9.9999999999999996e30

      1. Initial program 99.7%

        \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
      2. Add Preprocessing
      3. Taylor expanded in x around 0

        \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
      4. Step-by-step derivation
        1. lower-/.f64N/A

          \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
        2. +-commutativeN/A

          \[\leadsto \frac{\color{blue}{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) + \frac{83333333333333}{1000000000000000}}}{x} \]
        3. *-commutativeN/A

          \[\leadsto \frac{\color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}}{x} \]
        4. lower-fma.f64N/A

          \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}}{x} \]
        5. sub-negN/A

          \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        6. *-commutativeN/A

          \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        7. metadata-evalN/A

          \[\leadsto \frac{\mathsf{fma}\left(\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z + \color{blue}{\frac{-13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        8. lower-fma.f64N/A

          \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\frac{7936500793651}{10000000000000000} + y, z, \frac{-13888888888889}{5000000000000000}\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        9. lower-+.f6497.7

          \[\leadsto \frac{\mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{0.0007936500793651 + y}, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} \]
      5. Applied rewrites97.7%

        \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}} \]

      if 9.9999999999999996e30 < x

      1. Initial program 87.6%

        \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
      2. Add Preprocessing
      3. Step-by-step derivation
        1. lift-+.f64N/A

          \[\leadsto \color{blue}{\left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) + \frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} \]
        2. +-commutativeN/A

          \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
        3. lift-/.f64N/A

          \[\leadsto \color{blue}{\frac{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        4. div-invN/A

          \[\leadsto \color{blue}{\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}\right) \cdot \frac{1}{x}} + \left(\left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        5. lower-fma.f64N/A

          \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right)} \]
        6. lift-+.f64N/A

          \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z + \frac{83333333333333}{1000000000000000}}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        7. lift-*.f64N/A

          \[\leadsto \mathsf{fma}\left(\color{blue}{\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        8. lower-fma.f64N/A

          \[\leadsto \mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}, \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        9. lift--.f64N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z - \frac{13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        10. sub-negN/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        11. lift-*.f64N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\left(y + \frac{7936500793651}{10000000000000000}\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        12. *-commutativeN/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{z \cdot \left(y + \frac{7936500793651}{10000000000000000}\right)} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        13. lower-fma.f64N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(z, y + \frac{7936500793651}{10000000000000000}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        14. lift-+.f64N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{y + \frac{7936500793651}{10000000000000000}}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        15. +-commutativeN/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        16. lower-+.f64N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \color{blue}{\frac{7936500793651}{10000000000000000} + y}, \mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        17. metadata-evalN/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \color{blue}{\frac{-13888888888889}{5000000000000000}}\right), z, \frac{83333333333333}{1000000000000000}\right), \frac{1}{x}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        18. inv-powN/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, \frac{7936500793651}{10000000000000000} + y, \frac{-13888888888889}{5000000000000000}\right), z, \frac{83333333333333}{1000000000000000}\right), \color{blue}{{x}^{-1}}, \left(\left(x - \frac{1}{2}\right) \cdot \log x - x\right) + \frac{91893853320467}{100000000000000}\right) \]
        19. lower-pow.f6487.6

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), \color{blue}{{x}^{-1}}, \left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) \]
      4. Applied rewrites87.9%

        \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(z, 0.0007936500793651 + y, -0.0027777777777778\right), z, 0.083333333333333\right), {x}^{-1}, \mathsf{fma}\left(\log x, x - 0.5, \mathsf{fma}\left(-1, x, 0.91893853320467\right)\right)\right)} \]
      5. Taylor expanded in x around inf

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

          \[\leadsto \color{blue}{\left(-1 \cdot \log \left(\frac{1}{x}\right) - 1\right) \cdot x} \]
        2. mul-1-negN/A

          \[\leadsto \left(\color{blue}{\left(\mathsf{neg}\left(\log \left(\frac{1}{x}\right)\right)\right)} - 1\right) \cdot x \]
        3. log-recN/A

          \[\leadsto \left(\left(\mathsf{neg}\left(\color{blue}{\left(\mathsf{neg}\left(\log x\right)\right)}\right)\right) - 1\right) \cdot x \]
        4. remove-double-negN/A

          \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
        5. lower-*.f64N/A

          \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
        6. lower--.f64N/A

          \[\leadsto \color{blue}{\left(\log x - 1\right)} \cdot x \]
        7. lower-log.f6481.1

          \[\leadsto \left(\color{blue}{\log x} - 1\right) \cdot x \]
      7. Applied rewrites81.1%

        \[\leadsto \color{blue}{\left(\log x - 1\right) \cdot x} \]
    3. Recombined 2 regimes into one program.
    4. Add Preprocessing

    Alternative 8: 65.1% accurate, 3.5× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 1.3 \cdot 10^{+46}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\frac{0.0007936500793651}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z\\ \end{array} \end{array} \]
    (FPCore (x y z)
     :precision binary64
     (if (<= x 1.3e+46)
       (/
        (fma
         (fma (+ 0.0007936500793651 y) z -0.0027777777777778)
         z
         0.083333333333333)
        x)
       (* (* (+ (/ 0.0007936500793651 x) (/ y x)) z) z)))
    double code(double x, double y, double z) {
    	double tmp;
    	if (x <= 1.3e+46) {
    		tmp = fma(fma((0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x;
    	} else {
    		tmp = (((0.0007936500793651 / x) + (y / x)) * z) * z;
    	}
    	return tmp;
    }
    
    function code(x, y, z)
    	tmp = 0.0
    	if (x <= 1.3e+46)
    		tmp = Float64(fma(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x);
    	else
    		tmp = Float64(Float64(Float64(Float64(0.0007936500793651 / x) + Float64(y / x)) * z) * z);
    	end
    	return tmp
    end
    
    code[x_, y_, z_] := If[LessEqual[x, 1.3e+46], N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] * z + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision], N[(N[(N[(N[(0.0007936500793651 / x), $MachinePrecision] + N[(y / x), $MachinePrecision]), $MachinePrecision] * z), $MachinePrecision] * z), $MachinePrecision]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    \mathbf{if}\;x \leq 1.3 \cdot 10^{+46}:\\
    \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\
    
    \mathbf{else}:\\
    \;\;\;\;\left(\left(\frac{0.0007936500793651}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if x < 1.30000000000000007e46

      1. Initial program 99.7%

        \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
      2. Add Preprocessing
      3. Taylor expanded in x around 0

        \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
      4. Step-by-step derivation
        1. lower-/.f64N/A

          \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
        2. +-commutativeN/A

          \[\leadsto \frac{\color{blue}{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) + \frac{83333333333333}{1000000000000000}}}{x} \]
        3. *-commutativeN/A

          \[\leadsto \frac{\color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}}{x} \]
        4. lower-fma.f64N/A

          \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}}{x} \]
        5. sub-negN/A

          \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        6. *-commutativeN/A

          \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        7. metadata-evalN/A

          \[\leadsto \frac{\mathsf{fma}\left(\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z + \color{blue}{\frac{-13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        8. lower-fma.f64N/A

          \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\frac{7936500793651}{10000000000000000} + y, z, \frac{-13888888888889}{5000000000000000}\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
        9. lower-+.f6493.4

          \[\leadsto \frac{\mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{0.0007936500793651 + y}, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} \]
      5. Applied rewrites93.4%

        \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}} \]

      if 1.30000000000000007e46 < x

      1. Initial program 86.8%

        \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
      2. Add Preprocessing
      3. Taylor expanded in z around inf

        \[\leadsto \color{blue}{{z}^{2} \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)} \]
      4. Step-by-step derivation
        1. *-commutativeN/A

          \[\leadsto \color{blue}{\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot {z}^{2}} \]
        2. unpow2N/A

          \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot \color{blue}{\left(z \cdot z\right)} \]
        3. associate-*r*N/A

          \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z} \]
        4. *-commutativeN/A

          \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right)} \cdot z \]
        5. lower-*.f64N/A

          \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right) \cdot z} \]
        6. *-commutativeN/A

          \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
        7. lower-*.f64N/A

          \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
        8. +-commutativeN/A

          \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
        9. lower-+.f64N/A

          \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
        10. lower-/.f64N/A

          \[\leadsto \left(\left(\color{blue}{\frac{y}{x}} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right) \cdot z\right) \cdot z \]
        11. associate-*r/N/A

          \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{\frac{7936500793651}{10000000000000000} \cdot 1}{x}}\right) \cdot z\right) \cdot z \]
        12. metadata-evalN/A

          \[\leadsto \left(\left(\frac{y}{x} + \frac{\color{blue}{\frac{7936500793651}{10000000000000000}}}{x}\right) \cdot z\right) \cdot z \]
        13. lower-/.f6422.5

          \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{0.0007936500793651}{x}}\right) \cdot z\right) \cdot z \]
      5. Applied rewrites22.5%

        \[\leadsto \color{blue}{\left(\left(\frac{y}{x} + \frac{0.0007936500793651}{x}\right) \cdot z\right) \cdot z} \]
    3. Recombined 2 regimes into one program.
    4. Final simplification63.2%

      \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 1.3 \cdot 10^{+46}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\frac{0.0007936500793651}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z\\ \end{array} \]
    5. Add Preprocessing

    Alternative 9: 42.9% accurate, 3.7× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\ \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\ \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\ \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(z \cdot y\right) \cdot z}{x}\\ \end{array} \end{array} \]
    (FPCore (x y z)
     :precision binary64
     (if (<= (+ 0.0007936500793651 y) -4e+20)
       (* (* (/ z x) z) y)
       (if (<= (+ 0.0007936500793651 y) 0.00079366)
         (* (* (/ 0.0007936500793651 x) z) z)
         (/ (* (* z y) z) x))))
    double code(double x, double y, double z) {
    	double tmp;
    	if ((0.0007936500793651 + y) <= -4e+20) {
    		tmp = ((z / x) * z) * y;
    	} else if ((0.0007936500793651 + y) <= 0.00079366) {
    		tmp = ((0.0007936500793651 / x) * z) * z;
    	} else {
    		tmp = ((z * y) * z) / x;
    	}
    	return tmp;
    }
    
    real(8) function code(x, y, z)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        real(8), intent (in) :: z
        real(8) :: tmp
        if ((0.0007936500793651d0 + y) <= (-4d+20)) then
            tmp = ((z / x) * z) * y
        else if ((0.0007936500793651d0 + y) <= 0.00079366d0) then
            tmp = ((0.0007936500793651d0 / x) * z) * z
        else
            tmp = ((z * y) * z) / x
        end if
        code = tmp
    end function
    
    public static double code(double x, double y, double z) {
    	double tmp;
    	if ((0.0007936500793651 + y) <= -4e+20) {
    		tmp = ((z / x) * z) * y;
    	} else if ((0.0007936500793651 + y) <= 0.00079366) {
    		tmp = ((0.0007936500793651 / x) * z) * z;
    	} else {
    		tmp = ((z * y) * z) / x;
    	}
    	return tmp;
    }
    
    def code(x, y, z):
    	tmp = 0
    	if (0.0007936500793651 + y) <= -4e+20:
    		tmp = ((z / x) * z) * y
    	elif (0.0007936500793651 + y) <= 0.00079366:
    		tmp = ((0.0007936500793651 / x) * z) * z
    	else:
    		tmp = ((z * y) * z) / x
    	return tmp
    
    function code(x, y, z)
    	tmp = 0.0
    	if (Float64(0.0007936500793651 + y) <= -4e+20)
    		tmp = Float64(Float64(Float64(z / x) * z) * y);
    	elseif (Float64(0.0007936500793651 + y) <= 0.00079366)
    		tmp = Float64(Float64(Float64(0.0007936500793651 / x) * z) * z);
    	else
    		tmp = Float64(Float64(Float64(z * y) * z) / x);
    	end
    	return tmp
    end
    
    function tmp_2 = code(x, y, z)
    	tmp = 0.0;
    	if ((0.0007936500793651 + y) <= -4e+20)
    		tmp = ((z / x) * z) * y;
    	elseif ((0.0007936500793651 + y) <= 0.00079366)
    		tmp = ((0.0007936500793651 / x) * z) * z;
    	else
    		tmp = ((z * y) * z) / x;
    	end
    	tmp_2 = tmp;
    end
    
    code[x_, y_, z_] := If[LessEqual[N[(0.0007936500793651 + y), $MachinePrecision], -4e+20], N[(N[(N[(z / x), $MachinePrecision] * z), $MachinePrecision] * y), $MachinePrecision], If[LessEqual[N[(0.0007936500793651 + y), $MachinePrecision], 0.00079366], N[(N[(N[(0.0007936500793651 / x), $MachinePrecision] * z), $MachinePrecision] * z), $MachinePrecision], N[(N[(N[(z * y), $MachinePrecision] * z), $MachinePrecision] / x), $MachinePrecision]]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\
    \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\
    
    \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\
    \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{\left(z \cdot y\right) \cdot z}{x}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 3 regimes
    2. if (+.f64 y #s(literal 7936500793651/10000000000000000 binary64)) < -4e20

      1. Initial program 92.7%

        \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
      2. Add Preprocessing
      3. Taylor expanded in y around inf

        \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
      4. Step-by-step derivation
        1. lower-/.f64N/A

          \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
        2. *-commutativeN/A

          \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
        3. lower-*.f64N/A

          \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
        4. unpow2N/A

          \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
        5. lower-*.f6438.7

          \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
      5. Applied rewrites38.7%

        \[\leadsto \color{blue}{\frac{\left(z \cdot z\right) \cdot y}{x}} \]
      6. Step-by-step derivation
        1. Applied rewrites45.6%

          \[\leadsto y \cdot \color{blue}{\left(\frac{z}{x} \cdot z\right)} \]

        if -4e20 < (+.f64 y #s(literal 7936500793651/10000000000000000 binary64)) < 7.9365999999999996e-4

        1. Initial program 95.2%

          \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
        2. Add Preprocessing
        3. Taylor expanded in z around inf

          \[\leadsto \color{blue}{{z}^{2} \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)} \]
        4. Step-by-step derivation
          1. *-commutativeN/A

            \[\leadsto \color{blue}{\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot {z}^{2}} \]
          2. unpow2N/A

            \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot \color{blue}{\left(z \cdot z\right)} \]
          3. associate-*r*N/A

            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z} \]
          4. *-commutativeN/A

            \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right)} \cdot z \]
          5. lower-*.f64N/A

            \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right) \cdot z} \]
          6. *-commutativeN/A

            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
          7. lower-*.f64N/A

            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
          8. +-commutativeN/A

            \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
          9. lower-+.f64N/A

            \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
          10. lower-/.f64N/A

            \[\leadsto \left(\left(\color{blue}{\frac{y}{x}} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right) \cdot z\right) \cdot z \]
          11. associate-*r/N/A

            \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{\frac{7936500793651}{10000000000000000} \cdot 1}{x}}\right) \cdot z\right) \cdot z \]
          12. metadata-evalN/A

            \[\leadsto \left(\left(\frac{y}{x} + \frac{\color{blue}{\frac{7936500793651}{10000000000000000}}}{x}\right) \cdot z\right) \cdot z \]
          13. lower-/.f6435.2

            \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{0.0007936500793651}{x}}\right) \cdot z\right) \cdot z \]
        5. Applied rewrites35.2%

          \[\leadsto \color{blue}{\left(\left(\frac{y}{x} + \frac{0.0007936500793651}{x}\right) \cdot z\right) \cdot z} \]
        6. Taylor expanded in y around 0

          \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{z}{x}\right) \cdot z \]
        7. Step-by-step derivation
          1. Applied rewrites34.9%

            \[\leadsto \left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z \]

          if 7.9365999999999996e-4 < (+.f64 y #s(literal 7936500793651/10000000000000000 binary64))

          1. Initial program 93.9%

            \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
          2. Add Preprocessing
          3. Taylor expanded in y around inf

            \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
          4. Step-by-step derivation
            1. lower-/.f64N/A

              \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
            2. *-commutativeN/A

              \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
            3. lower-*.f64N/A

              \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
            4. unpow2N/A

              \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
            5. lower-*.f6446.7

              \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
          5. Applied rewrites46.7%

            \[\leadsto \color{blue}{\frac{\left(z \cdot z\right) \cdot y}{x}} \]
          6. Step-by-step derivation
            1. Applied rewrites46.9%

              \[\leadsto \frac{\left(y \cdot z\right) \cdot z}{x} \]
          7. Recombined 3 regimes into one program.
          8. Final simplification40.7%

            \[\leadsto \begin{array}{l} \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\ \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\ \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\ \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(z \cdot y\right) \cdot z}{x}\\ \end{array} \]
          9. Add Preprocessing

          Alternative 10: 43.4% accurate, 3.7× speedup?

          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\ \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\ \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\ \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\ \mathbf{else}:\\ \;\;\;\;\left(z \cdot y\right) \cdot \frac{z}{x}\\ \end{array} \end{array} \]
          (FPCore (x y z)
           :precision binary64
           (if (<= (+ 0.0007936500793651 y) -4e+20)
             (* (* (/ z x) z) y)
             (if (<= (+ 0.0007936500793651 y) 0.00079366)
               (* (* (/ 0.0007936500793651 x) z) z)
               (* (* z y) (/ z x)))))
          double code(double x, double y, double z) {
          	double tmp;
          	if ((0.0007936500793651 + y) <= -4e+20) {
          		tmp = ((z / x) * z) * y;
          	} else if ((0.0007936500793651 + y) <= 0.00079366) {
          		tmp = ((0.0007936500793651 / x) * z) * z;
          	} else {
          		tmp = (z * y) * (z / x);
          	}
          	return tmp;
          }
          
          real(8) function code(x, y, z)
              real(8), intent (in) :: x
              real(8), intent (in) :: y
              real(8), intent (in) :: z
              real(8) :: tmp
              if ((0.0007936500793651d0 + y) <= (-4d+20)) then
                  tmp = ((z / x) * z) * y
              else if ((0.0007936500793651d0 + y) <= 0.00079366d0) then
                  tmp = ((0.0007936500793651d0 / x) * z) * z
              else
                  tmp = (z * y) * (z / x)
              end if
              code = tmp
          end function
          
          public static double code(double x, double y, double z) {
          	double tmp;
          	if ((0.0007936500793651 + y) <= -4e+20) {
          		tmp = ((z / x) * z) * y;
          	} else if ((0.0007936500793651 + y) <= 0.00079366) {
          		tmp = ((0.0007936500793651 / x) * z) * z;
          	} else {
          		tmp = (z * y) * (z / x);
          	}
          	return tmp;
          }
          
          def code(x, y, z):
          	tmp = 0
          	if (0.0007936500793651 + y) <= -4e+20:
          		tmp = ((z / x) * z) * y
          	elif (0.0007936500793651 + y) <= 0.00079366:
          		tmp = ((0.0007936500793651 / x) * z) * z
          	else:
          		tmp = (z * y) * (z / x)
          	return tmp
          
          function code(x, y, z)
          	tmp = 0.0
          	if (Float64(0.0007936500793651 + y) <= -4e+20)
          		tmp = Float64(Float64(Float64(z / x) * z) * y);
          	elseif (Float64(0.0007936500793651 + y) <= 0.00079366)
          		tmp = Float64(Float64(Float64(0.0007936500793651 / x) * z) * z);
          	else
          		tmp = Float64(Float64(z * y) * Float64(z / x));
          	end
          	return tmp
          end
          
          function tmp_2 = code(x, y, z)
          	tmp = 0.0;
          	if ((0.0007936500793651 + y) <= -4e+20)
          		tmp = ((z / x) * z) * y;
          	elseif ((0.0007936500793651 + y) <= 0.00079366)
          		tmp = ((0.0007936500793651 / x) * z) * z;
          	else
          		tmp = (z * y) * (z / x);
          	end
          	tmp_2 = tmp;
          end
          
          code[x_, y_, z_] := If[LessEqual[N[(0.0007936500793651 + y), $MachinePrecision], -4e+20], N[(N[(N[(z / x), $MachinePrecision] * z), $MachinePrecision] * y), $MachinePrecision], If[LessEqual[N[(0.0007936500793651 + y), $MachinePrecision], 0.00079366], N[(N[(N[(0.0007936500793651 / x), $MachinePrecision] * z), $MachinePrecision] * z), $MachinePrecision], N[(N[(z * y), $MachinePrecision] * N[(z / x), $MachinePrecision]), $MachinePrecision]]]
          
          \begin{array}{l}
          
          \\
          \begin{array}{l}
          \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\
          \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\
          
          \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\
          \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\
          
          \mathbf{else}:\\
          \;\;\;\;\left(z \cdot y\right) \cdot \frac{z}{x}\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 3 regimes
          2. if (+.f64 y #s(literal 7936500793651/10000000000000000 binary64)) < -4e20

            1. Initial program 92.7%

              \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
            2. Add Preprocessing
            3. Taylor expanded in y around inf

              \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
            4. Step-by-step derivation
              1. lower-/.f64N/A

                \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
              2. *-commutativeN/A

                \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
              3. lower-*.f64N/A

                \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
              4. unpow2N/A

                \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
              5. lower-*.f6438.7

                \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
            5. Applied rewrites38.7%

              \[\leadsto \color{blue}{\frac{\left(z \cdot z\right) \cdot y}{x}} \]
            6. Step-by-step derivation
              1. Applied rewrites45.6%

                \[\leadsto y \cdot \color{blue}{\left(\frac{z}{x} \cdot z\right)} \]

              if -4e20 < (+.f64 y #s(literal 7936500793651/10000000000000000 binary64)) < 7.9365999999999996e-4

              1. Initial program 95.2%

                \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
              2. Add Preprocessing
              3. Taylor expanded in z around inf

                \[\leadsto \color{blue}{{z}^{2} \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)} \]
              4. Step-by-step derivation
                1. *-commutativeN/A

                  \[\leadsto \color{blue}{\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot {z}^{2}} \]
                2. unpow2N/A

                  \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot \color{blue}{\left(z \cdot z\right)} \]
                3. associate-*r*N/A

                  \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z} \]
                4. *-commutativeN/A

                  \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right)} \cdot z \]
                5. lower-*.f64N/A

                  \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right) \cdot z} \]
                6. *-commutativeN/A

                  \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                7. lower-*.f64N/A

                  \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                8. +-commutativeN/A

                  \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                9. lower-+.f64N/A

                  \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                10. lower-/.f64N/A

                  \[\leadsto \left(\left(\color{blue}{\frac{y}{x}} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right) \cdot z\right) \cdot z \]
                11. associate-*r/N/A

                  \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{\frac{7936500793651}{10000000000000000} \cdot 1}{x}}\right) \cdot z\right) \cdot z \]
                12. metadata-evalN/A

                  \[\leadsto \left(\left(\frac{y}{x} + \frac{\color{blue}{\frac{7936500793651}{10000000000000000}}}{x}\right) \cdot z\right) \cdot z \]
                13. lower-/.f6435.2

                  \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{0.0007936500793651}{x}}\right) \cdot z\right) \cdot z \]
              5. Applied rewrites35.2%

                \[\leadsto \color{blue}{\left(\left(\frac{y}{x} + \frac{0.0007936500793651}{x}\right) \cdot z\right) \cdot z} \]
              6. Taylor expanded in y around 0

                \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{z}{x}\right) \cdot z \]
              7. Step-by-step derivation
                1. Applied rewrites34.9%

                  \[\leadsto \left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z \]

                if 7.9365999999999996e-4 < (+.f64 y #s(literal 7936500793651/10000000000000000 binary64))

                1. Initial program 93.9%

                  \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                2. Add Preprocessing
                3. Taylor expanded in y around inf

                  \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
                4. Step-by-step derivation
                  1. lower-/.f64N/A

                    \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
                  2. *-commutativeN/A

                    \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
                  3. lower-*.f64N/A

                    \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
                  4. unpow2N/A

                    \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
                  5. lower-*.f6446.7

                    \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
                5. Applied rewrites46.7%

                  \[\leadsto \color{blue}{\frac{\left(z \cdot z\right) \cdot y}{x}} \]
                6. Step-by-step derivation
                  1. Applied rewrites46.7%

                    \[\leadsto y \cdot \color{blue}{\left(\frac{z}{x} \cdot z\right)} \]
                  2. Step-by-step derivation
                    1. Applied rewrites46.8%

                      \[\leadsto \frac{z}{x} \cdot \color{blue}{\left(z \cdot y\right)} \]
                  3. Recombined 3 regimes into one program.
                  4. Final simplification40.7%

                    \[\leadsto \begin{array}{l} \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\ \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\ \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\ \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\ \mathbf{else}:\\ \;\;\;\;\left(z \cdot y\right) \cdot \frac{z}{x}\\ \end{array} \]
                  5. Add Preprocessing

                  Alternative 11: 43.6% accurate, 3.7× speedup?

                  \[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\frac{z}{x} \cdot z\right) \cdot y\\ \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\ \;\;\;\;t\_0\\ \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\ \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\ \mathbf{else}:\\ \;\;\;\;t\_0\\ \end{array} \end{array} \]
                  (FPCore (x y z)
                   :precision binary64
                   (let* ((t_0 (* (* (/ z x) z) y)))
                     (if (<= (+ 0.0007936500793651 y) -4e+20)
                       t_0
                       (if (<= (+ 0.0007936500793651 y) 0.00079366)
                         (* (* (/ 0.0007936500793651 x) z) z)
                         t_0))))
                  double code(double x, double y, double z) {
                  	double t_0 = ((z / x) * z) * y;
                  	double tmp;
                  	if ((0.0007936500793651 + y) <= -4e+20) {
                  		tmp = t_0;
                  	} else if ((0.0007936500793651 + y) <= 0.00079366) {
                  		tmp = ((0.0007936500793651 / x) * z) * z;
                  	} else {
                  		tmp = t_0;
                  	}
                  	return tmp;
                  }
                  
                  real(8) function code(x, y, z)
                      real(8), intent (in) :: x
                      real(8), intent (in) :: y
                      real(8), intent (in) :: z
                      real(8) :: t_0
                      real(8) :: tmp
                      t_0 = ((z / x) * z) * y
                      if ((0.0007936500793651d0 + y) <= (-4d+20)) then
                          tmp = t_0
                      else if ((0.0007936500793651d0 + y) <= 0.00079366d0) then
                          tmp = ((0.0007936500793651d0 / x) * z) * z
                      else
                          tmp = t_0
                      end if
                      code = tmp
                  end function
                  
                  public static double code(double x, double y, double z) {
                  	double t_0 = ((z / x) * z) * y;
                  	double tmp;
                  	if ((0.0007936500793651 + y) <= -4e+20) {
                  		tmp = t_0;
                  	} else if ((0.0007936500793651 + y) <= 0.00079366) {
                  		tmp = ((0.0007936500793651 / x) * z) * z;
                  	} else {
                  		tmp = t_0;
                  	}
                  	return tmp;
                  }
                  
                  def code(x, y, z):
                  	t_0 = ((z / x) * z) * y
                  	tmp = 0
                  	if (0.0007936500793651 + y) <= -4e+20:
                  		tmp = t_0
                  	elif (0.0007936500793651 + y) <= 0.00079366:
                  		tmp = ((0.0007936500793651 / x) * z) * z
                  	else:
                  		tmp = t_0
                  	return tmp
                  
                  function code(x, y, z)
                  	t_0 = Float64(Float64(Float64(z / x) * z) * y)
                  	tmp = 0.0
                  	if (Float64(0.0007936500793651 + y) <= -4e+20)
                  		tmp = t_0;
                  	elseif (Float64(0.0007936500793651 + y) <= 0.00079366)
                  		tmp = Float64(Float64(Float64(0.0007936500793651 / x) * z) * z);
                  	else
                  		tmp = t_0;
                  	end
                  	return tmp
                  end
                  
                  function tmp_2 = code(x, y, z)
                  	t_0 = ((z / x) * z) * y;
                  	tmp = 0.0;
                  	if ((0.0007936500793651 + y) <= -4e+20)
                  		tmp = t_0;
                  	elseif ((0.0007936500793651 + y) <= 0.00079366)
                  		tmp = ((0.0007936500793651 / x) * z) * z;
                  	else
                  		tmp = t_0;
                  	end
                  	tmp_2 = tmp;
                  end
                  
                  code[x_, y_, z_] := Block[{t$95$0 = N[(N[(N[(z / x), $MachinePrecision] * z), $MachinePrecision] * y), $MachinePrecision]}, If[LessEqual[N[(0.0007936500793651 + y), $MachinePrecision], -4e+20], t$95$0, If[LessEqual[N[(0.0007936500793651 + y), $MachinePrecision], 0.00079366], N[(N[(N[(0.0007936500793651 / x), $MachinePrecision] * z), $MachinePrecision] * z), $MachinePrecision], t$95$0]]]
                  
                  \begin{array}{l}
                  
                  \\
                  \begin{array}{l}
                  t_0 := \left(\frac{z}{x} \cdot z\right) \cdot y\\
                  \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\
                  \;\;\;\;t\_0\\
                  
                  \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\
                  \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\
                  
                  \mathbf{else}:\\
                  \;\;\;\;t\_0\\
                  
                  
                  \end{array}
                  \end{array}
                  
                  Derivation
                  1. Split input into 2 regimes
                  2. if (+.f64 y #s(literal 7936500793651/10000000000000000 binary64)) < -4e20 or 7.9365999999999996e-4 < (+.f64 y #s(literal 7936500793651/10000000000000000 binary64))

                    1. Initial program 93.3%

                      \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                    2. Add Preprocessing
                    3. Taylor expanded in y around inf

                      \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
                    4. Step-by-step derivation
                      1. lower-/.f64N/A

                        \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
                      2. *-commutativeN/A

                        \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
                      3. lower-*.f64N/A

                        \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
                      4. unpow2N/A

                        \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
                      5. lower-*.f6442.7

                        \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
                    5. Applied rewrites42.7%

                      \[\leadsto \color{blue}{\frac{\left(z \cdot z\right) \cdot y}{x}} \]
                    6. Step-by-step derivation
                      1. Applied rewrites46.1%

                        \[\leadsto y \cdot \color{blue}{\left(\frac{z}{x} \cdot z\right)} \]

                      if -4e20 < (+.f64 y #s(literal 7936500793651/10000000000000000 binary64)) < 7.9365999999999996e-4

                      1. Initial program 95.2%

                        \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                      2. Add Preprocessing
                      3. Taylor expanded in z around inf

                        \[\leadsto \color{blue}{{z}^{2} \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)} \]
                      4. Step-by-step derivation
                        1. *-commutativeN/A

                          \[\leadsto \color{blue}{\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot {z}^{2}} \]
                        2. unpow2N/A

                          \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot \color{blue}{\left(z \cdot z\right)} \]
                        3. associate-*r*N/A

                          \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z} \]
                        4. *-commutativeN/A

                          \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right)} \cdot z \]
                        5. lower-*.f64N/A

                          \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right) \cdot z} \]
                        6. *-commutativeN/A

                          \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                        7. lower-*.f64N/A

                          \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                        8. +-commutativeN/A

                          \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                        9. lower-+.f64N/A

                          \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                        10. lower-/.f64N/A

                          \[\leadsto \left(\left(\color{blue}{\frac{y}{x}} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right) \cdot z\right) \cdot z \]
                        11. associate-*r/N/A

                          \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{\frac{7936500793651}{10000000000000000} \cdot 1}{x}}\right) \cdot z\right) \cdot z \]
                        12. metadata-evalN/A

                          \[\leadsto \left(\left(\frac{y}{x} + \frac{\color{blue}{\frac{7936500793651}{10000000000000000}}}{x}\right) \cdot z\right) \cdot z \]
                        13. lower-/.f6435.2

                          \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{0.0007936500793651}{x}}\right) \cdot z\right) \cdot z \]
                      5. Applied rewrites35.2%

                        \[\leadsto \color{blue}{\left(\left(\frac{y}{x} + \frac{0.0007936500793651}{x}\right) \cdot z\right) \cdot z} \]
                      6. Taylor expanded in y around 0

                        \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{z}{x}\right) \cdot z \]
                      7. Step-by-step derivation
                        1. Applied rewrites34.9%

                          \[\leadsto \left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z \]
                      8. Recombined 2 regimes into one program.
                      9. Final simplification40.7%

                        \[\leadsto \begin{array}{l} \mathbf{if}\;0.0007936500793651 + y \leq -4 \cdot 10^{+20}:\\ \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\ \mathbf{elif}\;0.0007936500793651 + y \leq 0.00079366:\\ \;\;\;\;\left(\frac{0.0007936500793651}{x} \cdot z\right) \cdot z\\ \mathbf{else}:\\ \;\;\;\;\left(\frac{z}{x} \cdot z\right) \cdot y\\ \end{array} \]
                      10. Add Preprocessing

                      Alternative 12: 65.1% accurate, 4.5× speedup?

                      \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 1.3 \cdot 10^{+46}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\ \mathbf{else}:\\ \;\;\;\;\left(\frac{z}{x} \cdot \left(0.0007936500793651 + y\right)\right) \cdot z\\ \end{array} \end{array} \]
                      (FPCore (x y z)
                       :precision binary64
                       (if (<= x 1.3e+46)
                         (/
                          (fma
                           (fma (+ 0.0007936500793651 y) z -0.0027777777777778)
                           z
                           0.083333333333333)
                          x)
                         (* (* (/ z x) (+ 0.0007936500793651 y)) z)))
                      double code(double x, double y, double z) {
                      	double tmp;
                      	if (x <= 1.3e+46) {
                      		tmp = fma(fma((0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x;
                      	} else {
                      		tmp = ((z / x) * (0.0007936500793651 + y)) * z;
                      	}
                      	return tmp;
                      }
                      
                      function code(x, y, z)
                      	tmp = 0.0
                      	if (x <= 1.3e+46)
                      		tmp = Float64(fma(fma(Float64(0.0007936500793651 + y), z, -0.0027777777777778), z, 0.083333333333333) / x);
                      	else
                      		tmp = Float64(Float64(Float64(z / x) * Float64(0.0007936500793651 + y)) * z);
                      	end
                      	return tmp
                      end
                      
                      code[x_, y_, z_] := If[LessEqual[x, 1.3e+46], N[(N[(N[(N[(0.0007936500793651 + y), $MachinePrecision] * z + -0.0027777777777778), $MachinePrecision] * z + 0.083333333333333), $MachinePrecision] / x), $MachinePrecision], N[(N[(N[(z / x), $MachinePrecision] * N[(0.0007936500793651 + y), $MachinePrecision]), $MachinePrecision] * z), $MachinePrecision]]
                      
                      \begin{array}{l}
                      
                      \\
                      \begin{array}{l}
                      \mathbf{if}\;x \leq 1.3 \cdot 10^{+46}:\\
                      \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}\\
                      
                      \mathbf{else}:\\
                      \;\;\;\;\left(\frac{z}{x} \cdot \left(0.0007936500793651 + y\right)\right) \cdot z\\
                      
                      
                      \end{array}
                      \end{array}
                      
                      Derivation
                      1. Split input into 2 regimes
                      2. if x < 1.30000000000000007e46

                        1. Initial program 99.7%

                          \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                        2. Add Preprocessing
                        3. Taylor expanded in x around 0

                          \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
                        4. Step-by-step derivation
                          1. lower-/.f64N/A

                            \[\leadsto \color{blue}{\frac{\frac{83333333333333}{1000000000000000} + z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right)}{x}} \]
                          2. +-commutativeN/A

                            \[\leadsto \frac{\color{blue}{z \cdot \left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) + \frac{83333333333333}{1000000000000000}}}{x} \]
                          3. *-commutativeN/A

                            \[\leadsto \frac{\color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}\right) \cdot z} + \frac{83333333333333}{1000000000000000}}{x} \]
                          4. lower-fma.f64N/A

                            \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) - \frac{13888888888889}{5000000000000000}, z, \frac{83333333333333}{1000000000000000}\right)}}{x} \]
                          5. sub-negN/A

                            \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{z \cdot \left(\frac{7936500793651}{10000000000000000} + y\right) + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
                          6. *-commutativeN/A

                            \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z} + \left(\mathsf{neg}\left(\frac{13888888888889}{5000000000000000}\right)\right), z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
                          7. metadata-evalN/A

                            \[\leadsto \frac{\mathsf{fma}\left(\left(\frac{7936500793651}{10000000000000000} + y\right) \cdot z + \color{blue}{\frac{-13888888888889}{5000000000000000}}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
                          8. lower-fma.f64N/A

                            \[\leadsto \frac{\mathsf{fma}\left(\color{blue}{\mathsf{fma}\left(\frac{7936500793651}{10000000000000000} + y, z, \frac{-13888888888889}{5000000000000000}\right)}, z, \frac{83333333333333}{1000000000000000}\right)}{x} \]
                          9. lower-+.f6493.4

                            \[\leadsto \frac{\mathsf{fma}\left(\mathsf{fma}\left(\color{blue}{0.0007936500793651 + y}, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x} \]
                        5. Applied rewrites93.4%

                          \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(0.0007936500793651 + y, z, -0.0027777777777778\right), z, 0.083333333333333\right)}{x}} \]

                        if 1.30000000000000007e46 < x

                        1. Initial program 86.8%

                          \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                        2. Add Preprocessing
                        3. Taylor expanded in z around inf

                          \[\leadsto \color{blue}{{z}^{2} \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)} \]
                        4. Step-by-step derivation
                          1. *-commutativeN/A

                            \[\leadsto \color{blue}{\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot {z}^{2}} \]
                          2. unpow2N/A

                            \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot \color{blue}{\left(z \cdot z\right)} \]
                          3. associate-*r*N/A

                            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z} \]
                          4. *-commutativeN/A

                            \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right)} \cdot z \]
                          5. lower-*.f64N/A

                            \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right) \cdot z} \]
                          6. *-commutativeN/A

                            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                          7. lower-*.f64N/A

                            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                          8. +-commutativeN/A

                            \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                          9. lower-+.f64N/A

                            \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                          10. lower-/.f64N/A

                            \[\leadsto \left(\left(\color{blue}{\frac{y}{x}} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right) \cdot z\right) \cdot z \]
                          11. associate-*r/N/A

                            \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{\frac{7936500793651}{10000000000000000} \cdot 1}{x}}\right) \cdot z\right) \cdot z \]
                          12. metadata-evalN/A

                            \[\leadsto \left(\left(\frac{y}{x} + \frac{\color{blue}{\frac{7936500793651}{10000000000000000}}}{x}\right) \cdot z\right) \cdot z \]
                          13. lower-/.f6422.5

                            \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{0.0007936500793651}{x}}\right) \cdot z\right) \cdot z \]
                        5. Applied rewrites22.5%

                          \[\leadsto \color{blue}{\left(\left(\frac{y}{x} + \frac{0.0007936500793651}{x}\right) \cdot z\right) \cdot z} \]
                        6. Taylor expanded in y around 0

                          \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{z}{x} + \frac{y \cdot z}{x}\right) \cdot z \]
                        7. Step-by-step derivation
                          1. Applied rewrites22.5%

                            \[\leadsto \left(\frac{z}{x} \cdot \left(0.0007936500793651 + y\right)\right) \cdot z \]
                        8. Recombined 2 regimes into one program.
                        9. Add Preprocessing

                        Alternative 13: 44.4% accurate, 5.9× speedup?

                        \[\begin{array}{l} \\ \left(\frac{z}{x} \cdot \left(0.0007936500793651 + y\right)\right) \cdot z \end{array} \]
                        (FPCore (x y z) :precision binary64 (* (* (/ z x) (+ 0.0007936500793651 y)) z))
                        double code(double x, double y, double z) {
                        	return ((z / x) * (0.0007936500793651 + y)) * z;
                        }
                        
                        real(8) function code(x, y, z)
                            real(8), intent (in) :: x
                            real(8), intent (in) :: y
                            real(8), intent (in) :: z
                            code = ((z / x) * (0.0007936500793651d0 + y)) * z
                        end function
                        
                        public static double code(double x, double y, double z) {
                        	return ((z / x) * (0.0007936500793651 + y)) * z;
                        }
                        
                        def code(x, y, z):
                        	return ((z / x) * (0.0007936500793651 + y)) * z
                        
                        function code(x, y, z)
                        	return Float64(Float64(Float64(z / x) * Float64(0.0007936500793651 + y)) * z)
                        end
                        
                        function tmp = code(x, y, z)
                        	tmp = ((z / x) * (0.0007936500793651 + y)) * z;
                        end
                        
                        code[x_, y_, z_] := N[(N[(N[(z / x), $MachinePrecision] * N[(0.0007936500793651 + y), $MachinePrecision]), $MachinePrecision] * z), $MachinePrecision]
                        
                        \begin{array}{l}
                        
                        \\
                        \left(\frac{z}{x} \cdot \left(0.0007936500793651 + y\right)\right) \cdot z
                        \end{array}
                        
                        Derivation
                        1. Initial program 94.2%

                          \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                        2. Add Preprocessing
                        3. Taylor expanded in z around inf

                          \[\leadsto \color{blue}{{z}^{2} \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)} \]
                        4. Step-by-step derivation
                          1. *-commutativeN/A

                            \[\leadsto \color{blue}{\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot {z}^{2}} \]
                          2. unpow2N/A

                            \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot \color{blue}{\left(z \cdot z\right)} \]
                          3. associate-*r*N/A

                            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right) \cdot z} \]
                          4. *-commutativeN/A

                            \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right)} \cdot z \]
                          5. lower-*.f64N/A

                            \[\leadsto \color{blue}{\left(z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right)\right) \cdot z} \]
                          6. *-commutativeN/A

                            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                          7. lower-*.f64N/A

                            \[\leadsto \color{blue}{\left(\left(\frac{7936500793651}{10000000000000000} \cdot \frac{1}{x} + \frac{y}{x}\right) \cdot z\right)} \cdot z \]
                          8. +-commutativeN/A

                            \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                          9. lower-+.f64N/A

                            \[\leadsto \left(\color{blue}{\left(\frac{y}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right)} \cdot z\right) \cdot z \]
                          10. lower-/.f64N/A

                            \[\leadsto \left(\left(\color{blue}{\frac{y}{x}} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x}\right) \cdot z\right) \cdot z \]
                          11. associate-*r/N/A

                            \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{\frac{7936500793651}{10000000000000000} \cdot 1}{x}}\right) \cdot z\right) \cdot z \]
                          12. metadata-evalN/A

                            \[\leadsto \left(\left(\frac{y}{x} + \frac{\color{blue}{\frac{7936500793651}{10000000000000000}}}{x}\right) \cdot z\right) \cdot z \]
                          13. lower-/.f6438.8

                            \[\leadsto \left(\left(\frac{y}{x} + \color{blue}{\frac{0.0007936500793651}{x}}\right) \cdot z\right) \cdot z \]
                        5. Applied rewrites38.8%

                          \[\leadsto \color{blue}{\left(\left(\frac{y}{x} + \frac{0.0007936500793651}{x}\right) \cdot z\right) \cdot z} \]
                        6. Taylor expanded in y around 0

                          \[\leadsto \left(\frac{7936500793651}{10000000000000000} \cdot \frac{z}{x} + \frac{y \cdot z}{x}\right) \cdot z \]
                        7. Step-by-step derivation
                          1. Applied rewrites38.7%

                            \[\leadsto \left(\frac{z}{x} \cdot \left(0.0007936500793651 + y\right)\right) \cdot z \]
                          2. Add Preprocessing

                          Alternative 14: 32.6% accurate, 6.7× speedup?

                          \[\begin{array}{l} \\ \left(\frac{z}{x} \cdot z\right) \cdot y \end{array} \]
                          (FPCore (x y z) :precision binary64 (* (* (/ z x) z) y))
                          double code(double x, double y, double z) {
                          	return ((z / x) * z) * y;
                          }
                          
                          real(8) function code(x, y, z)
                              real(8), intent (in) :: x
                              real(8), intent (in) :: y
                              real(8), intent (in) :: z
                              code = ((z / x) * z) * y
                          end function
                          
                          public static double code(double x, double y, double z) {
                          	return ((z / x) * z) * y;
                          }
                          
                          def code(x, y, z):
                          	return ((z / x) * z) * y
                          
                          function code(x, y, z)
                          	return Float64(Float64(Float64(z / x) * z) * y)
                          end
                          
                          function tmp = code(x, y, z)
                          	tmp = ((z / x) * z) * y;
                          end
                          
                          code[x_, y_, z_] := N[(N[(N[(z / x), $MachinePrecision] * z), $MachinePrecision] * y), $MachinePrecision]
                          
                          \begin{array}{l}
                          
                          \\
                          \left(\frac{z}{x} \cdot z\right) \cdot y
                          \end{array}
                          
                          Derivation
                          1. Initial program 94.2%

                            \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                          2. Add Preprocessing
                          3. Taylor expanded in y around inf

                            \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
                          4. Step-by-step derivation
                            1. lower-/.f64N/A

                              \[\leadsto \color{blue}{\frac{y \cdot {z}^{2}}{x}} \]
                            2. *-commutativeN/A

                              \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
                            3. lower-*.f64N/A

                              \[\leadsto \frac{\color{blue}{{z}^{2} \cdot y}}{x} \]
                            4. unpow2N/A

                              \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
                            5. lower-*.f6427.4

                              \[\leadsto \frac{\color{blue}{\left(z \cdot z\right)} \cdot y}{x} \]
                          5. Applied rewrites27.4%

                            \[\leadsto \color{blue}{\frac{\left(z \cdot z\right) \cdot y}{x}} \]
                          6. Step-by-step derivation
                            1. Applied rewrites31.4%

                              \[\leadsto y \cdot \color{blue}{\left(\frac{z}{x} \cdot z\right)} \]
                            2. Final simplification31.4%

                              \[\leadsto \left(\frac{z}{x} \cdot z\right) \cdot y \]
                            3. Add Preprocessing

                            Alternative 15: 8.9% accurate, 8.7× speedup?

                            \[\begin{array}{l} \\ \frac{z}{x} \cdot -0.0027777777777778 \end{array} \]
                            (FPCore (x y z) :precision binary64 (* (/ z x) -0.0027777777777778))
                            double code(double x, double y, double z) {
                            	return (z / x) * -0.0027777777777778;
                            }
                            
                            real(8) function code(x, y, z)
                                real(8), intent (in) :: x
                                real(8), intent (in) :: y
                                real(8), intent (in) :: z
                                code = (z / x) * (-0.0027777777777778d0)
                            end function
                            
                            public static double code(double x, double y, double z) {
                            	return (z / x) * -0.0027777777777778;
                            }
                            
                            def code(x, y, z):
                            	return (z / x) * -0.0027777777777778
                            
                            function code(x, y, z)
                            	return Float64(Float64(z / x) * -0.0027777777777778)
                            end
                            
                            function tmp = code(x, y, z)
                            	tmp = (z / x) * -0.0027777777777778;
                            end
                            
                            code[x_, y_, z_] := N[(N[(z / x), $MachinePrecision] * -0.0027777777777778), $MachinePrecision]
                            
                            \begin{array}{l}
                            
                            \\
                            \frac{z}{x} \cdot -0.0027777777777778
                            \end{array}
                            
                            Derivation
                            1. Initial program 94.2%

                              \[\left(\left(\left(x - 0.5\right) \cdot \log x - x\right) + 0.91893853320467\right) + \frac{\left(\left(y + 0.0007936500793651\right) \cdot z - 0.0027777777777778\right) \cdot z + 0.083333333333333}{x} \]
                            2. Add Preprocessing
                            3. Taylor expanded in y around inf

                              \[\leadsto \color{blue}{y \cdot \left(\left(\frac{\frac{83333333333333}{1000000000000000}}{x \cdot y} + \left(\frac{91893853320467}{100000000000000} \cdot \frac{1}{y} + \left(\frac{z \cdot \left(\frac{7936500793651}{10000000000000000} \cdot z - \frac{13888888888889}{5000000000000000}\right)}{x \cdot y} + \left(\frac{\log x \cdot \left(x - \frac{1}{2}\right)}{y} + \frac{{z}^{2}}{x}\right)\right)\right)\right) - \frac{x}{y}\right)} \]
                            4. Applied rewrites84.6%

                              \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\mathsf{fma}\left(\frac{z}{x}, \frac{\mathsf{fma}\left(0.0007936500793651, z, -0.0027777777777778\right)}{y} + z, \frac{x - 0.5}{y} \cdot \log x\right) + \frac{0.91893853320467}{y}\right) - \frac{x}{y}, y, \frac{0.083333333333333}{x}\right)} \]
                            5. Taylor expanded in x around inf

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

                                \[\leadsto \mathsf{fma}\left(\frac{\log x \cdot x}{y} - \frac{x}{y}, y, \frac{0.083333333333333}{x}\right) \]
                              2. Taylor expanded in z around inf

                                \[\leadsto {z}^{2} \cdot \color{blue}{\left(y \cdot \left(\frac{1}{x} + \frac{7936500793651}{10000000000000000} \cdot \frac{1}{x \cdot y}\right) - \frac{13888888888889}{5000000000000000} \cdot \frac{1}{x \cdot z}\right)} \]
                              3. Step-by-step derivation
                                1. Applied rewrites36.4%

                                  \[\leadsto \mathsf{fma}\left(\frac{\frac{0.0007936500793651}{x}}{y} + \frac{1}{x}, y, \frac{-0.0027777777777778}{z \cdot x}\right) \cdot \color{blue}{\left(z \cdot z\right)} \]
                                2. Taylor expanded in z around 0

                                  \[\leadsto \frac{-13888888888889}{5000000000000000} \cdot \frac{z}{\color{blue}{x}} \]
                                3. Step-by-step derivation
                                  1. Applied rewrites9.4%

                                    \[\leadsto -0.0027777777777778 \cdot \frac{z}{\color{blue}{x}} \]
                                  2. Final simplification9.4%

                                    \[\leadsto \frac{z}{x} \cdot -0.0027777777777778 \]
                                  3. Add Preprocessing

                                  Developer Target 1: 98.7% accurate, 0.9× speedup?

                                  \[\begin{array}{l} \\ \left(\left(\left(x - 0.5\right) \cdot \log x + \left(0.91893853320467 - x\right)\right) + \frac{0.083333333333333}{x}\right) + \frac{z}{x} \cdot \left(z \cdot \left(y + 0.0007936500793651\right) - 0.0027777777777778\right) \end{array} \]
                                  (FPCore (x y z)
                                   :precision binary64
                                   (+
                                    (+ (+ (* (- x 0.5) (log x)) (- 0.91893853320467 x)) (/ 0.083333333333333 x))
                                    (* (/ z x) (- (* z (+ y 0.0007936500793651)) 0.0027777777777778))))
                                  double code(double x, double y, double z) {
                                  	return ((((x - 0.5) * log(x)) + (0.91893853320467 - x)) + (0.083333333333333 / x)) + ((z / x) * ((z * (y + 0.0007936500793651)) - 0.0027777777777778));
                                  }
                                  
                                  real(8) function code(x, y, z)
                                      real(8), intent (in) :: x
                                      real(8), intent (in) :: y
                                      real(8), intent (in) :: z
                                      code = ((((x - 0.5d0) * log(x)) + (0.91893853320467d0 - x)) + (0.083333333333333d0 / x)) + ((z / x) * ((z * (y + 0.0007936500793651d0)) - 0.0027777777777778d0))
                                  end function
                                  
                                  public static double code(double x, double y, double z) {
                                  	return ((((x - 0.5) * Math.log(x)) + (0.91893853320467 - x)) + (0.083333333333333 / x)) + ((z / x) * ((z * (y + 0.0007936500793651)) - 0.0027777777777778));
                                  }
                                  
                                  def code(x, y, z):
                                  	return ((((x - 0.5) * math.log(x)) + (0.91893853320467 - x)) + (0.083333333333333 / x)) + ((z / x) * ((z * (y + 0.0007936500793651)) - 0.0027777777777778))
                                  
                                  function code(x, y, z)
                                  	return Float64(Float64(Float64(Float64(Float64(x - 0.5) * log(x)) + Float64(0.91893853320467 - x)) + Float64(0.083333333333333 / x)) + Float64(Float64(z / x) * Float64(Float64(z * Float64(y + 0.0007936500793651)) - 0.0027777777777778)))
                                  end
                                  
                                  function tmp = code(x, y, z)
                                  	tmp = ((((x - 0.5) * log(x)) + (0.91893853320467 - x)) + (0.083333333333333 / x)) + ((z / x) * ((z * (y + 0.0007936500793651)) - 0.0027777777777778));
                                  end
                                  
                                  code[x_, y_, z_] := N[(N[(N[(N[(N[(x - 0.5), $MachinePrecision] * N[Log[x], $MachinePrecision]), $MachinePrecision] + N[(0.91893853320467 - x), $MachinePrecision]), $MachinePrecision] + N[(0.083333333333333 / x), $MachinePrecision]), $MachinePrecision] + N[(N[(z / x), $MachinePrecision] * N[(N[(z * N[(y + 0.0007936500793651), $MachinePrecision]), $MachinePrecision] - 0.0027777777777778), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
                                  
                                  \begin{array}{l}
                                  
                                  \\
                                  \left(\left(\left(x - 0.5\right) \cdot \log x + \left(0.91893853320467 - x\right)\right) + \frac{0.083333333333333}{x}\right) + \frac{z}{x} \cdot \left(z \cdot \left(y + 0.0007936500793651\right) - 0.0027777777777778\right)
                                  \end{array}
                                  

                                  Reproduce

                                  ?
                                  herbie shell --seed 2024331 
                                  (FPCore (x y z)
                                    :name "Numeric.SpecFunctions:$slogFactorial from math-functions-0.1.5.2, B"
                                    :precision binary64
                                  
                                    :alt
                                    (! :herbie-platform default (+ (+ (+ (* (- x 1/2) (log x)) (- 91893853320467/100000000000000 x)) (/ 83333333333333/1000000000000000 x)) (* (/ z x) (- (* z (+ y 7936500793651/10000000000000000)) 13888888888889/5000000000000000))))
                                  
                                    (+ (+ (- (* (- x 0.5) (log x)) x) 0.91893853320467) (/ (+ (* (- (* (+ y 0.0007936500793651) z) 0.0027777777777778) z) 0.083333333333333) x)))