Data.Approximate.Numerics:blog from approximate-0.2.2.1

Percentage Accurate: 99.7% → 99.9%
Time: 5.6s
Alternatives: 14
Speedup: 1.1×

Specification

?
\[\begin{array}{l} \\ \frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \end{array} \]
(FPCore (x)
 :precision binary64
 (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))))
double code(double x) {
	return (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(8) function code(x)
use fmin_fmax_functions
    real(8), intent (in) :: x
    code = (6.0d0 * (x - 1.0d0)) / ((x + 1.0d0) + (4.0d0 * sqrt(x)))
end function
public static double code(double x) {
	return (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * Math.sqrt(x)));
}
def code(x):
	return (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * math.sqrt(x)))
function code(x)
	return Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(Float64(x + 1.0) + Float64(4.0 * sqrt(x))))
end
function tmp = code(x)
	tmp = (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)));
end
code[x_] := N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(N[(x + 1.0), $MachinePrecision] + N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}}
\end{array}

Local Percentage Accuracy vs ?

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

Accuracy vs Speed?

Herbie found 14 alternatives:

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

Initial Program: 99.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \end{array} \]
(FPCore (x)
 :precision binary64
 (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))))
double code(double x) {
	return (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(8) function code(x)
use fmin_fmax_functions
    real(8), intent (in) :: x
    code = (6.0d0 * (x - 1.0d0)) / ((x + 1.0d0) + (4.0d0 * sqrt(x)))
end function
public static double code(double x) {
	return (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * Math.sqrt(x)));
}
def code(x):
	return (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * math.sqrt(x)))
function code(x)
	return Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(Float64(x + 1.0) + Float64(4.0 * sqrt(x))))
end
function tmp = code(x)
	tmp = (6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)));
end
code[x_] := N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(N[(x + 1.0), $MachinePrecision] + N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}}
\end{array}

Alternative 1: 99.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{6}{\frac{-1 - \mathsf{fma}\left(\sqrt{x}, 4, x\right)}{1 - x}} \end{array} \]
(FPCore (x)
 :precision binary64
 (/ 6.0 (/ (- -1.0 (fma (sqrt x) 4.0 x)) (- 1.0 x))))
double code(double x) {
	return 6.0 / ((-1.0 - fma(sqrt(x), 4.0, x)) / (1.0 - x));
}
function code(x)
	return Float64(6.0 / Float64(Float64(-1.0 - fma(sqrt(x), 4.0, x)) / Float64(1.0 - x)))
end
code[x_] := N[(6.0 / N[(N[(-1.0 - N[(N[Sqrt[x], $MachinePrecision] * 4.0 + x), $MachinePrecision]), $MachinePrecision] / N[(1.0 - x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{6}{\frac{-1 - \mathsf{fma}\left(\sqrt{x}, 4, x\right)}{1 - x}}
\end{array}
Derivation
  1. Initial program 99.7%

    \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
  2. Applied rewrites99.9%

    \[\leadsto \color{blue}{\frac{1 - x}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \cdot -6} \]
  3. Step-by-step derivation
    1. lift-/.f64N/A

      \[\leadsto \color{blue}{\frac{1 - x}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \cdot -6 \]
    2. div-flipN/A

      \[\leadsto \color{blue}{\frac{1}{\frac{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}{1 - x}}} \cdot -6 \]
    3. lower-special-/.f64N/A

      \[\leadsto \color{blue}{\frac{1}{\frac{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}{1 - x}}} \cdot -6 \]
    4. lower-special-/.f6499.9

      \[\leadsto \frac{1}{\color{blue}{\frac{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}{1 - x}}} \cdot -6 \]
  4. Applied rewrites99.9%

    \[\leadsto \color{blue}{\frac{1}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}}} \cdot -6 \]
  5. Step-by-step derivation
    1. lift-*.f64N/A

      \[\leadsto \color{blue}{\frac{1}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}} \cdot -6} \]
    2. lift-/.f64N/A

      \[\leadsto \color{blue}{\frac{1}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}}} \cdot -6 \]
    3. associate-*l/N/A

      \[\leadsto \color{blue}{\frac{1 \cdot -6}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}}} \]
    4. metadata-evalN/A

      \[\leadsto \frac{\color{blue}{-6}}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}} \]
    5. frac-2negN/A

      \[\leadsto \color{blue}{\frac{\mathsf{neg}\left(-6\right)}{\mathsf{neg}\left(\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}\right)}} \]
    6. metadata-evalN/A

      \[\leadsto \frac{\color{blue}{6}}{\mathsf{neg}\left(\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}\right)} \]
    7. lower-/.f64N/A

      \[\leadsto \color{blue}{\frac{6}{\mathsf{neg}\left(\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}\right)}} \]
    8. lift-/.f64N/A

      \[\leadsto \frac{6}{\mathsf{neg}\left(\color{blue}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x - -1\right)}{1 - x}}\right)} \]
    9. lift-fma.f64N/A

      \[\leadsto \frac{6}{\mathsf{neg}\left(\frac{\color{blue}{4 \cdot \sqrt{x} + \left(x - -1\right)}}{1 - x}\right)} \]
    10. lift--.f64N/A

      \[\leadsto \frac{6}{\mathsf{neg}\left(\frac{4 \cdot \sqrt{x} + \color{blue}{\left(x - -1\right)}}{1 - x}\right)} \]
    11. associate--l+N/A

      \[\leadsto \frac{6}{\mathsf{neg}\left(\frac{\color{blue}{\left(4 \cdot \sqrt{x} + x\right) - -1}}{1 - x}\right)} \]
    12. lift-fma.f64N/A

      \[\leadsto \frac{6}{\mathsf{neg}\left(\frac{\color{blue}{\mathsf{fma}\left(4, \sqrt{x}, x\right)} - -1}{1 - x}\right)} \]
    13. lift--.f64N/A

      \[\leadsto \frac{6}{\mathsf{neg}\left(\frac{\color{blue}{\mathsf{fma}\left(4, \sqrt{x}, x\right) - -1}}{1 - x}\right)} \]
    14. distribute-neg-fracN/A

      \[\leadsto \frac{6}{\color{blue}{\frac{\mathsf{neg}\left(\left(\mathsf{fma}\left(4, \sqrt{x}, x\right) - -1\right)\right)}{1 - x}}} \]
    15. lower-/.f64N/A

      \[\leadsto \frac{6}{\color{blue}{\frac{\mathsf{neg}\left(\left(\mathsf{fma}\left(4, \sqrt{x}, x\right) - -1\right)\right)}{1 - x}}} \]
  6. Applied rewrites99.9%

    \[\leadsto \color{blue}{\frac{6}{\frac{-1 - \mathsf{fma}\left(\sqrt{x}, 4, x\right)}{1 - x}}} \]
  7. Add Preprocessing

Alternative 2: 99.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \frac{1 - x}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \cdot -6 \end{array} \]
(FPCore (x)
 :precision binary64
 (* (/ (- 1.0 x) (fma (sqrt x) 4.0 (- x -1.0))) -6.0))
double code(double x) {
	return ((1.0 - x) / fma(sqrt(x), 4.0, (x - -1.0))) * -6.0;
}
function code(x)
	return Float64(Float64(Float64(1.0 - x) / fma(sqrt(x), 4.0, Float64(x - -1.0))) * -6.0)
end
code[x_] := N[(N[(N[(1.0 - x), $MachinePrecision] / N[(N[Sqrt[x], $MachinePrecision] * 4.0 + N[(x - -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * -6.0), $MachinePrecision]
\begin{array}{l}

\\
\frac{1 - x}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \cdot -6
\end{array}
Derivation
  1. Initial program 99.7%

    \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
  2. Applied rewrites99.9%

    \[\leadsto \color{blue}{\frac{1 - x}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \cdot -6} \]
  3. Add Preprocessing

Alternative 3: 99.7% accurate, 1.1× speedup?

\[\begin{array}{l} \\ \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(4, \sqrt{x}, x\right) - -1} \end{array} \]
(FPCore (x)
 :precision binary64
 (/ (fma x 6.0 -6.0) (- (fma 4.0 (sqrt x) x) -1.0)))
double code(double x) {
	return fma(x, 6.0, -6.0) / (fma(4.0, sqrt(x), x) - -1.0);
}
function code(x)
	return Float64(fma(x, 6.0, -6.0) / Float64(fma(4.0, sqrt(x), x) - -1.0))
end
code[x_] := N[(N[(x * 6.0 + -6.0), $MachinePrecision] / N[(N[(4.0 * N[Sqrt[x], $MachinePrecision] + x), $MachinePrecision] - -1.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(4, \sqrt{x}, x\right) - -1}
\end{array}
Derivation
  1. Initial program 99.7%

    \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
  2. Step-by-step derivation
    1. lift-*.f64N/A

      \[\leadsto \frac{\color{blue}{6 \cdot \left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. lift--.f64N/A

      \[\leadsto \frac{6 \cdot \color{blue}{\left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    3. sub-flipN/A

      \[\leadsto \frac{6 \cdot \color{blue}{\left(x + \left(\mathsf{neg}\left(1\right)\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    4. distribute-rgt-inN/A

      \[\leadsto \frac{\color{blue}{x \cdot 6 + \left(\mathsf{neg}\left(1\right)\right) \cdot 6}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    5. distribute-lft-neg-outN/A

      \[\leadsto \frac{x \cdot 6 + \color{blue}{\left(\mathsf{neg}\left(1 \cdot 6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    6. metadata-evalN/A

      \[\leadsto \frac{x \cdot 6 + \left(\mathsf{neg}\left(\color{blue}{6}\right)\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    7. lower-fma.f64N/A

      \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, 6, \mathsf{neg}\left(6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    8. metadata-eval99.7

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, \color{blue}{-6}\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    9. lift-+.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
    10. +-commutativeN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(x + 1\right)}} \]
    11. add-flipN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)}} \]
    12. sub-flip-reverseN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)}} \]
    13. lift-*.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
    14. *-commutativeN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
    15. remove-double-negN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x + 1\right)}} \]
    16. lower-fma.f6499.7

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(\sqrt{x}, 4, x + 1\right)}} \]
    17. lift-+.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x + 1}\right)} \]
    18. add-flipN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
    19. lower--.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
    20. metadata-eval99.7

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - \color{blue}{-1}\right)} \]
  3. Applied rewrites99.7%

    \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \]
  4. Step-by-step derivation
    1. lift-fma.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4 + \left(x - -1\right)}} \]
    2. lift--.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x - -1\right)}} \]
    3. associate-+r-N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(\sqrt{x} \cdot 4 + x\right) - -1}} \]
    4. lower--.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(\sqrt{x} \cdot 4 + x\right) - -1}} \]
    5. *-commutativeN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(\color{blue}{4 \cdot \sqrt{x}} + x\right) - -1} \]
    6. lift-*.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(\color{blue}{4 \cdot \sqrt{x}} + x\right) - -1} \]
    7. +-commutativeN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 4 \cdot \sqrt{x}\right)} - -1} \]
    8. lift-*.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(x + \color{blue}{4 \cdot \sqrt{x}}\right) - -1} \]
    9. fp-cancel-sign-sub-invN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x - \left(\mathsf{neg}\left(4\right)\right) \cdot \sqrt{x}\right)} - -1} \]
    10. metadata-evalN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(x - \color{blue}{-4} \cdot \sqrt{x}\right) - -1} \]
    11. sub-to-multN/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right) \cdot x} - -1} \]
    12. lower-special-*.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right) \cdot x} - -1} \]
    13. lower-special--.f32N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right)} \cdot x - -1} \]
    14. lower-special-/.f32N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(1 - \color{blue}{\frac{-4 \cdot \sqrt{x}}{x}}\right) \cdot x - -1} \]
    15. lower-/.f32N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(1 - \color{blue}{\frac{-4 \cdot \sqrt{x}}{x}}\right) \cdot x - -1} \]
    16. lower--.f32N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right)} \cdot x - -1} \]
    17. lower-*.f64N/A

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right) \cdot x} - -1} \]
  5. Applied rewrites99.7%

    \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(4, \sqrt{x}, x\right) - -1}} \]
  6. Add Preprocessing

Alternative 4: 97.9% accurate, 0.9× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 4:\\ \;\;\;\;\frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \sqrt{x}}\\ \mathbf{else}:\\ \;\;\;\;\frac{-1}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)} \cdot -6\\ \end{array} \end{array} \]
(FPCore (x)
 :precision binary64
 (if (<= x 4.0)
   (/ (* 6.0 (- x 1.0)) (- 1.0 (* -4.0 (sqrt x))))
   (* (/ -1.0 (fma (sqrt (/ 1.0 x)) 4.0 1.0)) -6.0)))
double code(double x) {
	double tmp;
	if (x <= 4.0) {
		tmp = (6.0 * (x - 1.0)) / (1.0 - (-4.0 * sqrt(x)));
	} else {
		tmp = (-1.0 / fma(sqrt((1.0 / x)), 4.0, 1.0)) * -6.0;
	}
	return tmp;
}
function code(x)
	tmp = 0.0
	if (x <= 4.0)
		tmp = Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(1.0 - Float64(-4.0 * sqrt(x))));
	else
		tmp = Float64(Float64(-1.0 / fma(sqrt(Float64(1.0 / x)), 4.0, 1.0)) * -6.0);
	end
	return tmp
end
code[x_] := If[LessEqual[x, 4.0], N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(1.0 - N[(-4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(-1.0 / N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] * 4.0 + 1.0), $MachinePrecision]), $MachinePrecision] * -6.0), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 4:\\
\;\;\;\;\frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \sqrt{x}}\\

\mathbf{else}:\\
\;\;\;\;\frac{-1}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)} \cdot -6\\


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

    1. Initial program 99.7%

      \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
      2. lift-+.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(x + 1\right)} + 4 \cdot \sqrt{x}} \]
      3. associate-+l+N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{x + \left(1 + 4 \cdot \sqrt{x}\right)}} \]
      4. add-flipN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{x - \left(\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)\right)}} \]
      5. sub-to-multN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}\right) \cdot x}} \]
      6. lower-special-*.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}\right) \cdot x}} \]
      7. lower-special--.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}\right)} \cdot x} \]
      8. lower-special-/.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \color{blue}{\frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}}\right) \cdot x} \]
      9. +-commutativeN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\mathsf{neg}\left(\color{blue}{\left(4 \cdot \sqrt{x} + 1\right)}\right)}{x}\right) \cdot x} \]
      10. distribute-neg-inN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\color{blue}{\left(\mathsf{neg}\left(4 \cdot \sqrt{x}\right)\right) + \left(\mathsf{neg}\left(1\right)\right)}}{x}\right) \cdot x} \]
      11. lift-*.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\left(\mathsf{neg}\left(\color{blue}{4 \cdot \sqrt{x}}\right)\right) + \left(\mathsf{neg}\left(1\right)\right)}{x}\right) \cdot x} \]
      12. distribute-lft-neg-outN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot \sqrt{x}} + \left(\mathsf{neg}\left(1\right)\right)}{x}\right) \cdot x} \]
      13. lower-fma.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(4\right), \sqrt{x}, \mathsf{neg}\left(1\right)\right)}}{x}\right) \cdot x} \]
      14. metadata-evalN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\mathsf{fma}\left(\color{blue}{-4}, \sqrt{x}, \mathsf{neg}\left(1\right)\right)}{x}\right) \cdot x} \]
      15. metadata-eval99.6

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\mathsf{fma}\left(-4, \sqrt{x}, \color{blue}{-1}\right)}{x}\right) \cdot x} \]
    3. Applied rewrites99.6%

      \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}{x}\right) \cdot x}} \]
    4. Taylor expanded in x around 0

      \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{1 - -4 \cdot \sqrt{x}}} \]
    5. Step-by-step derivation
      1. lower--.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{1 - \color{blue}{-4 \cdot \sqrt{x}}} \]
      2. lower-*.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \color{blue}{\sqrt{x}}} \]
      3. lower-sqrt.f6451.2

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \sqrt{x}} \]
    6. Applied rewrites51.2%

      \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{1 - -4 \cdot \sqrt{x}}} \]

    if 4 < x

    1. Initial program 99.7%

      \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
    3. Step-by-step derivation
      1. lower-/.f64N/A

        \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
      2. lower-+.f64N/A

        \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
      3. lower-*.f64N/A

        \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
      4. lower-sqrt.f64N/A

        \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
      5. lower-/.f6451.1

        \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
    4. Applied rewrites51.1%

      \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
    5. Step-by-step derivation
      1. lift-/.f64N/A

        \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
      2. frac-2negN/A

        \[\leadsto \frac{\mathsf{neg}\left(6\right)}{\color{blue}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{\frac{1}{x}}\right)\right)}} \]
      3. metadata-evalN/A

        \[\leadsto \frac{-6}{\mathsf{neg}\left(\color{blue}{\left(1 + 4 \cdot \sqrt{\frac{1}{x}}\right)}\right)} \]
      4. mult-flipN/A

        \[\leadsto -6 \cdot \color{blue}{\frac{1}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{\frac{1}{x}}\right)\right)}} \]
      5. *-commutativeN/A

        \[\leadsto \frac{1}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{\frac{1}{x}}\right)\right)} \cdot \color{blue}{-6} \]
      6. lower-*.f64N/A

        \[\leadsto \frac{1}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{\frac{1}{x}}\right)\right)} \cdot \color{blue}{-6} \]
      7. metadata-evalN/A

        \[\leadsto \frac{\mathsf{neg}\left(-1\right)}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{\frac{1}{x}}\right)\right)} \cdot -6 \]
      8. frac-2neg-revN/A

        \[\leadsto \frac{-1}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \cdot -6 \]
      9. lower-/.f6451.1

        \[\leadsto \frac{-1}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \cdot -6 \]
      10. lift-+.f64N/A

        \[\leadsto \frac{-1}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \cdot -6 \]
      11. +-commutativeN/A

        \[\leadsto \frac{-1}{4 \cdot \sqrt{\frac{1}{x}} + 1} \cdot -6 \]
      12. lift-*.f64N/A

        \[\leadsto \frac{-1}{4 \cdot \sqrt{\frac{1}{x}} + 1} \cdot -6 \]
      13. *-commutativeN/A

        \[\leadsto \frac{-1}{\sqrt{\frac{1}{x}} \cdot 4 + 1} \cdot -6 \]
      14. lower-fma.f6451.1

        \[\leadsto \frac{-1}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)} \cdot -6 \]
    6. Applied rewrites51.1%

      \[\leadsto \frac{-1}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)} \cdot \color{blue}{-6} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 5: 97.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 4:\\ \;\;\;\;\frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \sqrt{x}}\\ \mathbf{else}:\\ \;\;\;\;\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}\\ \end{array} \end{array} \]
(FPCore (x)
 :precision binary64
 (if (<= x 4.0)
   (/ (* 6.0 (- x 1.0)) (- 1.0 (* -4.0 (sqrt x))))
   (/ 6.0 (fma (sqrt (/ 1.0 x)) 4.0 1.0))))
double code(double x) {
	double tmp;
	if (x <= 4.0) {
		tmp = (6.0 * (x - 1.0)) / (1.0 - (-4.0 * sqrt(x)));
	} else {
		tmp = 6.0 / fma(sqrt((1.0 / x)), 4.0, 1.0);
	}
	return tmp;
}
function code(x)
	tmp = 0.0
	if (x <= 4.0)
		tmp = Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(1.0 - Float64(-4.0 * sqrt(x))));
	else
		tmp = Float64(6.0 / fma(sqrt(Float64(1.0 / x)), 4.0, 1.0));
	end
	return tmp
end
code[x_] := If[LessEqual[x, 4.0], N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(1.0 - N[(-4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(6.0 / N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] * 4.0 + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 4:\\
\;\;\;\;\frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \sqrt{x}}\\

\mathbf{else}:\\
\;\;\;\;\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}\\


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

    1. Initial program 99.7%

      \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
      2. lift-+.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(x + 1\right)} + 4 \cdot \sqrt{x}} \]
      3. associate-+l+N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{x + \left(1 + 4 \cdot \sqrt{x}\right)}} \]
      4. add-flipN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{x - \left(\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)\right)}} \]
      5. sub-to-multN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}\right) \cdot x}} \]
      6. lower-special-*.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}\right) \cdot x}} \]
      7. lower-special--.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}\right)} \cdot x} \]
      8. lower-special-/.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \color{blue}{\frac{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}{x}}\right) \cdot x} \]
      9. +-commutativeN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\mathsf{neg}\left(\color{blue}{\left(4 \cdot \sqrt{x} + 1\right)}\right)}{x}\right) \cdot x} \]
      10. distribute-neg-inN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\color{blue}{\left(\mathsf{neg}\left(4 \cdot \sqrt{x}\right)\right) + \left(\mathsf{neg}\left(1\right)\right)}}{x}\right) \cdot x} \]
      11. lift-*.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\left(\mathsf{neg}\left(\color{blue}{4 \cdot \sqrt{x}}\right)\right) + \left(\mathsf{neg}\left(1\right)\right)}{x}\right) \cdot x} \]
      12. distribute-lft-neg-outN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\color{blue}{\left(\mathsf{neg}\left(4\right)\right) \cdot \sqrt{x}} + \left(\mathsf{neg}\left(1\right)\right)}{x}\right) \cdot x} \]
      13. lower-fma.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\color{blue}{\mathsf{fma}\left(\mathsf{neg}\left(4\right), \sqrt{x}, \mathsf{neg}\left(1\right)\right)}}{x}\right) \cdot x} \]
      14. metadata-evalN/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\mathsf{fma}\left(\color{blue}{-4}, \sqrt{x}, \mathsf{neg}\left(1\right)\right)}{x}\right) \cdot x} \]
      15. metadata-eval99.6

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\left(1 - \frac{\mathsf{fma}\left(-4, \sqrt{x}, \color{blue}{-1}\right)}{x}\right) \cdot x} \]
    3. Applied rewrites99.6%

      \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{\left(1 - \frac{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}{x}\right) \cdot x}} \]
    4. Taylor expanded in x around 0

      \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{1 - -4 \cdot \sqrt{x}}} \]
    5. Step-by-step derivation
      1. lower--.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{1 - \color{blue}{-4 \cdot \sqrt{x}}} \]
      2. lower-*.f64N/A

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \color{blue}{\sqrt{x}}} \]
      3. lower-sqrt.f6451.2

        \[\leadsto \frac{6 \cdot \left(x - 1\right)}{1 - -4 \cdot \sqrt{x}} \]
    6. Applied rewrites51.2%

      \[\leadsto \frac{6 \cdot \left(x - 1\right)}{\color{blue}{1 - -4 \cdot \sqrt{x}}} \]

    if 4 < x

    1. Initial program 99.7%

      \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
    3. Step-by-step derivation
      1. lower-/.f64N/A

        \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
      2. lower-+.f64N/A

        \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
      3. lower-*.f64N/A

        \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
      4. lower-sqrt.f64N/A

        \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
      5. lower-/.f6451.1

        \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
    4. Applied rewrites51.1%

      \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
    5. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
      2. +-commutativeN/A

        \[\leadsto \frac{6}{4 \cdot \sqrt{\frac{1}{x}} + \color{blue}{1}} \]
      3. lift-*.f64N/A

        \[\leadsto \frac{6}{4 \cdot \sqrt{\frac{1}{x}} + 1} \]
      4. *-commutativeN/A

        \[\leadsto \frac{6}{\sqrt{\frac{1}{x}} \cdot 4 + 1} \]
      5. lower-fma.f6451.1

        \[\leadsto \frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, \color{blue}{4}, 1\right)} \]
    6. Applied rewrites51.1%

      \[\leadsto \color{blue}{\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 6: 97.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 4:\\ \;\;\;\;\frac{\mathsf{fma}\left(x, 6, -6\right)}{4 \cdot \sqrt{x} - -1}\\ \mathbf{else}:\\ \;\;\;\;\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}\\ \end{array} \end{array} \]
(FPCore (x)
 :precision binary64
 (if (<= x 4.0)
   (/ (fma x 6.0 -6.0) (- (* 4.0 (sqrt x)) -1.0))
   (/ 6.0 (fma (sqrt (/ 1.0 x)) 4.0 1.0))))
double code(double x) {
	double tmp;
	if (x <= 4.0) {
		tmp = fma(x, 6.0, -6.0) / ((4.0 * sqrt(x)) - -1.0);
	} else {
		tmp = 6.0 / fma(sqrt((1.0 / x)), 4.0, 1.0);
	}
	return tmp;
}
function code(x)
	tmp = 0.0
	if (x <= 4.0)
		tmp = Float64(fma(x, 6.0, -6.0) / Float64(Float64(4.0 * sqrt(x)) - -1.0));
	else
		tmp = Float64(6.0 / fma(sqrt(Float64(1.0 / x)), 4.0, 1.0));
	end
	return tmp
end
code[x_] := If[LessEqual[x, 4.0], N[(N[(x * 6.0 + -6.0), $MachinePrecision] / N[(N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision] - -1.0), $MachinePrecision]), $MachinePrecision], N[(6.0 / N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] * 4.0 + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 4:\\
\;\;\;\;\frac{\mathsf{fma}\left(x, 6, -6\right)}{4 \cdot \sqrt{x} - -1}\\

\mathbf{else}:\\
\;\;\;\;\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}\\


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

    1. Initial program 99.7%

      \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. lift-*.f64N/A

        \[\leadsto \frac{\color{blue}{6 \cdot \left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      2. lift--.f64N/A

        \[\leadsto \frac{6 \cdot \color{blue}{\left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      3. sub-flipN/A

        \[\leadsto \frac{6 \cdot \color{blue}{\left(x + \left(\mathsf{neg}\left(1\right)\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      4. distribute-rgt-inN/A

        \[\leadsto \frac{\color{blue}{x \cdot 6 + \left(\mathsf{neg}\left(1\right)\right) \cdot 6}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      5. distribute-lft-neg-outN/A

        \[\leadsto \frac{x \cdot 6 + \color{blue}{\left(\mathsf{neg}\left(1 \cdot 6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      6. metadata-evalN/A

        \[\leadsto \frac{x \cdot 6 + \left(\mathsf{neg}\left(\color{blue}{6}\right)\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      7. lower-fma.f64N/A

        \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, 6, \mathsf{neg}\left(6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      8. metadata-eval99.7

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, \color{blue}{-6}\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      9. lift-+.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
      10. +-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(x + 1\right)}} \]
      11. add-flipN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)}} \]
      12. sub-flip-reverseN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)}} \]
      13. lift-*.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
      14. *-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
      15. remove-double-negN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x + 1\right)}} \]
      16. lower-fma.f6499.7

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(\sqrt{x}, 4, x + 1\right)}} \]
      17. lift-+.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x + 1}\right)} \]
      18. add-flipN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
      19. lower--.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
      20. metadata-eval99.7

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - \color{blue}{-1}\right)} \]
    3. Applied rewrites99.7%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \]
    4. Step-by-step derivation
      1. lift-fma.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4 + \left(x - -1\right)}} \]
      2. lift--.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x - -1\right)}} \]
      3. associate-+r-N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(\sqrt{x} \cdot 4 + x\right) - -1}} \]
      4. lower--.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(\sqrt{x} \cdot 4 + x\right) - -1}} \]
      5. *-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(\color{blue}{4 \cdot \sqrt{x}} + x\right) - -1} \]
      6. lift-*.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(\color{blue}{4 \cdot \sqrt{x}} + x\right) - -1} \]
      7. +-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 4 \cdot \sqrt{x}\right)} - -1} \]
      8. lift-*.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(x + \color{blue}{4 \cdot \sqrt{x}}\right) - -1} \]
      9. fp-cancel-sign-sub-invN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x - \left(\mathsf{neg}\left(4\right)\right) \cdot \sqrt{x}\right)} - -1} \]
      10. metadata-evalN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(x - \color{blue}{-4} \cdot \sqrt{x}\right) - -1} \]
      11. sub-to-multN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right) \cdot x} - -1} \]
      12. lower-special-*.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right) \cdot x} - -1} \]
      13. lower-special--.f32N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right)} \cdot x - -1} \]
      14. lower-special-/.f32N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(1 - \color{blue}{\frac{-4 \cdot \sqrt{x}}{x}}\right) \cdot x - -1} \]
      15. lower-/.f32N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\left(1 - \color{blue}{\frac{-4 \cdot \sqrt{x}}{x}}\right) \cdot x - -1} \]
      16. lower--.f32N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right)} \cdot x - -1} \]
      17. lower-*.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(1 - \frac{-4 \cdot \sqrt{x}}{x}\right) \cdot x} - -1} \]
    5. Applied rewrites99.7%

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(4, \sqrt{x}, x\right) - -1}} \]
    6. Taylor expanded in x around 0

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} - -1} \]
    7. Step-by-step derivation
      1. lower-*.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{4 \cdot \color{blue}{\sqrt{x}} - -1} \]
      2. lower-sqrt.f6451.2

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{4 \cdot \sqrt{x} - -1} \]
    8. Applied rewrites51.2%

      \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} - -1} \]

    if 4 < x

    1. Initial program 99.7%

      \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
    3. Step-by-step derivation
      1. lower-/.f64N/A

        \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
      2. lower-+.f64N/A

        \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
      3. lower-*.f64N/A

        \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
      4. lower-sqrt.f64N/A

        \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
      5. lower-/.f6451.1

        \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
    4. Applied rewrites51.1%

      \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
    5. Step-by-step derivation
      1. lift-+.f64N/A

        \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
      2. +-commutativeN/A

        \[\leadsto \frac{6}{4 \cdot \sqrt{\frac{1}{x}} + \color{blue}{1}} \]
      3. lift-*.f64N/A

        \[\leadsto \frac{6}{4 \cdot \sqrt{\frac{1}{x}} + 1} \]
      4. *-commutativeN/A

        \[\leadsto \frac{6}{\sqrt{\frac{1}{x}} \cdot 4 + 1} \]
      5. lower-fma.f6451.1

        \[\leadsto \frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, \color{blue}{4}, 1\right)} \]
    6. Applied rewrites51.1%

      \[\leadsto \color{blue}{\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}} \]
  3. Recombined 2 regimes into one program.
  4. Add Preprocessing

Alternative 7: 97.9% accurate, 1.1× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 1:\\ \;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}\\ \end{array} \end{array} \]
(FPCore (x)
 :precision binary64
 (if (<= x 1.0)
   (/ -6.0 (fma (sqrt x) 4.0 (- x -1.0)))
   (/ 6.0 (fma (sqrt (/ 1.0 x)) 4.0 1.0))))
double code(double x) {
	double tmp;
	if (x <= 1.0) {
		tmp = -6.0 / fma(sqrt(x), 4.0, (x - -1.0));
	} else {
		tmp = 6.0 / fma(sqrt((1.0 / x)), 4.0, 1.0);
	}
	return tmp;
}
function code(x)
	tmp = 0.0
	if (x <= 1.0)
		tmp = Float64(-6.0 / fma(sqrt(x), 4.0, Float64(x - -1.0)));
	else
		tmp = Float64(6.0 / fma(sqrt(Float64(1.0 / x)), 4.0, 1.0));
	end
	return tmp
end
code[x_] := If[LessEqual[x, 1.0], N[(-6.0 / N[(N[Sqrt[x], $MachinePrecision] * 4.0 + N[(x - -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(6.0 / N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] * 4.0 + 1.0), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 1:\\
\;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\

\mathbf{else}:\\
\;\;\;\;\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}\\


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

    1. Initial program 99.7%

      \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. lift-*.f64N/A

        \[\leadsto \frac{\color{blue}{6 \cdot \left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      2. lift--.f64N/A

        \[\leadsto \frac{6 \cdot \color{blue}{\left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      3. sub-flipN/A

        \[\leadsto \frac{6 \cdot \color{blue}{\left(x + \left(\mathsf{neg}\left(1\right)\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      4. distribute-rgt-inN/A

        \[\leadsto \frac{\color{blue}{x \cdot 6 + \left(\mathsf{neg}\left(1\right)\right) \cdot 6}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      5. distribute-lft-neg-outN/A

        \[\leadsto \frac{x \cdot 6 + \color{blue}{\left(\mathsf{neg}\left(1 \cdot 6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      6. metadata-evalN/A

        \[\leadsto \frac{x \cdot 6 + \left(\mathsf{neg}\left(\color{blue}{6}\right)\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      7. lower-fma.f64N/A

        \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, 6, \mathsf{neg}\left(6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      8. metadata-eval99.7

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, \color{blue}{-6}\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      9. lift-+.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
      10. +-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(x + 1\right)}} \]
      11. add-flipN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)}} \]
      12. sub-flip-reverseN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)}} \]
      13. lift-*.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
      14. *-commutativeN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
      15. remove-double-negN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x + 1\right)}} \]
      16. lower-fma.f6499.7

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(\sqrt{x}, 4, x + 1\right)}} \]
      17. lift-+.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x + 1}\right)} \]
      18. add-flipN/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
      19. lower--.f64N/A

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
      20. metadata-eval99.7

        \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - \color{blue}{-1}\right)} \]
    3. Applied rewrites99.7%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \]
    4. Taylor expanded in x around 0

      \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]
    5. Step-by-step derivation
      1. Applied rewrites48.8%

        \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]

      if 1 < x

      1. Initial program 99.7%

        \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      2. Taylor expanded in x around inf

        \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
      3. Step-by-step derivation
        1. lower-/.f64N/A

          \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
        2. lower-+.f64N/A

          \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
        3. lower-*.f64N/A

          \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
        4. lower-sqrt.f64N/A

          \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
        5. lower-/.f6451.1

          \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
      4. Applied rewrites51.1%

        \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
      5. Step-by-step derivation
        1. lift-+.f64N/A

          \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
        2. +-commutativeN/A

          \[\leadsto \frac{6}{4 \cdot \sqrt{\frac{1}{x}} + \color{blue}{1}} \]
        3. lift-*.f64N/A

          \[\leadsto \frac{6}{4 \cdot \sqrt{\frac{1}{x}} + 1} \]
        4. *-commutativeN/A

          \[\leadsto \frac{6}{\sqrt{\frac{1}{x}} \cdot 4 + 1} \]
        5. lower-fma.f6451.1

          \[\leadsto \frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, \color{blue}{4}, 1\right)} \]
      6. Applied rewrites51.1%

        \[\leadsto \color{blue}{\frac{6}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 4, 1\right)}} \]
    6. Recombined 2 regimes into one program.
    7. Add Preprocessing

    Alternative 8: 97.9% accurate, 1.1× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 1:\\ \;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{6}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x\right)}{x}}\\ \end{array} \end{array} \]
    (FPCore (x)
     :precision binary64
     (if (<= x 1.0)
       (/ -6.0 (fma (sqrt x) 4.0 (- x -1.0)))
       (/ 6.0 (/ (fma 4.0 (sqrt x) x) x))))
    double code(double x) {
    	double tmp;
    	if (x <= 1.0) {
    		tmp = -6.0 / fma(sqrt(x), 4.0, (x - -1.0));
    	} else {
    		tmp = 6.0 / (fma(4.0, sqrt(x), x) / x);
    	}
    	return tmp;
    }
    
    function code(x)
    	tmp = 0.0
    	if (x <= 1.0)
    		tmp = Float64(-6.0 / fma(sqrt(x), 4.0, Float64(x - -1.0)));
    	else
    		tmp = Float64(6.0 / Float64(fma(4.0, sqrt(x), x) / x));
    	end
    	return tmp
    end
    
    code[x_] := If[LessEqual[x, 1.0], N[(-6.0 / N[(N[Sqrt[x], $MachinePrecision] * 4.0 + N[(x - -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(6.0 / N[(N[(4.0 * N[Sqrt[x], $MachinePrecision] + x), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    \mathbf{if}\;x \leq 1:\\
    \;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\
    
    \mathbf{else}:\\
    \;\;\;\;\frac{6}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x\right)}{x}}\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if x < 1

      1. Initial program 99.7%

        \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
      2. Step-by-step derivation
        1. lift-*.f64N/A

          \[\leadsto \frac{\color{blue}{6 \cdot \left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        2. lift--.f64N/A

          \[\leadsto \frac{6 \cdot \color{blue}{\left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        3. sub-flipN/A

          \[\leadsto \frac{6 \cdot \color{blue}{\left(x + \left(\mathsf{neg}\left(1\right)\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        4. distribute-rgt-inN/A

          \[\leadsto \frac{\color{blue}{x \cdot 6 + \left(\mathsf{neg}\left(1\right)\right) \cdot 6}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        5. distribute-lft-neg-outN/A

          \[\leadsto \frac{x \cdot 6 + \color{blue}{\left(\mathsf{neg}\left(1 \cdot 6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        6. metadata-evalN/A

          \[\leadsto \frac{x \cdot 6 + \left(\mathsf{neg}\left(\color{blue}{6}\right)\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        7. lower-fma.f64N/A

          \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, 6, \mathsf{neg}\left(6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        8. metadata-eval99.7

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, \color{blue}{-6}\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        9. lift-+.f64N/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
        10. +-commutativeN/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(x + 1\right)}} \]
        11. add-flipN/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)}} \]
        12. sub-flip-reverseN/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)}} \]
        13. lift-*.f64N/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
        14. *-commutativeN/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
        15. remove-double-negN/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x + 1\right)}} \]
        16. lower-fma.f6499.7

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(\sqrt{x}, 4, x + 1\right)}} \]
        17. lift-+.f64N/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x + 1}\right)} \]
        18. add-flipN/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
        19. lower--.f64N/A

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
        20. metadata-eval99.7

          \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - \color{blue}{-1}\right)} \]
      3. Applied rewrites99.7%

        \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \]
      4. Taylor expanded in x around 0

        \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]
      5. Step-by-step derivation
        1. Applied rewrites48.8%

          \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]

        if 1 < x

        1. Initial program 99.7%

          \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        2. Taylor expanded in x around inf

          \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
        3. Step-by-step derivation
          1. lower-/.f64N/A

            \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
          2. lower-+.f64N/A

            \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
          3. lower-*.f64N/A

            \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
          4. lower-sqrt.f64N/A

            \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
          5. lower-/.f6451.1

            \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
        4. Applied rewrites51.1%

          \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
        5. Taylor expanded in x around 0

          \[\leadsto \frac{6}{\frac{x + 4 \cdot \sqrt{x}}{\color{blue}{x}}} \]
        6. Step-by-step derivation
          1. lower-/.f64N/A

            \[\leadsto \frac{6}{\frac{x + 4 \cdot \sqrt{x}}{x}} \]
          2. lower-+.f64N/A

            \[\leadsto \frac{6}{\frac{x + 4 \cdot \sqrt{x}}{x}} \]
          3. lower-*.f64N/A

            \[\leadsto \frac{6}{\frac{x + 4 \cdot \sqrt{x}}{x}} \]
          4. lower-sqrt.f6451.1

            \[\leadsto \frac{6}{\frac{x + 4 \cdot \sqrt{x}}{x}} \]
        7. Applied rewrites51.1%

          \[\leadsto \frac{6}{\frac{x + 4 \cdot \sqrt{x}}{\color{blue}{x}}} \]
        8. Step-by-step derivation
          1. lift-+.f64N/A

            \[\leadsto \frac{6}{\frac{x + 4 \cdot \sqrt{x}}{x}} \]
          2. +-commutativeN/A

            \[\leadsto \frac{6}{\frac{4 \cdot \sqrt{x} + x}{x}} \]
          3. lift-*.f64N/A

            \[\leadsto \frac{6}{\frac{4 \cdot \sqrt{x} + x}{x}} \]
          4. lower-fma.f6451.1

            \[\leadsto \frac{6}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x\right)}{x}} \]
        9. Applied rewrites51.1%

          \[\leadsto \frac{6}{\frac{\mathsf{fma}\left(4, \sqrt{x}, x\right)}{x}} \]
      6. Recombined 2 regimes into one program.
      7. Add Preprocessing

      Alternative 9: 51.2% accurate, 0.5× speedup?

      \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\ \;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\ \mathbf{else}:\\ \;\;\;\;\frac{6 \cdot x}{\mathsf{fma}\left(\sqrt{x}, 4, 1\right)}\\ \end{array} \end{array} \]
      (FPCore (x)
       :precision binary64
       (if (<= (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))) -1.0)
         (/ -6.0 (fma (sqrt x) 4.0 (- x -1.0)))
         (/ (* 6.0 x) (fma (sqrt x) 4.0 1.0))))
      double code(double x) {
      	double tmp;
      	if (((6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)))) <= -1.0) {
      		tmp = -6.0 / fma(sqrt(x), 4.0, (x - -1.0));
      	} else {
      		tmp = (6.0 * x) / fma(sqrt(x), 4.0, 1.0);
      	}
      	return tmp;
      }
      
      function code(x)
      	tmp = 0.0
      	if (Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(Float64(x + 1.0) + Float64(4.0 * sqrt(x)))) <= -1.0)
      		tmp = Float64(-6.0 / fma(sqrt(x), 4.0, Float64(x - -1.0)));
      	else
      		tmp = Float64(Float64(6.0 * x) / fma(sqrt(x), 4.0, 1.0));
      	end
      	return tmp
      end
      
      code[x_] := If[LessEqual[N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(N[(x + 1.0), $MachinePrecision] + N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], -1.0], N[(-6.0 / N[(N[Sqrt[x], $MachinePrecision] * 4.0 + N[(x - -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(6.0 * x), $MachinePrecision] / N[(N[Sqrt[x], $MachinePrecision] * 4.0 + 1.0), $MachinePrecision]), $MachinePrecision]]
      
      \begin{array}{l}
      
      \\
      \begin{array}{l}
      \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\
      \;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\
      
      \mathbf{else}:\\
      \;\;\;\;\frac{6 \cdot x}{\mathsf{fma}\left(\sqrt{x}, 4, 1\right)}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 2 regimes
      2. if (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x)))) < -1

        1. Initial program 99.7%

          \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
        2. Step-by-step derivation
          1. lift-*.f64N/A

            \[\leadsto \frac{\color{blue}{6 \cdot \left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          2. lift--.f64N/A

            \[\leadsto \frac{6 \cdot \color{blue}{\left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          3. sub-flipN/A

            \[\leadsto \frac{6 \cdot \color{blue}{\left(x + \left(\mathsf{neg}\left(1\right)\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          4. distribute-rgt-inN/A

            \[\leadsto \frac{\color{blue}{x \cdot 6 + \left(\mathsf{neg}\left(1\right)\right) \cdot 6}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          5. distribute-lft-neg-outN/A

            \[\leadsto \frac{x \cdot 6 + \color{blue}{\left(\mathsf{neg}\left(1 \cdot 6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          6. metadata-evalN/A

            \[\leadsto \frac{x \cdot 6 + \left(\mathsf{neg}\left(\color{blue}{6}\right)\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          7. lower-fma.f64N/A

            \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, 6, \mathsf{neg}\left(6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          8. metadata-eval99.7

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, \color{blue}{-6}\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          9. lift-+.f64N/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
          10. +-commutativeN/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(x + 1\right)}} \]
          11. add-flipN/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)}} \]
          12. sub-flip-reverseN/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)}} \]
          13. lift-*.f64N/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
          14. *-commutativeN/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
          15. remove-double-negN/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x + 1\right)}} \]
          16. lower-fma.f6499.7

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(\sqrt{x}, 4, x + 1\right)}} \]
          17. lift-+.f64N/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x + 1}\right)} \]
          18. add-flipN/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
          19. lower--.f64N/A

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
          20. metadata-eval99.7

            \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - \color{blue}{-1}\right)} \]
        3. Applied rewrites99.7%

          \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \]
        4. Taylor expanded in x around 0

          \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]
        5. Step-by-step derivation
          1. Applied rewrites48.8%

            \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]

          if -1 < (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x))))

          1. Initial program 99.7%

            \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
          2. Step-by-step derivation
            1. lift-*.f64N/A

              \[\leadsto \frac{\color{blue}{6 \cdot \left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            2. lift--.f64N/A

              \[\leadsto \frac{6 \cdot \color{blue}{\left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            3. sub-flipN/A

              \[\leadsto \frac{6 \cdot \color{blue}{\left(x + \left(\mathsf{neg}\left(1\right)\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            4. distribute-rgt-inN/A

              \[\leadsto \frac{\color{blue}{x \cdot 6 + \left(\mathsf{neg}\left(1\right)\right) \cdot 6}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            5. distribute-lft-neg-outN/A

              \[\leadsto \frac{x \cdot 6 + \color{blue}{\left(\mathsf{neg}\left(1 \cdot 6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            6. metadata-evalN/A

              \[\leadsto \frac{x \cdot 6 + \left(\mathsf{neg}\left(\color{blue}{6}\right)\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            7. lower-fma.f64N/A

              \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, 6, \mathsf{neg}\left(6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            8. metadata-eval99.7

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, \color{blue}{-6}\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            9. lift-+.f64N/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
            10. +-commutativeN/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(x + 1\right)}} \]
            11. add-flipN/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)}} \]
            12. sub-flip-reverseN/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)}} \]
            13. lift-*.f64N/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
            14. *-commutativeN/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
            15. remove-double-negN/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x + 1\right)}} \]
            16. lower-fma.f6499.7

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(\sqrt{x}, 4, x + 1\right)}} \]
            17. lift-+.f64N/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x + 1}\right)} \]
            18. add-flipN/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
            19. lower--.f64N/A

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
            20. metadata-eval99.7

              \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - \color{blue}{-1}\right)} \]
          3. Applied rewrites99.7%

            \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \]
          4. Taylor expanded in x around inf

            \[\leadsto \frac{\color{blue}{6 \cdot x}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]
          5. Step-by-step derivation
            1. lower-*.f6451.1

              \[\leadsto \frac{6 \cdot \color{blue}{x}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]
          6. Applied rewrites51.1%

            \[\leadsto \frac{\color{blue}{6 \cdot x}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]
          7. Taylor expanded in x around 0

            \[\leadsto \frac{6 \cdot x}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{1}\right)} \]
          8. Step-by-step derivation
            1. Applied rewrites4.7%

              \[\leadsto \frac{6 \cdot x}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{1}\right)} \]
          9. Recombined 2 regimes into one program.
          10. Add Preprocessing

          Alternative 10: 51.2% accurate, 0.5× speedup?

          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\ \;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\ \mathbf{else}:\\ \;\;\;\;\left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5\\ \end{array} \end{array} \]
          (FPCore (x)
           :precision binary64
           (if (<= (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))) -1.0)
             (/ -6.0 (fma (sqrt x) 4.0 (- x -1.0)))
             (* (* x (sqrt (/ 1.0 x))) 1.5)))
          double code(double x) {
          	double tmp;
          	if (((6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)))) <= -1.0) {
          		tmp = -6.0 / fma(sqrt(x), 4.0, (x - -1.0));
          	} else {
          		tmp = (x * sqrt((1.0 / x))) * 1.5;
          	}
          	return tmp;
          }
          
          function code(x)
          	tmp = 0.0
          	if (Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(Float64(x + 1.0) + Float64(4.0 * sqrt(x)))) <= -1.0)
          		tmp = Float64(-6.0 / fma(sqrt(x), 4.0, Float64(x - -1.0)));
          	else
          		tmp = Float64(Float64(x * sqrt(Float64(1.0 / x))) * 1.5);
          	end
          	return tmp
          end
          
          code[x_] := If[LessEqual[N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(N[(x + 1.0), $MachinePrecision] + N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], -1.0], N[(-6.0 / N[(N[Sqrt[x], $MachinePrecision] * 4.0 + N[(x - -1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(x * N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * 1.5), $MachinePrecision]]
          
          \begin{array}{l}
          
          \\
          \begin{array}{l}
          \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\
          \;\;\;\;\frac{-6}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}\\
          
          \mathbf{else}:\\
          \;\;\;\;\left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5\\
          
          
          \end{array}
          \end{array}
          
          Derivation
          1. Split input into 2 regimes
          2. if (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x)))) < -1

            1. Initial program 99.7%

              \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            2. Step-by-step derivation
              1. lift-*.f64N/A

                \[\leadsto \frac{\color{blue}{6 \cdot \left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. lift--.f64N/A

                \[\leadsto \frac{6 \cdot \color{blue}{\left(x - 1\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              3. sub-flipN/A

                \[\leadsto \frac{6 \cdot \color{blue}{\left(x + \left(\mathsf{neg}\left(1\right)\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              4. distribute-rgt-inN/A

                \[\leadsto \frac{\color{blue}{x \cdot 6 + \left(\mathsf{neg}\left(1\right)\right) \cdot 6}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              5. distribute-lft-neg-outN/A

                \[\leadsto \frac{x \cdot 6 + \color{blue}{\left(\mathsf{neg}\left(1 \cdot 6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              6. metadata-evalN/A

                \[\leadsto \frac{x \cdot 6 + \left(\mathsf{neg}\left(\color{blue}{6}\right)\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              7. lower-fma.f64N/A

                \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, 6, \mathsf{neg}\left(6\right)\right)}}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              8. metadata-eval99.7

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, \color{blue}{-6}\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              9. lift-+.f64N/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\left(x + 1\right) + 4 \cdot \sqrt{x}}} \]
              10. +-commutativeN/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(x + 1\right)}} \]
              11. add-flipN/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)}} \]
              12. sub-flip-reverseN/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)}} \]
              13. lift-*.f64N/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{4 \cdot \sqrt{x}} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
              14. *-commutativeN/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\sqrt{x} \cdot 4} + \left(\mathsf{neg}\left(\left(\mathsf{neg}\left(\left(x + 1\right)\right)\right)\right)\right)} \]
              15. remove-double-negN/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\sqrt{x} \cdot 4 + \color{blue}{\left(x + 1\right)}} \]
              16. lower-fma.f6499.7

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\color{blue}{\mathsf{fma}\left(\sqrt{x}, 4, x + 1\right)}} \]
              17. lift-+.f64N/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x + 1}\right)} \]
              18. add-flipN/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
              19. lower--.f64N/A

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, \color{blue}{x - \left(\mathsf{neg}\left(1\right)\right)}\right)} \]
              20. metadata-eval99.7

                \[\leadsto \frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - \color{blue}{-1}\right)} \]
            3. Applied rewrites99.7%

              \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, 6, -6\right)}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)}} \]
            4. Taylor expanded in x around 0

              \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]
            5. Step-by-step derivation
              1. Applied rewrites48.8%

                \[\leadsto \frac{\color{blue}{-6}}{\mathsf{fma}\left(\sqrt{x}, 4, x - -1\right)} \]

              if -1 < (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x))))

              1. Initial program 99.7%

                \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. Taylor expanded in x around inf

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              3. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
                2. lower-+.f64N/A

                  \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
                3. lower-*.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
                4. lower-sqrt.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
                5. lower-/.f6451.1

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
              4. Applied rewrites51.1%

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              5. Taylor expanded in x around 0

                \[\leadsto \frac{3}{2} \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              6. Step-by-step derivation
                1. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\color{blue}{\sqrt{x}}} \]
                2. lower-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                3. lower-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \frac{x}{\sqrt{x}} \]
              7. Applied rewrites4.5%

                \[\leadsto 1.5 \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              8. Step-by-step derivation
                1. lift-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                2. mult-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left(x \cdot \frac{1}{\color{blue}{\sqrt{x}}}\right) \]
                3. *-commutativeN/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                4. lift-sqrt.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                5. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{{x}^{\frac{1}{2}}} \cdot x\right) \]
                6. pow-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left({x}^{\left(\mathsf{neg}\left(\frac{1}{2}\right)\right)} \cdot x\right) \]
                7. pow-plusN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\left(\mathsf{neg}\left(\frac{1}{2}\right)\right) + \color{blue}{1}\right)} \]
                8. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\frac{-1}{2} + 1\right)} \]
                9. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\frac{1}{2}} \]
                10. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                11. lift-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \sqrt{x} \]
                12. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                13. *-commutativeN/A

                  \[\leadsto \sqrt{x} \cdot \frac{3}{2} \]
                14. lower-*.f644.5

                  \[\leadsto \sqrt{x} \cdot 1.5 \]
              9. Applied rewrites4.5%

                \[\leadsto \sqrt{x} \cdot 1.5 \]
              10. Taylor expanded in x around inf

                \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot \frac{3}{2} \]
              11. Step-by-step derivation
                1. lower-*.f64N/A

                  \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot \frac{3}{2} \]
                2. lower-sqrt.f64N/A

                  \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot \frac{3}{2} \]
                3. lower-/.f644.5

                  \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5 \]
              12. Applied rewrites4.5%

                \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5 \]
            6. Recombined 2 regimes into one program.
            7. Add Preprocessing

            Alternative 11: 51.2% accurate, 0.6× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\ \;\;\;\;\frac{6}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}\\ \mathbf{else}:\\ \;\;\;\;\sqrt{x} \cdot 1.5\\ \end{array} \end{array} \]
            (FPCore (x)
             :precision binary64
             (if (<= (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))) -1.0)
               (/ 6.0 (fma -4.0 (sqrt x) -1.0))
               (* (sqrt x) 1.5)))
            double code(double x) {
            	double tmp;
            	if (((6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)))) <= -1.0) {
            		tmp = 6.0 / fma(-4.0, sqrt(x), -1.0);
            	} else {
            		tmp = sqrt(x) * 1.5;
            	}
            	return tmp;
            }
            
            function code(x)
            	tmp = 0.0
            	if (Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(Float64(x + 1.0) + Float64(4.0 * sqrt(x)))) <= -1.0)
            		tmp = Float64(6.0 / fma(-4.0, sqrt(x), -1.0));
            	else
            		tmp = Float64(sqrt(x) * 1.5);
            	end
            	return tmp
            end
            
            code[x_] := If[LessEqual[N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(N[(x + 1.0), $MachinePrecision] + N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], -1.0], N[(6.0 / N[(-4.0 * N[Sqrt[x], $MachinePrecision] + -1.0), $MachinePrecision]), $MachinePrecision], N[(N[Sqrt[x], $MachinePrecision] * 1.5), $MachinePrecision]]
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\
            \;\;\;\;\frac{6}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}\\
            
            \mathbf{else}:\\
            \;\;\;\;\sqrt{x} \cdot 1.5\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 2 regimes
            2. if (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x)))) < -1

              1. Initial program 99.7%

                \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. Taylor expanded in x around 0

                \[\leadsto \color{blue}{\frac{-6}{1 + 4 \cdot \sqrt{x}}} \]
              3. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{-6}{\color{blue}{1 + 4 \cdot \sqrt{x}}} \]
                2. lower-+.f64N/A

                  \[\leadsto \frac{-6}{1 + \color{blue}{4 \cdot \sqrt{x}}} \]
                3. lower-*.f64N/A

                  \[\leadsto \frac{-6}{1 + 4 \cdot \color{blue}{\sqrt{x}}} \]
                4. lower-sqrt.f6448.6

                  \[\leadsto \frac{-6}{1 + 4 \cdot \sqrt{x}} \]
              4. Applied rewrites48.6%

                \[\leadsto \color{blue}{\frac{-6}{1 + 4 \cdot \sqrt{x}}} \]
              5. Step-by-step derivation
                1. lift-/.f64N/A

                  \[\leadsto \frac{-6}{\color{blue}{1 + 4 \cdot \sqrt{x}}} \]
                2. frac-2negN/A

                  \[\leadsto \frac{\mathsf{neg}\left(-6\right)}{\color{blue}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}} \]
                3. metadata-evalN/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\color{blue}{\left(1 + 4 \cdot \sqrt{x}\right)}\right)} \]
                4. lift-+.f64N/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)} \]
                5. lift-*.f64N/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)} \]
                6. fp-cancel-sign-sub-invN/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 - \left(\mathsf{neg}\left(4\right)\right) \cdot \sqrt{x}\right)\right)} \]
                7. metadata-evalN/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 - -4 \cdot \sqrt{x}\right)\right)} \]
                8. sub-negate-revN/A

                  \[\leadsto \frac{6}{-4 \cdot \sqrt{x} - \color{blue}{1}} \]
                9. metadata-evalN/A

                  \[\leadsto \frac{6}{-4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(-1\right)\right)} \]
                10. add-flipN/A

                  \[\leadsto \frac{6}{-4 \cdot \sqrt{x} + \color{blue}{-1}} \]
                11. lift-fma.f64N/A

                  \[\leadsto \frac{6}{\mathsf{fma}\left(-4, \color{blue}{\sqrt{x}}, -1\right)} \]
                12. lower-/.f6448.6

                  \[\leadsto \frac{6}{\color{blue}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}} \]
              6. Applied rewrites48.6%

                \[\leadsto \frac{6}{\color{blue}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}} \]

              if -1 < (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x))))

              1. Initial program 99.7%

                \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. Taylor expanded in x around inf

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              3. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
                2. lower-+.f64N/A

                  \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
                3. lower-*.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
                4. lower-sqrt.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
                5. lower-/.f6451.1

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
              4. Applied rewrites51.1%

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              5. Taylor expanded in x around 0

                \[\leadsto \frac{3}{2} \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              6. Step-by-step derivation
                1. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\color{blue}{\sqrt{x}}} \]
                2. lower-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                3. lower-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \frac{x}{\sqrt{x}} \]
              7. Applied rewrites4.5%

                \[\leadsto 1.5 \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              8. Step-by-step derivation
                1. lift-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                2. mult-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left(x \cdot \frac{1}{\color{blue}{\sqrt{x}}}\right) \]
                3. *-commutativeN/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                4. lift-sqrt.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                5. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{{x}^{\frac{1}{2}}} \cdot x\right) \]
                6. pow-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left({x}^{\left(\mathsf{neg}\left(\frac{1}{2}\right)\right)} \cdot x\right) \]
                7. pow-plusN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\left(\mathsf{neg}\left(\frac{1}{2}\right)\right) + \color{blue}{1}\right)} \]
                8. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\frac{-1}{2} + 1\right)} \]
                9. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\frac{1}{2}} \]
                10. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                11. lift-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \sqrt{x} \]
                12. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                13. *-commutativeN/A

                  \[\leadsto \sqrt{x} \cdot \frac{3}{2} \]
                14. lower-*.f644.5

                  \[\leadsto \sqrt{x} \cdot 1.5 \]
              9. Applied rewrites4.5%

                \[\leadsto \sqrt{x} \cdot 1.5 \]
            3. Recombined 2 regimes into one program.
            4. Add Preprocessing

            Alternative 12: 51.2% accurate, 0.6× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\ \;\;\;\;\frac{6}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}\\ \mathbf{else}:\\ \;\;\;\;\left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5\\ \end{array} \end{array} \]
            (FPCore (x)
             :precision binary64
             (if (<= (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))) -1.0)
               (/ 6.0 (fma -4.0 (sqrt x) -1.0))
               (* (* x (sqrt (/ 1.0 x))) 1.5)))
            double code(double x) {
            	double tmp;
            	if (((6.0 * (x - 1.0)) / ((x + 1.0) + (4.0 * sqrt(x)))) <= -1.0) {
            		tmp = 6.0 / fma(-4.0, sqrt(x), -1.0);
            	} else {
            		tmp = (x * sqrt((1.0 / x))) * 1.5;
            	}
            	return tmp;
            }
            
            function code(x)
            	tmp = 0.0
            	if (Float64(Float64(6.0 * Float64(x - 1.0)) / Float64(Float64(x + 1.0) + Float64(4.0 * sqrt(x)))) <= -1.0)
            		tmp = Float64(6.0 / fma(-4.0, sqrt(x), -1.0));
            	else
            		tmp = Float64(Float64(x * sqrt(Float64(1.0 / x))) * 1.5);
            	end
            	return tmp
            end
            
            code[x_] := If[LessEqual[N[(N[(6.0 * N[(x - 1.0), $MachinePrecision]), $MachinePrecision] / N[(N[(x + 1.0), $MachinePrecision] + N[(4.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], -1.0], N[(6.0 / N[(-4.0 * N[Sqrt[x], $MachinePrecision] + -1.0), $MachinePrecision]), $MachinePrecision], N[(N[(x * N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * 1.5), $MachinePrecision]]
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            \mathbf{if}\;\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \leq -1:\\
            \;\;\;\;\frac{6}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}\\
            
            \mathbf{else}:\\
            \;\;\;\;\left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 2 regimes
            2. if (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x)))) < -1

              1. Initial program 99.7%

                \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. Taylor expanded in x around 0

                \[\leadsto \color{blue}{\frac{-6}{1 + 4 \cdot \sqrt{x}}} \]
              3. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{-6}{\color{blue}{1 + 4 \cdot \sqrt{x}}} \]
                2. lower-+.f64N/A

                  \[\leadsto \frac{-6}{1 + \color{blue}{4 \cdot \sqrt{x}}} \]
                3. lower-*.f64N/A

                  \[\leadsto \frac{-6}{1 + 4 \cdot \color{blue}{\sqrt{x}}} \]
                4. lower-sqrt.f6448.6

                  \[\leadsto \frac{-6}{1 + 4 \cdot \sqrt{x}} \]
              4. Applied rewrites48.6%

                \[\leadsto \color{blue}{\frac{-6}{1 + 4 \cdot \sqrt{x}}} \]
              5. Step-by-step derivation
                1. lift-/.f64N/A

                  \[\leadsto \frac{-6}{\color{blue}{1 + 4 \cdot \sqrt{x}}} \]
                2. frac-2negN/A

                  \[\leadsto \frac{\mathsf{neg}\left(-6\right)}{\color{blue}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)}} \]
                3. metadata-evalN/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\color{blue}{\left(1 + 4 \cdot \sqrt{x}\right)}\right)} \]
                4. lift-+.f64N/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)} \]
                5. lift-*.f64N/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 + 4 \cdot \sqrt{x}\right)\right)} \]
                6. fp-cancel-sign-sub-invN/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 - \left(\mathsf{neg}\left(4\right)\right) \cdot \sqrt{x}\right)\right)} \]
                7. metadata-evalN/A

                  \[\leadsto \frac{6}{\mathsf{neg}\left(\left(1 - -4 \cdot \sqrt{x}\right)\right)} \]
                8. sub-negate-revN/A

                  \[\leadsto \frac{6}{-4 \cdot \sqrt{x} - \color{blue}{1}} \]
                9. metadata-evalN/A

                  \[\leadsto \frac{6}{-4 \cdot \sqrt{x} - \left(\mathsf{neg}\left(-1\right)\right)} \]
                10. add-flipN/A

                  \[\leadsto \frac{6}{-4 \cdot \sqrt{x} + \color{blue}{-1}} \]
                11. lift-fma.f64N/A

                  \[\leadsto \frac{6}{\mathsf{fma}\left(-4, \color{blue}{\sqrt{x}}, -1\right)} \]
                12. lower-/.f6448.6

                  \[\leadsto \frac{6}{\color{blue}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}} \]
              6. Applied rewrites48.6%

                \[\leadsto \frac{6}{\color{blue}{\mathsf{fma}\left(-4, \sqrt{x}, -1\right)}} \]

              if -1 < (/.f64 (*.f64 #s(literal 6 binary64) (-.f64 x #s(literal 1 binary64))) (+.f64 (+.f64 x #s(literal 1 binary64)) (*.f64 #s(literal 4 binary64) (sqrt.f64 x))))

              1. Initial program 99.7%

                \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. Taylor expanded in x around inf

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              3. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
                2. lower-+.f64N/A

                  \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
                3. lower-*.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
                4. lower-sqrt.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
                5. lower-/.f6451.1

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
              4. Applied rewrites51.1%

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              5. Taylor expanded in x around 0

                \[\leadsto \frac{3}{2} \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              6. Step-by-step derivation
                1. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\color{blue}{\sqrt{x}}} \]
                2. lower-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                3. lower-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \frac{x}{\sqrt{x}} \]
              7. Applied rewrites4.5%

                \[\leadsto 1.5 \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              8. Step-by-step derivation
                1. lift-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                2. mult-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left(x \cdot \frac{1}{\color{blue}{\sqrt{x}}}\right) \]
                3. *-commutativeN/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                4. lift-sqrt.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                5. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{{x}^{\frac{1}{2}}} \cdot x\right) \]
                6. pow-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left({x}^{\left(\mathsf{neg}\left(\frac{1}{2}\right)\right)} \cdot x\right) \]
                7. pow-plusN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\left(\mathsf{neg}\left(\frac{1}{2}\right)\right) + \color{blue}{1}\right)} \]
                8. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\frac{-1}{2} + 1\right)} \]
                9. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\frac{1}{2}} \]
                10. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                11. lift-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \sqrt{x} \]
                12. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                13. *-commutativeN/A

                  \[\leadsto \sqrt{x} \cdot \frac{3}{2} \]
                14. lower-*.f644.5

                  \[\leadsto \sqrt{x} \cdot 1.5 \]
              9. Applied rewrites4.5%

                \[\leadsto \sqrt{x} \cdot 1.5 \]
              10. Taylor expanded in x around inf

                \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot \frac{3}{2} \]
              11. Step-by-step derivation
                1. lower-*.f64N/A

                  \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot \frac{3}{2} \]
                2. lower-sqrt.f64N/A

                  \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot \frac{3}{2} \]
                3. lower-/.f644.5

                  \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5 \]
              12. Applied rewrites4.5%

                \[\leadsto \left(x \cdot \sqrt{\frac{1}{x}}\right) \cdot 1.5 \]
            3. Recombined 2 regimes into one program.
            4. Add Preprocessing

            Alternative 13: 6.9% accurate, 1.5× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 1:\\ \;\;\;\;\frac{-1.5}{\sqrt{\frac{1}{x}}}\\ \mathbf{else}:\\ \;\;\;\;\sqrt{x} \cdot 1.5\\ \end{array} \end{array} \]
            (FPCore (x)
             :precision binary64
             (if (<= x 1.0) (/ -1.5 (sqrt (/ 1.0 x))) (* (sqrt x) 1.5)))
            double code(double x) {
            	double tmp;
            	if (x <= 1.0) {
            		tmp = -1.5 / sqrt((1.0 / x));
            	} else {
            		tmp = sqrt(x) * 1.5;
            	}
            	return tmp;
            }
            
            module fmin_fmax_functions
                implicit none
                private
                public fmax
                public fmin
            
                interface fmax
                    module procedure fmax88
                    module procedure fmax44
                    module procedure fmax84
                    module procedure fmax48
                end interface
                interface fmin
                    module procedure fmin88
                    module procedure fmin44
                    module procedure fmin84
                    module procedure fmin48
                end interface
            contains
                real(8) function fmax88(x, y) result (res)
                    real(8), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                end function
                real(4) function fmax44(x, y) result (res)
                    real(4), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                end function
                real(8) function fmax84(x, y) result(res)
                    real(8), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                end function
                real(8) function fmax48(x, y) result(res)
                    real(4), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                end function
                real(8) function fmin88(x, y) result (res)
                    real(8), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                end function
                real(4) function fmin44(x, y) result (res)
                    real(4), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                end function
                real(8) function fmin84(x, y) result(res)
                    real(8), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                end function
                real(8) function fmin48(x, y) result(res)
                    real(4), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                end function
            end module
            
            real(8) function code(x)
            use fmin_fmax_functions
                real(8), intent (in) :: x
                real(8) :: tmp
                if (x <= 1.0d0) then
                    tmp = (-1.5d0) / sqrt((1.0d0 / x))
                else
                    tmp = sqrt(x) * 1.5d0
                end if
                code = tmp
            end function
            
            public static double code(double x) {
            	double tmp;
            	if (x <= 1.0) {
            		tmp = -1.5 / Math.sqrt((1.0 / x));
            	} else {
            		tmp = Math.sqrt(x) * 1.5;
            	}
            	return tmp;
            }
            
            def code(x):
            	tmp = 0
            	if x <= 1.0:
            		tmp = -1.5 / math.sqrt((1.0 / x))
            	else:
            		tmp = math.sqrt(x) * 1.5
            	return tmp
            
            function code(x)
            	tmp = 0.0
            	if (x <= 1.0)
            		tmp = Float64(-1.5 / sqrt(Float64(1.0 / x)));
            	else
            		tmp = Float64(sqrt(x) * 1.5);
            	end
            	return tmp
            end
            
            function tmp_2 = code(x)
            	tmp = 0.0;
            	if (x <= 1.0)
            		tmp = -1.5 / sqrt((1.0 / x));
            	else
            		tmp = sqrt(x) * 1.5;
            	end
            	tmp_2 = tmp;
            end
            
            code[x_] := If[LessEqual[x, 1.0], N[(-1.5 / N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], N[(N[Sqrt[x], $MachinePrecision] * 1.5), $MachinePrecision]]
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            \mathbf{if}\;x \leq 1:\\
            \;\;\;\;\frac{-1.5}{\sqrt{\frac{1}{x}}}\\
            
            \mathbf{else}:\\
            \;\;\;\;\sqrt{x} \cdot 1.5\\
            
            
            \end{array}
            \end{array}
            
            Derivation
            1. Split input into 2 regimes
            2. if x < 1

              1. Initial program 99.7%

                \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. Taylor expanded in x around inf

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              3. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
                2. lower-+.f64N/A

                  \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
                3. lower-*.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
                4. lower-sqrt.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
                5. lower-/.f6451.1

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
              4. Applied rewrites51.1%

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              5. Taylor expanded in x around 0

                \[\leadsto \frac{3}{2} \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              6. Step-by-step derivation
                1. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\color{blue}{\sqrt{x}}} \]
                2. lower-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                3. lower-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \frac{x}{\sqrt{x}} \]
              7. Applied rewrites4.5%

                \[\leadsto 1.5 \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              8. Taylor expanded in x around -inf

                \[\leadsto \frac{\frac{-3}{2}}{\sqrt{\frac{1}{x}}} \]
              9. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{\frac{-3}{2}}{\sqrt{\frac{1}{x}}} \]
                2. lower-sqrt.f64N/A

                  \[\leadsto \frac{\frac{-3}{2}}{\sqrt{\frac{1}{x}}} \]
                3. lower-/.f644.0

                  \[\leadsto \frac{-1.5}{\sqrt{\frac{1}{x}}} \]
              10. Applied rewrites4.0%

                \[\leadsto \frac{-1.5}{\sqrt{\frac{1}{x}}} \]

              if 1 < x

              1. Initial program 99.7%

                \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
              2. Taylor expanded in x around inf

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              3. Step-by-step derivation
                1. lower-/.f64N/A

                  \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
                2. lower-+.f64N/A

                  \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
                3. lower-*.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
                4. lower-sqrt.f64N/A

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
                5. lower-/.f6451.1

                  \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
              4. Applied rewrites51.1%

                \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              5. Taylor expanded in x around 0

                \[\leadsto \frac{3}{2} \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              6. Step-by-step derivation
                1. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\color{blue}{\sqrt{x}}} \]
                2. lower-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                3. lower-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \frac{x}{\sqrt{x}} \]
              7. Applied rewrites4.5%

                \[\leadsto 1.5 \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
              8. Step-by-step derivation
                1. lift-/.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
                2. mult-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left(x \cdot \frac{1}{\color{blue}{\sqrt{x}}}\right) \]
                3. *-commutativeN/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                4. lift-sqrt.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
                5. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{{x}^{\frac{1}{2}}} \cdot x\right) \]
                6. pow-flipN/A

                  \[\leadsto \frac{3}{2} \cdot \left({x}^{\left(\mathsf{neg}\left(\frac{1}{2}\right)\right)} \cdot x\right) \]
                7. pow-plusN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\left(\mathsf{neg}\left(\frac{1}{2}\right)\right) + \color{blue}{1}\right)} \]
                8. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\left(\frac{-1}{2} + 1\right)} \]
                9. metadata-evalN/A

                  \[\leadsto \frac{3}{2} \cdot {x}^{\frac{1}{2}} \]
                10. pow1/2N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                11. lift-sqrt.f644.5

                  \[\leadsto 1.5 \cdot \sqrt{x} \]
                12. lower-*.f64N/A

                  \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
                13. *-commutativeN/A

                  \[\leadsto \sqrt{x} \cdot \frac{3}{2} \]
                14. lower-*.f644.5

                  \[\leadsto \sqrt{x} \cdot 1.5 \]
              9. Applied rewrites4.5%

                \[\leadsto \sqrt{x} \cdot 1.5 \]
            3. Recombined 2 regimes into one program.
            4. Add Preprocessing

            Alternative 14: 4.5% accurate, 3.5× speedup?

            \[\begin{array}{l} \\ \sqrt{x} \cdot 1.5 \end{array} \]
            (FPCore (x) :precision binary64 (* (sqrt x) 1.5))
            double code(double x) {
            	return sqrt(x) * 1.5;
            }
            
            module fmin_fmax_functions
                implicit none
                private
                public fmax
                public fmin
            
                interface fmax
                    module procedure fmax88
                    module procedure fmax44
                    module procedure fmax84
                    module procedure fmax48
                end interface
                interface fmin
                    module procedure fmin88
                    module procedure fmin44
                    module procedure fmin84
                    module procedure fmin48
                end interface
            contains
                real(8) function fmax88(x, y) result (res)
                    real(8), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                end function
                real(4) function fmax44(x, y) result (res)
                    real(4), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                end function
                real(8) function fmax84(x, y) result(res)
                    real(8), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                end function
                real(8) function fmax48(x, y) result(res)
                    real(4), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                end function
                real(8) function fmin88(x, y) result (res)
                    real(8), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                end function
                real(4) function fmin44(x, y) result (res)
                    real(4), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                end function
                real(8) function fmin84(x, y) result(res)
                    real(8), intent (in) :: x
                    real(4), intent (in) :: y
                    res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                end function
                real(8) function fmin48(x, y) result(res)
                    real(4), intent (in) :: x
                    real(8), intent (in) :: y
                    res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                end function
            end module
            
            real(8) function code(x)
            use fmin_fmax_functions
                real(8), intent (in) :: x
                code = sqrt(x) * 1.5d0
            end function
            
            public static double code(double x) {
            	return Math.sqrt(x) * 1.5;
            }
            
            def code(x):
            	return math.sqrt(x) * 1.5
            
            function code(x)
            	return Float64(sqrt(x) * 1.5)
            end
            
            function tmp = code(x)
            	tmp = sqrt(x) * 1.5;
            end
            
            code[x_] := N[(N[Sqrt[x], $MachinePrecision] * 1.5), $MachinePrecision]
            
            \begin{array}{l}
            
            \\
            \sqrt{x} \cdot 1.5
            \end{array}
            
            Derivation
            1. Initial program 99.7%

              \[\frac{6 \cdot \left(x - 1\right)}{\left(x + 1\right) + 4 \cdot \sqrt{x}} \]
            2. Taylor expanded in x around inf

              \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
            3. Step-by-step derivation
              1. lower-/.f64N/A

                \[\leadsto \frac{6}{\color{blue}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
              2. lower-+.f64N/A

                \[\leadsto \frac{6}{1 + \color{blue}{4 \cdot \sqrt{\frac{1}{x}}}} \]
              3. lower-*.f64N/A

                \[\leadsto \frac{6}{1 + 4 \cdot \color{blue}{\sqrt{\frac{1}{x}}}} \]
              4. lower-sqrt.f64N/A

                \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
              5. lower-/.f6451.1

                \[\leadsto \frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}} \]
            4. Applied rewrites51.1%

              \[\leadsto \color{blue}{\frac{6}{1 + 4 \cdot \sqrt{\frac{1}{x}}}} \]
            5. Taylor expanded in x around 0

              \[\leadsto \frac{3}{2} \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
            6. Step-by-step derivation
              1. lower-*.f64N/A

                \[\leadsto \frac{3}{2} \cdot \frac{x}{\color{blue}{\sqrt{x}}} \]
              2. lower-/.f64N/A

                \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
              3. lower-sqrt.f644.5

                \[\leadsto 1.5 \cdot \frac{x}{\sqrt{x}} \]
            7. Applied rewrites4.5%

              \[\leadsto 1.5 \cdot \color{blue}{\frac{x}{\sqrt{x}}} \]
            8. Step-by-step derivation
              1. lift-/.f64N/A

                \[\leadsto \frac{3}{2} \cdot \frac{x}{\sqrt{x}} \]
              2. mult-flipN/A

                \[\leadsto \frac{3}{2} \cdot \left(x \cdot \frac{1}{\color{blue}{\sqrt{x}}}\right) \]
              3. *-commutativeN/A

                \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
              4. lift-sqrt.f64N/A

                \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{\sqrt{x}} \cdot x\right) \]
              5. pow1/2N/A

                \[\leadsto \frac{3}{2} \cdot \left(\frac{1}{{x}^{\frac{1}{2}}} \cdot x\right) \]
              6. pow-flipN/A

                \[\leadsto \frac{3}{2} \cdot \left({x}^{\left(\mathsf{neg}\left(\frac{1}{2}\right)\right)} \cdot x\right) \]
              7. pow-plusN/A

                \[\leadsto \frac{3}{2} \cdot {x}^{\left(\left(\mathsf{neg}\left(\frac{1}{2}\right)\right) + \color{blue}{1}\right)} \]
              8. metadata-evalN/A

                \[\leadsto \frac{3}{2} \cdot {x}^{\left(\frac{-1}{2} + 1\right)} \]
              9. metadata-evalN/A

                \[\leadsto \frac{3}{2} \cdot {x}^{\frac{1}{2}} \]
              10. pow1/2N/A

                \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
              11. lift-sqrt.f644.5

                \[\leadsto 1.5 \cdot \sqrt{x} \]
              12. lower-*.f64N/A

                \[\leadsto \frac{3}{2} \cdot \sqrt{x} \]
              13. *-commutativeN/A

                \[\leadsto \sqrt{x} \cdot \frac{3}{2} \]
              14. lower-*.f644.5

                \[\leadsto \sqrt{x} \cdot 1.5 \]
            9. Applied rewrites4.5%

              \[\leadsto \sqrt{x} \cdot 1.5 \]
            10. Add Preprocessing

            Reproduce

            ?
            herbie shell --seed 2025154 
            (FPCore (x)
              :name "Data.Approximate.Numerics:blog from approximate-0.2.2.1"
              :precision binary64
              (/ (* 6.0 (- x 1.0)) (+ (+ x 1.0) (* 4.0 (sqrt x)))))