Numeric.SpecFunctions:invIncompleteGamma from math-functions-0.1.5.2, D

Percentage Accurate: 99.7% → 99.7%
Time: 9.0s
Alternatives: 15
Speedup: 1.0×

Specification

?
\[\begin{array}{l} \\ \left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \end{array} \]
(FPCore (x y)
 :precision binary64
 (- (- 1.0 (/ 1.0 (* x 9.0))) (/ y (* 3.0 (sqrt x)))))
double code(double x, double y) {
	return (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * sqrt(x)));
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = (1.0d0 - (1.0d0 / (x * 9.0d0))) - (y / (3.0d0 * sqrt(x)))
end function
public static double code(double x, double y) {
	return (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * Math.sqrt(x)));
}
def code(x, y):
	return (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * math.sqrt(x)))
function code(x, y)
	return Float64(Float64(1.0 - Float64(1.0 / Float64(x * 9.0))) - Float64(y / Float64(3.0 * sqrt(x))))
end
function tmp = code(x, y)
	tmp = (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * sqrt(x)));
end
code[x_, y_] := N[(N[(1.0 - N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(y / N[(3.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}}
\end{array}

Sampling outcomes in binary64 precision:

Local Percentage Accuracy vs ?

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

Accuracy vs Speed?

Herbie found 15 alternatives:

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

Initial Program: 99.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \end{array} \]
(FPCore (x y)
 :precision binary64
 (- (- 1.0 (/ 1.0 (* x 9.0))) (/ y (* 3.0 (sqrt x)))))
double code(double x, double y) {
	return (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * sqrt(x)));
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = (1.0d0 - (1.0d0 / (x * 9.0d0))) - (y / (3.0d0 * sqrt(x)))
end function
public static double code(double x, double y) {
	return (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * Math.sqrt(x)));
}
def code(x, y):
	return (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * math.sqrt(x)))
function code(x, y)
	return Float64(Float64(1.0 - Float64(1.0 / Float64(x * 9.0))) - Float64(y / Float64(3.0 * sqrt(x))))
end
function tmp = code(x, y)
	tmp = (1.0 - (1.0 / (x * 9.0))) - (y / (3.0 * sqrt(x)));
end
code[x_, y_] := N[(N[(1.0 - N[(1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(y / N[(3.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}}
\end{array}

Alternative 1: 99.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(1 + \frac{-1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \end{array} \]
(FPCore (x y)
 :precision binary64
 (- (+ 1.0 (/ -1.0 (* x 9.0))) (/ y (* 3.0 (sqrt x)))))
double code(double x, double y) {
	return (1.0 + (-1.0 / (x * 9.0))) - (y / (3.0 * sqrt(x)));
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = (1.0d0 + ((-1.0d0) / (x * 9.0d0))) - (y / (3.0d0 * sqrt(x)))
end function
public static double code(double x, double y) {
	return (1.0 + (-1.0 / (x * 9.0))) - (y / (3.0 * Math.sqrt(x)));
}
def code(x, y):
	return (1.0 + (-1.0 / (x * 9.0))) - (y / (3.0 * math.sqrt(x)))
function code(x, y)
	return Float64(Float64(1.0 + Float64(-1.0 / Float64(x * 9.0))) - Float64(y / Float64(3.0 * sqrt(x))))
end
function tmp = code(x, y)
	tmp = (1.0 + (-1.0 / (x * 9.0))) - (y / (3.0 * sqrt(x)));
end
code[x_, y_] := N[(N[(1.0 + N[(-1.0 / N[(x * 9.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(y / N[(3.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(1 + \frac{-1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
  2. Final simplification99.8%

    \[\leadsto \left(1 + \frac{-1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]

Alternative 2: 99.5% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left(y \cdot {x}^{-0.5}\right) \end{array} \]
(FPCore (x y)
 :precision binary64
 (+
  (- 1.0 (/ 0.1111111111111111 x))
  (* -0.3333333333333333 (* y (pow x -0.5)))))
double code(double x, double y) {
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y * pow(x, -0.5)));
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = (1.0d0 - (0.1111111111111111d0 / x)) + ((-0.3333333333333333d0) * (y * (x ** (-0.5d0))))
end function
public static double code(double x, double y) {
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y * Math.pow(x, -0.5)));
}
def code(x, y):
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y * math.pow(x, -0.5)))
function code(x, y)
	return Float64(Float64(1.0 - Float64(0.1111111111111111 / x)) + Float64(-0.3333333333333333 * Float64(y * (x ^ -0.5))))
end
function tmp = code(x, y)
	tmp = (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y * (x ^ -0.5)));
end
code[x_, y_] := N[(N[(1.0 - N[(0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision] + N[(-0.3333333333333333 * N[(y * N[Power[x, -0.5], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left(y \cdot {x}^{-0.5}\right)
\end{array}
Derivation
  1. Initial program 99.8%

    \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
  2. Step-by-step derivation
    1. sub-neg99.8%

      \[\leadsto \color{blue}{\left(1 - \frac{1}{x \cdot 9}\right) + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)} \]
    2. distribute-frac-neg99.8%

      \[\leadsto \left(1 - \frac{1}{x \cdot 9}\right) + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}} \]
    3. *-commutative99.8%

      \[\leadsto \left(1 - \frac{1}{\color{blue}{9 \cdot x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    4. associate-/r*99.7%

      \[\leadsto \left(1 - \color{blue}{\frac{\frac{1}{9}}{x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    5. metadata-eval99.7%

      \[\leadsto \left(1 - \frac{\color{blue}{0.1111111111111111}}{x}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    6. neg-mul-199.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} \]
    7. times-frac99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{\frac{-1}{3} \cdot \frac{y}{\sqrt{x}}} \]
    8. metadata-eval99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{-0.3333333333333333} \cdot \frac{y}{\sqrt{x}} \]
  3. Simplified99.7%

    \[\leadsto \color{blue}{\left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
  4. Step-by-step derivation
    1. clear-num99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \color{blue}{\frac{1}{\frac{\sqrt{x}}{y}}} \]
    2. associate-/r/99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \color{blue}{\left(\frac{1}{\sqrt{x}} \cdot y\right)} \]
    3. pow1/299.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left(\frac{1}{\color{blue}{{x}^{0.5}}} \cdot y\right) \]
    4. pow-flip99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(-0.5\right)}} \cdot y\right) \]
    5. metadata-eval99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
  5. Applied egg-rr99.7%

    \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \color{blue}{\left({x}^{-0.5} \cdot y\right)} \]
  6. Final simplification99.7%

    \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left(y \cdot {x}^{-0.5}\right) \]

Alternative 3: 91.9% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y \leq -2.15 \cdot 10^{+104} \lor \neg \left(y \leq 1.8 \cdot 10^{+97}\right):\\ \;\;\;\;-0.3333333333333333 \cdot \left(y \cdot \sqrt{\frac{1}{x}}\right)\\ \mathbf{else}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (or (<= y -2.15e+104) (not (<= y 1.8e+97)))
   (* -0.3333333333333333 (* y (sqrt (/ 1.0 x))))
   (+ 1.0 (/ -0.1111111111111111 x))))
double code(double x, double y) {
	double tmp;
	if ((y <= -2.15e+104) || !(y <= 1.8e+97)) {
		tmp = -0.3333333333333333 * (y * sqrt((1.0 / x)));
	} else {
		tmp = 1.0 + (-0.1111111111111111 / x);
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if ((y <= (-2.15d+104)) .or. (.not. (y <= 1.8d+97))) then
        tmp = (-0.3333333333333333d0) * (y * sqrt((1.0d0 / x)))
    else
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if ((y <= -2.15e+104) || !(y <= 1.8e+97)) {
		tmp = -0.3333333333333333 * (y * Math.sqrt((1.0 / x)));
	} else {
		tmp = 1.0 + (-0.1111111111111111 / x);
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if (y <= -2.15e+104) or not (y <= 1.8e+97):
		tmp = -0.3333333333333333 * (y * math.sqrt((1.0 / x)))
	else:
		tmp = 1.0 + (-0.1111111111111111 / x)
	return tmp
function code(x, y)
	tmp = 0.0
	if ((y <= -2.15e+104) || !(y <= 1.8e+97))
		tmp = Float64(-0.3333333333333333 * Float64(y * sqrt(Float64(1.0 / x))));
	else
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if ((y <= -2.15e+104) || ~((y <= 1.8e+97)))
		tmp = -0.3333333333333333 * (y * sqrt((1.0 / x)));
	else
		tmp = 1.0 + (-0.1111111111111111 / x);
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[Or[LessEqual[y, -2.15e+104], N[Not[LessEqual[y, 1.8e+97]], $MachinePrecision]], N[(-0.3333333333333333 * N[(y * N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;y \leq -2.15 \cdot 10^{+104} \lor \neg \left(y \leq 1.8 \cdot 10^{+97}\right):\\
\;\;\;\;-0.3333333333333333 \cdot \left(y \cdot \sqrt{\frac{1}{x}}\right)\\

\mathbf{else}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if y < -2.1500000000000001e104 or 1.79999999999999983e97 < y

    1. Initial program 99.5%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Taylor expanded in x around 0 99.5%

      \[\leadsto \left(1 - \color{blue}{\frac{0.1111111111111111}{x}}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    3. Taylor expanded in y around inf 95.0%

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

    if -2.1500000000000001e104 < y < 1.79999999999999983e97

    1. Initial program 99.9%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.9%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.9%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.9%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.9%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.9%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.9%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.9%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 95.7%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv95.7%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval95.7%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/95.8%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval95.8%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative95.8%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified95.8%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification95.5%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq -2.15 \cdot 10^{+104} \lor \neg \left(y \leq 1.8 \cdot 10^{+97}\right):\\ \;\;\;\;-0.3333333333333333 \cdot \left(y \cdot \sqrt{\frac{1}{x}}\right)\\ \mathbf{else}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \end{array} \]

Alternative 4: 94.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y \leq -4.2 \cdot 10^{+104} \lor \neg \left(y \leq 1.5 \cdot 10^{+39}\right):\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \mathbf{else}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (or (<= y -4.2e+104) (not (<= y 1.5e+39)))
   (+ 1.0 (* -0.3333333333333333 (/ y (sqrt x))))
   (+ 1.0 (/ -0.1111111111111111 x))))
double code(double x, double y) {
	double tmp;
	if ((y <= -4.2e+104) || !(y <= 1.5e+39)) {
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	} else {
		tmp = 1.0 + (-0.1111111111111111 / x);
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if ((y <= (-4.2d+104)) .or. (.not. (y <= 1.5d+39))) then
        tmp = 1.0d0 + ((-0.3333333333333333d0) * (y / sqrt(x)))
    else
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if ((y <= -4.2e+104) || !(y <= 1.5e+39)) {
		tmp = 1.0 + (-0.3333333333333333 * (y / Math.sqrt(x)));
	} else {
		tmp = 1.0 + (-0.1111111111111111 / x);
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if (y <= -4.2e+104) or not (y <= 1.5e+39):
		tmp = 1.0 + (-0.3333333333333333 * (y / math.sqrt(x)))
	else:
		tmp = 1.0 + (-0.1111111111111111 / x)
	return tmp
function code(x, y)
	tmp = 0.0
	if ((y <= -4.2e+104) || !(y <= 1.5e+39))
		tmp = Float64(1.0 + Float64(-0.3333333333333333 * Float64(y / sqrt(x))));
	else
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if ((y <= -4.2e+104) || ~((y <= 1.5e+39)))
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	else
		tmp = 1.0 + (-0.1111111111111111 / x);
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[Or[LessEqual[y, -4.2e+104], N[Not[LessEqual[y, 1.5e+39]], $MachinePrecision]], N[(1.0 + N[(-0.3333333333333333 * N[(y / N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;y \leq -4.2 \cdot 10^{+104} \lor \neg \left(y \leq 1.5 \cdot 10^{+39}\right):\\
\;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\

\mathbf{else}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if y < -4.1999999999999997e104 or 1.5e39 < y

    1. Initial program 99.6%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.6%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.6%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.6%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.6%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.6%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.6%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.6%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.5%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.5%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.5%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.5%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.5%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.5%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.5%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.5%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.5%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.5%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around inf 96.4%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    5. Step-by-step derivation
      1. inv-pow96.4%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\sqrt{\color{blue}{{x}^{-1}}} \cdot y\right) \]
      2. sqrt-pow196.5%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(\frac{-1}{2}\right)}} \cdot y\right) \]
      3. metadata-eval96.5%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
      4. expm1-log1p-u95.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      5. expm1-udef53.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    6. Applied egg-rr53.6%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    7. Step-by-step derivation
      1. expm1-def95.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      2. expm1-log1p96.5%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    8. Simplified96.5%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    9. Step-by-step derivation
      1. expm1-log1p-u48.1%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)\right)} \]
      2. expm1-udef48.1%

        \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)} - 1\right)} \]
      3. associate-*r*48.1%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\left(-0.3333333333333333 \cdot {x}^{-0.5}\right) \cdot y}\right)} - 1\right) \]
      4. metadata-eval48.1%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot {x}^{\color{blue}{\left(\frac{-1}{2}\right)}}\right) \cdot y\right)} - 1\right) \]
      5. sqrt-pow148.1%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\sqrt{{x}^{-1}}}\right) \cdot y\right)} - 1\right) \]
      6. inv-pow48.1%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \sqrt{\color{blue}{\frac{1}{x}}}\right) \cdot y\right)} - 1\right) \]
      7. sqrt-div48.1%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\frac{\sqrt{1}}{\sqrt{x}}}\right) \cdot y\right)} - 1\right) \]
      8. metadata-eval48.1%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \frac{\color{blue}{1}}{\sqrt{x}}\right) \cdot y\right)} - 1\right) \]
      9. div-inv48.1%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\frac{-0.3333333333333333}{\sqrt{x}}} \cdot y\right)} - 1\right) \]
    10. Applied egg-rr48.1%

      \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)} - 1\right)} \]
    11. Step-by-step derivation
      1. expm1-def48.1%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)\right)} \]
      2. expm1-log1p96.4%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\sqrt{x}} \cdot y} \]
      3. associate-*l/96.4%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333 \cdot y}{\sqrt{x}}} \]
      4. associate-*r/96.4%

        \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
    12. Simplified96.4%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]

    if -4.1999999999999997e104 < y < 1.5e39

    1. Initial program 99.9%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.9%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.9%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.9%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.9%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.9%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.9%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.9%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 96.6%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv96.6%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval96.6%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/96.7%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval96.7%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative96.7%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified96.7%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification96.6%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq -4.2 \cdot 10^{+104} \lor \neg \left(y \leq 1.5 \cdot 10^{+39}\right):\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \mathbf{else}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \end{array} \]

Alternative 5: 92.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \sqrt{\frac{1}{x}}\\ \mathbf{if}\;y \leq -1.75 \cdot 10^{+104}:\\ \;\;\;\;-0.3333333333333333 \cdot \left(y \cdot t_0\right)\\ \mathbf{elif}\;y \leq 1.7 \cdot 10^{+97}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;y \cdot \left(-0.3333333333333333 \cdot t_0\right)\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (let* ((t_0 (sqrt (/ 1.0 x))))
   (if (<= y -1.75e+104)
     (* -0.3333333333333333 (* y t_0))
     (if (<= y 1.7e+97)
       (+ 1.0 (/ -0.1111111111111111 x))
       (* y (* -0.3333333333333333 t_0))))))
double code(double x, double y) {
	double t_0 = sqrt((1.0 / x));
	double tmp;
	if (y <= -1.75e+104) {
		tmp = -0.3333333333333333 * (y * t_0);
	} else if (y <= 1.7e+97) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = y * (-0.3333333333333333 * t_0);
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: t_0
    real(8) :: tmp
    t_0 = sqrt((1.0d0 / x))
    if (y <= (-1.75d+104)) then
        tmp = (-0.3333333333333333d0) * (y * t_0)
    else if (y <= 1.7d+97) then
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    else
        tmp = y * ((-0.3333333333333333d0) * t_0)
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double t_0 = Math.sqrt((1.0 / x));
	double tmp;
	if (y <= -1.75e+104) {
		tmp = -0.3333333333333333 * (y * t_0);
	} else if (y <= 1.7e+97) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = y * (-0.3333333333333333 * t_0);
	}
	return tmp;
}
def code(x, y):
	t_0 = math.sqrt((1.0 / x))
	tmp = 0
	if y <= -1.75e+104:
		tmp = -0.3333333333333333 * (y * t_0)
	elif y <= 1.7e+97:
		tmp = 1.0 + (-0.1111111111111111 / x)
	else:
		tmp = y * (-0.3333333333333333 * t_0)
	return tmp
function code(x, y)
	t_0 = sqrt(Float64(1.0 / x))
	tmp = 0.0
	if (y <= -1.75e+104)
		tmp = Float64(-0.3333333333333333 * Float64(y * t_0));
	elseif (y <= 1.7e+97)
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	else
		tmp = Float64(y * Float64(-0.3333333333333333 * t_0));
	end
	return tmp
end
function tmp_2 = code(x, y)
	t_0 = sqrt((1.0 / x));
	tmp = 0.0;
	if (y <= -1.75e+104)
		tmp = -0.3333333333333333 * (y * t_0);
	elseif (y <= 1.7e+97)
		tmp = 1.0 + (-0.1111111111111111 / x);
	else
		tmp = y * (-0.3333333333333333 * t_0);
	end
	tmp_2 = tmp;
end
code[x_, y_] := Block[{t$95$0 = N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[y, -1.75e+104], N[(-0.3333333333333333 * N[(y * t$95$0), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.7e+97], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision], N[(y * N[(-0.3333333333333333 * t$95$0), $MachinePrecision]), $MachinePrecision]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \sqrt{\frac{1}{x}}\\
\mathbf{if}\;y \leq -1.75 \cdot 10^{+104}:\\
\;\;\;\;-0.3333333333333333 \cdot \left(y \cdot t_0\right)\\

\mathbf{elif}\;y \leq 1.7 \cdot 10^{+97}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\

\mathbf{else}:\\
\;\;\;\;y \cdot \left(-0.3333333333333333 \cdot t_0\right)\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if y < -1.7500000000000001e104

    1. Initial program 99.5%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Taylor expanded in x around 0 99.5%

      \[\leadsto \left(1 - \color{blue}{\frac{0.1111111111111111}{x}}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    3. Taylor expanded in y around inf 94.2%

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

    if -1.7500000000000001e104 < y < 1.70000000000000005e97

    1. Initial program 99.9%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.9%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.9%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.9%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.9%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.9%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.9%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.9%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 95.7%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv95.7%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval95.7%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/95.8%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval95.8%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative95.8%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified95.8%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]

    if 1.70000000000000005e97 < y

    1. Initial program 99.6%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Taylor expanded in x around 0 99.6%

      \[\leadsto \left(1 - \color{blue}{\frac{0.1111111111111111}{x}}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    3. Taylor expanded in y around inf 95.7%

      \[\leadsto \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    4. Step-by-step derivation
      1. associate-*r*95.8%

        \[\leadsto \color{blue}{\left(-0.3333333333333333 \cdot \sqrt{\frac{1}{x}}\right) \cdot y} \]
    5. Simplified95.8%

      \[\leadsto \color{blue}{\left(-0.3333333333333333 \cdot \sqrt{\frac{1}{x}}\right) \cdot y} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification95.5%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq -1.75 \cdot 10^{+104}:\\ \;\;\;\;-0.3333333333333333 \cdot \left(y \cdot \sqrt{\frac{1}{x}}\right)\\ \mathbf{elif}\;y \leq 1.7 \cdot 10^{+97}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;y \cdot \left(-0.3333333333333333 \cdot \sqrt{\frac{1}{x}}\right)\\ \end{array} \]

Alternative 6: 94.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\ \;\;\;\;1 + \frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}\\ \mathbf{elif}\;y \leq 1.12 \cdot 10^{+39}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (<= y -1.7e+104)
   (+ 1.0 (/ -0.3333333333333333 (/ (sqrt x) y)))
   (if (<= y 1.12e+39)
     (+ 1.0 (/ -0.1111111111111111 x))
     (+ 1.0 (* -0.3333333333333333 (/ y (sqrt x)))))))
double code(double x, double y) {
	double tmp;
	if (y <= -1.7e+104) {
		tmp = 1.0 + (-0.3333333333333333 / (sqrt(x) / y));
	} else if (y <= 1.12e+39) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if (y <= (-1.7d+104)) then
        tmp = 1.0d0 + ((-0.3333333333333333d0) / (sqrt(x) / y))
    else if (y <= 1.12d+39) then
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    else
        tmp = 1.0d0 + ((-0.3333333333333333d0) * (y / sqrt(x)))
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if (y <= -1.7e+104) {
		tmp = 1.0 + (-0.3333333333333333 / (Math.sqrt(x) / y));
	} else if (y <= 1.12e+39) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = 1.0 + (-0.3333333333333333 * (y / Math.sqrt(x)));
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if y <= -1.7e+104:
		tmp = 1.0 + (-0.3333333333333333 / (math.sqrt(x) / y))
	elif y <= 1.12e+39:
		tmp = 1.0 + (-0.1111111111111111 / x)
	else:
		tmp = 1.0 + (-0.3333333333333333 * (y / math.sqrt(x)))
	return tmp
function code(x, y)
	tmp = 0.0
	if (y <= -1.7e+104)
		tmp = Float64(1.0 + Float64(-0.3333333333333333 / Float64(sqrt(x) / y)));
	elseif (y <= 1.12e+39)
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	else
		tmp = Float64(1.0 + Float64(-0.3333333333333333 * Float64(y / sqrt(x))));
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if (y <= -1.7e+104)
		tmp = 1.0 + (-0.3333333333333333 / (sqrt(x) / y));
	elseif (y <= 1.12e+39)
		tmp = 1.0 + (-0.1111111111111111 / x);
	else
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[LessEqual[y, -1.7e+104], N[(1.0 + N[(-0.3333333333333333 / N[(N[Sqrt[x], $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.12e+39], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision], N[(1.0 + N[(-0.3333333333333333 * N[(y / N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\
\;\;\;\;1 + \frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}\\

\mathbf{elif}\;y \leq 1.12 \cdot 10^{+39}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\

\mathbf{else}:\\
\;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if y < -1.6999999999999998e104

    1. Initial program 99.5%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.5%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.5%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.5%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.5%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.5%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.5%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.5%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.5%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.5%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.3%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around inf 98.4%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    5. Step-by-step derivation
      1. inv-pow98.4%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\sqrt{\color{blue}{{x}^{-1}}} \cdot y\right) \]
      2. sqrt-pow198.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(\frac{-1}{2}\right)}} \cdot y\right) \]
      3. metadata-eval98.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
      4. expm1-log1p-u97.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      5. expm1-udef51.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    6. Applied egg-rr51.7%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    7. Step-by-step derivation
      1. expm1-def97.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      2. expm1-log1p98.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    8. Simplified98.6%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    9. Step-by-step derivation
      1. associate-*r*98.4%

        \[\leadsto 1 + \color{blue}{\left(-0.3333333333333333 \cdot {x}^{-0.5}\right) \cdot y} \]
      2. metadata-eval98.4%

        \[\leadsto 1 + \left(-0.3333333333333333 \cdot {x}^{\color{blue}{\left(\frac{-1}{2}\right)}}\right) \cdot y \]
      3. sqrt-pow198.3%

        \[\leadsto 1 + \left(-0.3333333333333333 \cdot \color{blue}{\sqrt{{x}^{-1}}}\right) \cdot y \]
      4. inv-pow98.3%

        \[\leadsto 1 + \left(-0.3333333333333333 \cdot \sqrt{\color{blue}{\frac{1}{x}}}\right) \cdot y \]
      5. sqrt-div98.3%

        \[\leadsto 1 + \left(-0.3333333333333333 \cdot \color{blue}{\frac{\sqrt{1}}{\sqrt{x}}}\right) \cdot y \]
      6. metadata-eval98.3%

        \[\leadsto 1 + \left(-0.3333333333333333 \cdot \frac{\color{blue}{1}}{\sqrt{x}}\right) \cdot y \]
      7. div-inv98.3%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\sqrt{x}}} \cdot y \]
      8. associate-/r/98.4%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}} \]
    10. Applied egg-rr98.4%

      \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}} \]

    if -1.6999999999999998e104 < y < 1.12e39

    1. Initial program 99.9%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.9%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.9%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.9%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.9%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.9%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.9%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.9%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 96.6%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv96.6%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval96.6%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/96.7%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval96.7%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative96.7%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified96.7%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]

    if 1.12e39 < y

    1. Initial program 99.6%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.6%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.6%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.6%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.6%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.6%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.6%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.6%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.6%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.6%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around inf 94.8%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    5. Step-by-step derivation
      1. inv-pow94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\sqrt{\color{blue}{{x}^{-1}}} \cdot y\right) \]
      2. sqrt-pow194.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(\frac{-1}{2}\right)}} \cdot y\right) \]
      3. metadata-eval94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
      4. expm1-log1p-u93.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      5. expm1-udef55.0%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    6. Applied egg-rr55.0%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    7. Step-by-step derivation
      1. expm1-def93.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      2. expm1-log1p94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    8. Simplified94.8%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    9. Step-by-step derivation
      1. expm1-log1p-u13.7%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)\right)} \]
      2. expm1-udef13.7%

        \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)} - 1\right)} \]
      3. associate-*r*13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\left(-0.3333333333333333 \cdot {x}^{-0.5}\right) \cdot y}\right)} - 1\right) \]
      4. metadata-eval13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot {x}^{\color{blue}{\left(\frac{-1}{2}\right)}}\right) \cdot y\right)} - 1\right) \]
      5. sqrt-pow113.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\sqrt{{x}^{-1}}}\right) \cdot y\right)} - 1\right) \]
      6. inv-pow13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \sqrt{\color{blue}{\frac{1}{x}}}\right) \cdot y\right)} - 1\right) \]
      7. sqrt-div13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\frac{\sqrt{1}}{\sqrt{x}}}\right) \cdot y\right)} - 1\right) \]
      8. metadata-eval13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \frac{\color{blue}{1}}{\sqrt{x}}\right) \cdot y\right)} - 1\right) \]
      9. div-inv13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\frac{-0.3333333333333333}{\sqrt{x}}} \cdot y\right)} - 1\right) \]
    10. Applied egg-rr13.7%

      \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)} - 1\right)} \]
    11. Step-by-step derivation
      1. expm1-def13.7%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)\right)} \]
      2. expm1-log1p94.9%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\sqrt{x}} \cdot y} \]
      3. associate-*l/95.0%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333 \cdot y}{\sqrt{x}}} \]
      4. associate-*r/94.9%

        \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
    12. Simplified94.9%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification96.6%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\ \;\;\;\;1 + \frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}\\ \mathbf{elif}\;y \leq 1.12 \cdot 10^{+39}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \end{array} \]

Alternative 7: 94.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\ \;\;\;\;1 + \frac{y}{\sqrt{x} \cdot -3}\\ \mathbf{elif}\;y \leq 1.3 \cdot 10^{+39}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (<= y -1.7e+104)
   (+ 1.0 (/ y (* (sqrt x) -3.0)))
   (if (<= y 1.3e+39)
     (+ 1.0 (/ -0.1111111111111111 x))
     (+ 1.0 (* -0.3333333333333333 (/ y (sqrt x)))))))
double code(double x, double y) {
	double tmp;
	if (y <= -1.7e+104) {
		tmp = 1.0 + (y / (sqrt(x) * -3.0));
	} else if (y <= 1.3e+39) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if (y <= (-1.7d+104)) then
        tmp = 1.0d0 + (y / (sqrt(x) * (-3.0d0)))
    else if (y <= 1.3d+39) then
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    else
        tmp = 1.0d0 + ((-0.3333333333333333d0) * (y / sqrt(x)))
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if (y <= -1.7e+104) {
		tmp = 1.0 + (y / (Math.sqrt(x) * -3.0));
	} else if (y <= 1.3e+39) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = 1.0 + (-0.3333333333333333 * (y / Math.sqrt(x)));
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if y <= -1.7e+104:
		tmp = 1.0 + (y / (math.sqrt(x) * -3.0))
	elif y <= 1.3e+39:
		tmp = 1.0 + (-0.1111111111111111 / x)
	else:
		tmp = 1.0 + (-0.3333333333333333 * (y / math.sqrt(x)))
	return tmp
function code(x, y)
	tmp = 0.0
	if (y <= -1.7e+104)
		tmp = Float64(1.0 + Float64(y / Float64(sqrt(x) * -3.0)));
	elseif (y <= 1.3e+39)
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	else
		tmp = Float64(1.0 + Float64(-0.3333333333333333 * Float64(y / sqrt(x))));
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if (y <= -1.7e+104)
		tmp = 1.0 + (y / (sqrt(x) * -3.0));
	elseif (y <= 1.3e+39)
		tmp = 1.0 + (-0.1111111111111111 / x);
	else
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[LessEqual[y, -1.7e+104], N[(1.0 + N[(y / N[(N[Sqrt[x], $MachinePrecision] * -3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.3e+39], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision], N[(1.0 + N[(-0.3333333333333333 * N[(y / N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\
\;\;\;\;1 + \frac{y}{\sqrt{x} \cdot -3}\\

\mathbf{elif}\;y \leq 1.3 \cdot 10^{+39}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\

\mathbf{else}:\\
\;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if y < -1.6999999999999998e104

    1. Initial program 99.5%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.5%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.5%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.5%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.5%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.5%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.5%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.5%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.5%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.5%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.3%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around inf 98.4%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    5. Step-by-step derivation
      1. inv-pow98.4%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\sqrt{\color{blue}{{x}^{-1}}} \cdot y\right) \]
      2. sqrt-pow198.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(\frac{-1}{2}\right)}} \cdot y\right) \]
      3. metadata-eval98.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
      4. expm1-log1p-u97.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      5. expm1-udef51.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    6. Applied egg-rr51.7%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    7. Step-by-step derivation
      1. expm1-def97.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      2. expm1-log1p98.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    8. Simplified98.6%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    9. Step-by-step derivation
      1. expm1-log1p-u91.9%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)\right)} \]
      2. expm1-udef91.9%

        \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)} - 1\right)} \]
      3. associate-*r*91.9%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\left(-0.3333333333333333 \cdot {x}^{-0.5}\right) \cdot y}\right)} - 1\right) \]
      4. metadata-eval91.9%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot {x}^{\color{blue}{\left(\frac{-1}{2}\right)}}\right) \cdot y\right)} - 1\right) \]
      5. sqrt-pow191.9%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\sqrt{{x}^{-1}}}\right) \cdot y\right)} - 1\right) \]
      6. inv-pow91.9%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \sqrt{\color{blue}{\frac{1}{x}}}\right) \cdot y\right)} - 1\right) \]
      7. sqrt-div91.9%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\frac{\sqrt{1}}{\sqrt{x}}}\right) \cdot y\right)} - 1\right) \]
      8. metadata-eval91.9%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \frac{\color{blue}{1}}{\sqrt{x}}\right) \cdot y\right)} - 1\right) \]
      9. div-inv91.9%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\frac{-0.3333333333333333}{\sqrt{x}}} \cdot y\right)} - 1\right) \]
    10. Applied egg-rr91.9%

      \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)} - 1\right)} \]
    11. Step-by-step derivation
      1. expm1-def91.9%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)\right)} \]
      2. expm1-log1p98.3%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\sqrt{x}} \cdot y} \]
      3. associate-*l/98.3%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333 \cdot y}{\sqrt{x}}} \]
      4. associate-*r/98.3%

        \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
    12. Simplified98.3%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
    13. Step-by-step derivation
      1. associate-*r/98.3%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333 \cdot y}{\sqrt{x}}} \]
      2. associate-*l/98.3%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\sqrt{x}} \cdot y} \]
      3. clear-num98.1%

        \[\leadsto 1 + \color{blue}{\frac{1}{\frac{\sqrt{x}}{-0.3333333333333333}}} \cdot y \]
      4. div-inv98.4%

        \[\leadsto 1 + \frac{1}{\color{blue}{\sqrt{x} \cdot \frac{1}{-0.3333333333333333}}} \cdot y \]
      5. metadata-eval98.4%

        \[\leadsto 1 + \frac{1}{\sqrt{x} \cdot \color{blue}{-3}} \cdot y \]
      6. metadata-eval98.4%

        \[\leadsto 1 + \frac{1}{\sqrt{x} \cdot \color{blue}{\left(-3\right)}} \cdot y \]
      7. distribute-rgt-neg-in98.4%

        \[\leadsto 1 + \frac{1}{\color{blue}{-\sqrt{x} \cdot 3}} \cdot y \]
      8. *-commutative98.4%

        \[\leadsto 1 + \frac{1}{-\color{blue}{3 \cdot \sqrt{x}}} \cdot y \]
      9. associate-*l/98.4%

        \[\leadsto 1 + \color{blue}{\frac{1 \cdot y}{-3 \cdot \sqrt{x}}} \]
      10. *-un-lft-identity98.4%

        \[\leadsto 1 + \frac{\color{blue}{y}}{-3 \cdot \sqrt{x}} \]
      11. *-commutative98.4%

        \[\leadsto 1 + \frac{y}{-\color{blue}{\sqrt{x} \cdot 3}} \]
      12. distribute-rgt-neg-in98.4%

        \[\leadsto 1 + \frac{y}{\color{blue}{\sqrt{x} \cdot \left(-3\right)}} \]
      13. metadata-eval98.4%

        \[\leadsto 1 + \frac{y}{\sqrt{x} \cdot \color{blue}{-3}} \]
    14. Applied egg-rr98.4%

      \[\leadsto 1 + \color{blue}{\frac{y}{\sqrt{x} \cdot -3}} \]

    if -1.6999999999999998e104 < y < 1.3e39

    1. Initial program 99.9%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.9%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.9%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.9%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.9%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.9%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.9%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.9%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 96.6%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv96.6%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval96.6%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/96.7%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval96.7%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative96.7%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified96.7%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]

    if 1.3e39 < y

    1. Initial program 99.6%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.6%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.6%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.6%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.6%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.6%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.6%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.6%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.6%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.6%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around inf 94.8%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    5. Step-by-step derivation
      1. inv-pow94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\sqrt{\color{blue}{{x}^{-1}}} \cdot y\right) \]
      2. sqrt-pow194.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(\frac{-1}{2}\right)}} \cdot y\right) \]
      3. metadata-eval94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
      4. expm1-log1p-u93.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      5. expm1-udef55.0%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    6. Applied egg-rr55.0%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    7. Step-by-step derivation
      1. expm1-def93.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      2. expm1-log1p94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    8. Simplified94.8%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    9. Step-by-step derivation
      1. expm1-log1p-u13.7%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)\right)} \]
      2. expm1-udef13.7%

        \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)} - 1\right)} \]
      3. associate-*r*13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\left(-0.3333333333333333 \cdot {x}^{-0.5}\right) \cdot y}\right)} - 1\right) \]
      4. metadata-eval13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot {x}^{\color{blue}{\left(\frac{-1}{2}\right)}}\right) \cdot y\right)} - 1\right) \]
      5. sqrt-pow113.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\sqrt{{x}^{-1}}}\right) \cdot y\right)} - 1\right) \]
      6. inv-pow13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \sqrt{\color{blue}{\frac{1}{x}}}\right) \cdot y\right)} - 1\right) \]
      7. sqrt-div13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\frac{\sqrt{1}}{\sqrt{x}}}\right) \cdot y\right)} - 1\right) \]
      8. metadata-eval13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \frac{\color{blue}{1}}{\sqrt{x}}\right) \cdot y\right)} - 1\right) \]
      9. div-inv13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\frac{-0.3333333333333333}{\sqrt{x}}} \cdot y\right)} - 1\right) \]
    10. Applied egg-rr13.7%

      \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)} - 1\right)} \]
    11. Step-by-step derivation
      1. expm1-def13.7%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)\right)} \]
      2. expm1-log1p94.9%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\sqrt{x}} \cdot y} \]
      3. associate-*l/95.0%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333 \cdot y}{\sqrt{x}}} \]
      4. associate-*r/94.9%

        \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
    12. Simplified94.9%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification96.6%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\ \;\;\;\;1 + \frac{y}{\sqrt{x} \cdot -3}\\ \mathbf{elif}\;y \leq 1.3 \cdot 10^{+39}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \end{array} \]

Alternative 8: 94.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \left(y \cdot {x}^{-0.5}\right)\\ \mathbf{elif}\;y \leq 1.45 \cdot 10^{+39}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (<= y -1.7e+104)
   (+ 1.0 (* -0.3333333333333333 (* y (pow x -0.5))))
   (if (<= y 1.45e+39)
     (+ 1.0 (/ -0.1111111111111111 x))
     (+ 1.0 (* -0.3333333333333333 (/ y (sqrt x)))))))
double code(double x, double y) {
	double tmp;
	if (y <= -1.7e+104) {
		tmp = 1.0 + (-0.3333333333333333 * (y * pow(x, -0.5)));
	} else if (y <= 1.45e+39) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if (y <= (-1.7d+104)) then
        tmp = 1.0d0 + ((-0.3333333333333333d0) * (y * (x ** (-0.5d0))))
    else if (y <= 1.45d+39) then
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    else
        tmp = 1.0d0 + ((-0.3333333333333333d0) * (y / sqrt(x)))
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if (y <= -1.7e+104) {
		tmp = 1.0 + (-0.3333333333333333 * (y * Math.pow(x, -0.5)));
	} else if (y <= 1.45e+39) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = 1.0 + (-0.3333333333333333 * (y / Math.sqrt(x)));
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if y <= -1.7e+104:
		tmp = 1.0 + (-0.3333333333333333 * (y * math.pow(x, -0.5)))
	elif y <= 1.45e+39:
		tmp = 1.0 + (-0.1111111111111111 / x)
	else:
		tmp = 1.0 + (-0.3333333333333333 * (y / math.sqrt(x)))
	return tmp
function code(x, y)
	tmp = 0.0
	if (y <= -1.7e+104)
		tmp = Float64(1.0 + Float64(-0.3333333333333333 * Float64(y * (x ^ -0.5))));
	elseif (y <= 1.45e+39)
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	else
		tmp = Float64(1.0 + Float64(-0.3333333333333333 * Float64(y / sqrt(x))));
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if (y <= -1.7e+104)
		tmp = 1.0 + (-0.3333333333333333 * (y * (x ^ -0.5)));
	elseif (y <= 1.45e+39)
		tmp = 1.0 + (-0.1111111111111111 / x);
	else
		tmp = 1.0 + (-0.3333333333333333 * (y / sqrt(x)));
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[LessEqual[y, -1.7e+104], N[(1.0 + N[(-0.3333333333333333 * N[(y * N[Power[x, -0.5], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[y, 1.45e+39], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision], N[(1.0 + N[(-0.3333333333333333 * N[(y / N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\
\;\;\;\;1 + -0.3333333333333333 \cdot \left(y \cdot {x}^{-0.5}\right)\\

\mathbf{elif}\;y \leq 1.45 \cdot 10^{+39}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\

\mathbf{else}:\\
\;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\


\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if y < -1.6999999999999998e104

    1. Initial program 99.5%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.5%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.5%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.5%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.5%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.5%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.5%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.5%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.5%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.5%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.3%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.3%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around inf 98.4%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    5. Step-by-step derivation
      1. inv-pow98.4%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\sqrt{\color{blue}{{x}^{-1}}} \cdot y\right) \]
      2. sqrt-pow198.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(\frac{-1}{2}\right)}} \cdot y\right) \]
      3. metadata-eval98.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
      4. expm1-log1p-u97.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      5. expm1-udef51.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    6. Applied egg-rr51.7%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    7. Step-by-step derivation
      1. expm1-def97.3%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      2. expm1-log1p98.6%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    8. Simplified98.6%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]

    if -1.6999999999999998e104 < y < 1.45000000000000015e39

    1. Initial program 99.9%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.9%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.9%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.9%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.9%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.9%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.9%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.9%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 96.6%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv96.6%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval96.6%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/96.7%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval96.7%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative96.7%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified96.7%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]

    if 1.45000000000000015e39 < y

    1. Initial program 99.6%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.6%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.6%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.6%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.6%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.6%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.6%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.6%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.6%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.6%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around inf 94.8%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \left(\sqrt{\frac{1}{x}} \cdot y\right)} \]
    5. Step-by-step derivation
      1. inv-pow94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\sqrt{\color{blue}{{x}^{-1}}} \cdot y\right) \]
      2. sqrt-pow194.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(\frac{-1}{2}\right)}} \cdot y\right) \]
      3. metadata-eval94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
      4. expm1-log1p-u93.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      5. expm1-udef55.0%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    6. Applied egg-rr55.0%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\left(e^{\mathsf{log1p}\left({x}^{-0.5}\right)} - 1\right)} \cdot y\right) \]
    7. Step-by-step derivation
      1. expm1-def93.7%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left({x}^{-0.5}\right)\right)} \cdot y\right) \]
      2. expm1-log1p94.8%

        \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    8. Simplified94.8%

      \[\leadsto 1 + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{-0.5}} \cdot y\right) \]
    9. Step-by-step derivation
      1. expm1-log1p-u13.7%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)\right)} \]
      2. expm1-udef13.7%

        \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(-0.3333333333333333 \cdot \left({x}^{-0.5} \cdot y\right)\right)} - 1\right)} \]
      3. associate-*r*13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\left(-0.3333333333333333 \cdot {x}^{-0.5}\right) \cdot y}\right)} - 1\right) \]
      4. metadata-eval13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot {x}^{\color{blue}{\left(\frac{-1}{2}\right)}}\right) \cdot y\right)} - 1\right) \]
      5. sqrt-pow113.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\sqrt{{x}^{-1}}}\right) \cdot y\right)} - 1\right) \]
      6. inv-pow13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \sqrt{\color{blue}{\frac{1}{x}}}\right) \cdot y\right)} - 1\right) \]
      7. sqrt-div13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \color{blue}{\frac{\sqrt{1}}{\sqrt{x}}}\right) \cdot y\right)} - 1\right) \]
      8. metadata-eval13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\left(-0.3333333333333333 \cdot \frac{\color{blue}{1}}{\sqrt{x}}\right) \cdot y\right)} - 1\right) \]
      9. div-inv13.7%

        \[\leadsto 1 + \left(e^{\mathsf{log1p}\left(\color{blue}{\frac{-0.3333333333333333}{\sqrt{x}}} \cdot y\right)} - 1\right) \]
    10. Applied egg-rr13.7%

      \[\leadsto 1 + \color{blue}{\left(e^{\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)} - 1\right)} \]
    11. Step-by-step derivation
      1. expm1-def13.7%

        \[\leadsto 1 + \color{blue}{\mathsf{expm1}\left(\mathsf{log1p}\left(\frac{-0.3333333333333333}{\sqrt{x}} \cdot y\right)\right)} \]
      2. expm1-log1p94.9%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333}{\sqrt{x}} \cdot y} \]
      3. associate-*l/95.0%

        \[\leadsto 1 + \color{blue}{\frac{-0.3333333333333333 \cdot y}{\sqrt{x}}} \]
      4. associate-*r/94.9%

        \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
    12. Simplified94.9%

      \[\leadsto 1 + \color{blue}{-0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
  3. Recombined 3 regimes into one program.
  4. Final simplification96.7%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq -1.7 \cdot 10^{+104}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \left(y \cdot {x}^{-0.5}\right)\\ \mathbf{elif}\;y \leq 1.45 \cdot 10^{+39}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1 + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}\\ \end{array} \]

Alternative 9: 99.5% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}} \end{array} \]
(FPCore (x y)
 :precision binary64
 (+ (- 1.0 (/ 0.1111111111111111 x)) (* -0.3333333333333333 (/ y (sqrt x)))))
double code(double x, double y) {
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y / sqrt(x)));
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = (1.0d0 - (0.1111111111111111d0 / x)) + ((-0.3333333333333333d0) * (y / sqrt(x)))
end function
public static double code(double x, double y) {
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y / Math.sqrt(x)));
}
def code(x, y):
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y / math.sqrt(x)))
function code(x, y)
	return Float64(Float64(1.0 - Float64(0.1111111111111111 / x)) + Float64(-0.3333333333333333 * Float64(y / sqrt(x))))
end
function tmp = code(x, y)
	tmp = (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 * (y / sqrt(x)));
end
code[x_, y_] := N[(N[(1.0 - N[(0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision] + N[(-0.3333333333333333 * N[(y / N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
  2. Step-by-step derivation
    1. sub-neg99.8%

      \[\leadsto \color{blue}{\left(1 - \frac{1}{x \cdot 9}\right) + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)} \]
    2. distribute-frac-neg99.8%

      \[\leadsto \left(1 - \frac{1}{x \cdot 9}\right) + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}} \]
    3. *-commutative99.8%

      \[\leadsto \left(1 - \frac{1}{\color{blue}{9 \cdot x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    4. associate-/r*99.7%

      \[\leadsto \left(1 - \color{blue}{\frac{\frac{1}{9}}{x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    5. metadata-eval99.7%

      \[\leadsto \left(1 - \frac{\color{blue}{0.1111111111111111}}{x}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    6. neg-mul-199.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} \]
    7. times-frac99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{\frac{-1}{3} \cdot \frac{y}{\sqrt{x}}} \]
    8. metadata-eval99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{-0.3333333333333333} \cdot \frac{y}{\sqrt{x}} \]
  3. Simplified99.7%

    \[\leadsto \color{blue}{\left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
  4. Final simplification99.7%

    \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}} \]

Alternative 10: 99.6% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(1 - \frac{0.1111111111111111}{x}\right) + \frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}} \end{array} \]
(FPCore (x y)
 :precision binary64
 (+ (- 1.0 (/ 0.1111111111111111 x)) (/ -0.3333333333333333 (/ (sqrt x) y))))
double code(double x, double y) {
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 / (sqrt(x) / y));
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = (1.0d0 - (0.1111111111111111d0 / x)) + ((-0.3333333333333333d0) / (sqrt(x) / y))
end function
public static double code(double x, double y) {
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 / (Math.sqrt(x) / y));
}
def code(x, y):
	return (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 / (math.sqrt(x) / y))
function code(x, y)
	return Float64(Float64(1.0 - Float64(0.1111111111111111 / x)) + Float64(-0.3333333333333333 / Float64(sqrt(x) / y)))
end
function tmp = code(x, y)
	tmp = (1.0 - (0.1111111111111111 / x)) + (-0.3333333333333333 / (sqrt(x) / y));
end
code[x_, y_] := N[(N[(1.0 - N[(0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision] + N[(-0.3333333333333333 / N[(N[Sqrt[x], $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(1 - \frac{0.1111111111111111}{x}\right) + \frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
  2. Step-by-step derivation
    1. sub-neg99.8%

      \[\leadsto \color{blue}{\left(1 - \frac{1}{x \cdot 9}\right) + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)} \]
    2. distribute-frac-neg99.8%

      \[\leadsto \left(1 - \frac{1}{x \cdot 9}\right) + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}} \]
    3. *-commutative99.8%

      \[\leadsto \left(1 - \frac{1}{\color{blue}{9 \cdot x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    4. associate-/r*99.7%

      \[\leadsto \left(1 - \color{blue}{\frac{\frac{1}{9}}{x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    5. metadata-eval99.7%

      \[\leadsto \left(1 - \frac{\color{blue}{0.1111111111111111}}{x}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
    6. neg-mul-199.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} \]
    7. times-frac99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{\frac{-1}{3} \cdot \frac{y}{\sqrt{x}}} \]
    8. metadata-eval99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{-0.3333333333333333} \cdot \frac{y}{\sqrt{x}} \]
  3. Simplified99.7%

    \[\leadsto \color{blue}{\left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
  4. Step-by-step derivation
    1. clear-num99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \color{blue}{\frac{1}{\frac{\sqrt{x}}{y}}} \]
    2. un-div-inv99.7%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{\frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}} \]
  5. Applied egg-rr99.7%

    \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{\frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}}} \]
  6. Final simplification99.7%

    \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \frac{-0.3333333333333333}{\frac{\sqrt{x}}{y}} \]

Alternative 11: 64.5% accurate, 7.0× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y \leq 4.6 \cdot 10^{+168}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;\frac{1 - \frac{-0.012345679012345678}{x \cdot \left(-x\right)}}{1 - \frac{-0.1111111111111111}{x}}\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (<= y 4.6e+168)
   (+ 1.0 (/ -0.1111111111111111 x))
   (/
    (- 1.0 (/ -0.012345679012345678 (* x (- x))))
    (- 1.0 (/ -0.1111111111111111 x)))))
double code(double x, double y) {
	double tmp;
	if (y <= 4.6e+168) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = (1.0 - (-0.012345679012345678 / (x * -x))) / (1.0 - (-0.1111111111111111 / x));
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if (y <= 4.6d+168) then
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    else
        tmp = (1.0d0 - ((-0.012345679012345678d0) / (x * -x))) / (1.0d0 - ((-0.1111111111111111d0) / x))
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if (y <= 4.6e+168) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = (1.0 - (-0.012345679012345678 / (x * -x))) / (1.0 - (-0.1111111111111111 / x));
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if y <= 4.6e+168:
		tmp = 1.0 + (-0.1111111111111111 / x)
	else:
		tmp = (1.0 - (-0.012345679012345678 / (x * -x))) / (1.0 - (-0.1111111111111111 / x))
	return tmp
function code(x, y)
	tmp = 0.0
	if (y <= 4.6e+168)
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	else
		tmp = Float64(Float64(1.0 - Float64(-0.012345679012345678 / Float64(x * Float64(-x)))) / Float64(1.0 - Float64(-0.1111111111111111 / x)));
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if (y <= 4.6e+168)
		tmp = 1.0 + (-0.1111111111111111 / x);
	else
		tmp = (1.0 - (-0.012345679012345678 / (x * -x))) / (1.0 - (-0.1111111111111111 / x));
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[LessEqual[y, 4.6e+168], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 - N[(-0.012345679012345678 / N[(x * (-x)), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(1.0 - N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;y \leq 4.6 \cdot 10^{+168}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\

\mathbf{else}:\\
\;\;\;\;\frac{1 - \frac{-0.012345679012345678}{x \cdot \left(-x\right)}}{1 - \frac{-0.1111111111111111}{x}}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if y < 4.5999999999999999e168

    1. Initial program 99.8%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.8%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.8%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.8%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.8%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.8%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.8%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.8%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 75.2%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv75.2%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval75.2%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/75.3%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval75.3%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative75.3%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified75.3%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]

    if 4.5999999999999999e168 < y

    1. Initial program 99.6%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.6%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.6%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.6%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.6%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.6%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.6%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.6%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.4%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.4%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 4.2%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv4.2%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval4.2%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/4.2%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval4.2%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative4.2%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified4.2%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    7. Step-by-step derivation
      1. div-inv4.2%

        \[\leadsto \color{blue}{-0.1111111111111111 \cdot \frac{1}{x}} + 1 \]
      2. fma-def4.2%

        \[\leadsto \color{blue}{\mathsf{fma}\left(-0.1111111111111111, \frac{1}{x}, 1\right)} \]
    8. Applied egg-rr4.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(-0.1111111111111111, \frac{1}{x}, 1\right)} \]
    9. Step-by-step derivation
      1. fma-udef4.2%

        \[\leadsto \color{blue}{-0.1111111111111111 \cdot \frac{1}{x} + 1} \]
      2. metadata-eval4.2%

        \[\leadsto \color{blue}{\left(-0.1111111111111111\right)} \cdot \frac{1}{x} + 1 \]
      3. distribute-lft-neg-in4.2%

        \[\leadsto \color{blue}{\left(-0.1111111111111111 \cdot \frac{1}{x}\right)} + 1 \]
      4. div-inv4.2%

        \[\leadsto \left(-\color{blue}{\frac{0.1111111111111111}{x}}\right) + 1 \]
      5. +-commutative4.2%

        \[\leadsto \color{blue}{1 + \left(-\frac{0.1111111111111111}{x}\right)} \]
      6. flip-+39.1%

        \[\leadsto \color{blue}{\frac{1 \cdot 1 - \left(-\frac{0.1111111111111111}{x}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)}} \]
      7. metadata-eval39.1%

        \[\leadsto \frac{\color{blue}{1} - \left(-\frac{0.1111111111111111}{x}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      8. div-inv39.1%

        \[\leadsto \frac{1 - \left(-\color{blue}{0.1111111111111111 \cdot \frac{1}{x}}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      9. distribute-lft-neg-in39.1%

        \[\leadsto \frac{1 - \color{blue}{\left(\left(-0.1111111111111111\right) \cdot \frac{1}{x}\right)} \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      10. metadata-eval39.1%

        \[\leadsto \frac{1 - \left(\color{blue}{-0.1111111111111111} \cdot \frac{1}{x}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      11. div-inv39.1%

        \[\leadsto \frac{1 - \left(-0.1111111111111111 \cdot \frac{1}{x}\right) \cdot \left(-\color{blue}{0.1111111111111111 \cdot \frac{1}{x}}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      12. distribute-lft-neg-in39.1%

        \[\leadsto \frac{1 - \left(-0.1111111111111111 \cdot \frac{1}{x}\right) \cdot \color{blue}{\left(\left(-0.1111111111111111\right) \cdot \frac{1}{x}\right)}}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      13. metadata-eval39.1%

        \[\leadsto \frac{1 - \left(-0.1111111111111111 \cdot \frac{1}{x}\right) \cdot \left(\color{blue}{-0.1111111111111111} \cdot \frac{1}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      14. un-div-inv39.1%

        \[\leadsto \frac{1 - \color{blue}{\frac{-0.1111111111111111}{x}} \cdot \left(-0.1111111111111111 \cdot \frac{1}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      15. un-div-inv39.1%

        \[\leadsto \frac{1 - \frac{-0.1111111111111111}{x} \cdot \color{blue}{\frac{-0.1111111111111111}{x}}}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      16. distribute-neg-frac39.1%

        \[\leadsto \frac{1 - \frac{-0.1111111111111111}{x} \cdot \frac{-0.1111111111111111}{x}}{1 - \color{blue}{\frac{-0.1111111111111111}{x}}} \]
      17. metadata-eval39.1%

        \[\leadsto \frac{1 - \frac{-0.1111111111111111}{x} \cdot \frac{-0.1111111111111111}{x}}{1 - \frac{\color{blue}{-0.1111111111111111}}{x}} \]
    10. Applied egg-rr39.1%

      \[\leadsto \color{blue}{\frac{1 - \frac{-0.1111111111111111}{x} \cdot \frac{-0.1111111111111111}{x}}{1 - \frac{-0.1111111111111111}{x}}} \]
    11. Step-by-step derivation
      1. frac-2neg39.1%

        \[\leadsto \frac{1 - \color{blue}{\frac{--0.1111111111111111}{-x}} \cdot \frac{-0.1111111111111111}{x}}{1 - \frac{-0.1111111111111111}{x}} \]
      2. frac-times39.1%

        \[\leadsto \frac{1 - \color{blue}{\frac{\left(--0.1111111111111111\right) \cdot -0.1111111111111111}{\left(-x\right) \cdot x}}}{1 - \frac{-0.1111111111111111}{x}} \]
      3. metadata-eval39.1%

        \[\leadsto \frac{1 - \frac{\color{blue}{0.1111111111111111} \cdot -0.1111111111111111}{\left(-x\right) \cdot x}}{1 - \frac{-0.1111111111111111}{x}} \]
      4. metadata-eval39.1%

        \[\leadsto \frac{1 - \frac{\color{blue}{-0.012345679012345678}}{\left(-x\right) \cdot x}}{1 - \frac{-0.1111111111111111}{x}} \]
    12. Applied egg-rr39.1%

      \[\leadsto \frac{1 - \color{blue}{\frac{-0.012345679012345678}{\left(-x\right) \cdot x}}}{1 - \frac{-0.1111111111111111}{x}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification71.2%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq 4.6 \cdot 10^{+168}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;\frac{1 - \frac{-0.012345679012345678}{x \cdot \left(-x\right)}}{1 - \frac{-0.1111111111111111}{x}}\\ \end{array} \]

Alternative 12: 64.5% accurate, 7.5× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;y \leq 7 \cdot 10^{+124}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;\frac{1 - \frac{\frac{0.012345679012345678}{x}}{x}}{1 - \frac{-0.1111111111111111}{x}}\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (<= y 7e+124)
   (+ 1.0 (/ -0.1111111111111111 x))
   (/
    (- 1.0 (/ (/ 0.012345679012345678 x) x))
    (- 1.0 (/ -0.1111111111111111 x)))))
double code(double x, double y) {
	double tmp;
	if (y <= 7e+124) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = (1.0 - ((0.012345679012345678 / x) / x)) / (1.0 - (-0.1111111111111111 / x));
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if (y <= 7d+124) then
        tmp = 1.0d0 + ((-0.1111111111111111d0) / x)
    else
        tmp = (1.0d0 - ((0.012345679012345678d0 / x) / x)) / (1.0d0 - ((-0.1111111111111111d0) / x))
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if (y <= 7e+124) {
		tmp = 1.0 + (-0.1111111111111111 / x);
	} else {
		tmp = (1.0 - ((0.012345679012345678 / x) / x)) / (1.0 - (-0.1111111111111111 / x));
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if y <= 7e+124:
		tmp = 1.0 + (-0.1111111111111111 / x)
	else:
		tmp = (1.0 - ((0.012345679012345678 / x) / x)) / (1.0 - (-0.1111111111111111 / x))
	return tmp
function code(x, y)
	tmp = 0.0
	if (y <= 7e+124)
		tmp = Float64(1.0 + Float64(-0.1111111111111111 / x));
	else
		tmp = Float64(Float64(1.0 - Float64(Float64(0.012345679012345678 / x) / x)) / Float64(1.0 - Float64(-0.1111111111111111 / x)));
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if (y <= 7e+124)
		tmp = 1.0 + (-0.1111111111111111 / x);
	else
		tmp = (1.0 - ((0.012345679012345678 / x) / x)) / (1.0 - (-0.1111111111111111 / x));
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[LessEqual[y, 7e+124], N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision], N[(N[(1.0 - N[(N[(0.012345679012345678 / x), $MachinePrecision] / x), $MachinePrecision]), $MachinePrecision] / N[(1.0 - N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;y \leq 7 \cdot 10^{+124}:\\
\;\;\;\;1 + \frac{-0.1111111111111111}{x}\\

\mathbf{else}:\\
\;\;\;\;\frac{1 - \frac{\frac{0.012345679012345678}{x}}{x}}{1 - \frac{-0.1111111111111111}{x}}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if y < 7.0000000000000002e124

    1. Initial program 99.8%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.8%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.8%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.8%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.8%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.8%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.8%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.8%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 77.5%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv77.5%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval77.5%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/77.6%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval77.6%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative77.6%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified77.6%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]

    if 7.0000000000000002e124 < y

    1. Initial program 99.6%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.6%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.6%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.6%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.6%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.6%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.6%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.6%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.5%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.5%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.7%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.7%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in y around 0 4.1%

      \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
    5. Step-by-step derivation
      1. cancel-sign-sub-inv4.1%

        \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
      2. metadata-eval4.1%

        \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
      3. associate-*r/4.1%

        \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
      4. metadata-eval4.1%

        \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
      5. +-commutative4.1%

        \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    6. Simplified4.1%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
    7. Step-by-step derivation
      1. div-inv4.1%

        \[\leadsto \color{blue}{-0.1111111111111111 \cdot \frac{1}{x}} + 1 \]
      2. fma-def4.1%

        \[\leadsto \color{blue}{\mathsf{fma}\left(-0.1111111111111111, \frac{1}{x}, 1\right)} \]
    8. Applied egg-rr4.1%

      \[\leadsto \color{blue}{\mathsf{fma}\left(-0.1111111111111111, \frac{1}{x}, 1\right)} \]
    9. Step-by-step derivation
      1. fma-udef4.1%

        \[\leadsto \color{blue}{-0.1111111111111111 \cdot \frac{1}{x} + 1} \]
      2. metadata-eval4.1%

        \[\leadsto \color{blue}{\left(-0.1111111111111111\right)} \cdot \frac{1}{x} + 1 \]
      3. distribute-lft-neg-in4.1%

        \[\leadsto \color{blue}{\left(-0.1111111111111111 \cdot \frac{1}{x}\right)} + 1 \]
      4. div-inv4.1%

        \[\leadsto \left(-\color{blue}{\frac{0.1111111111111111}{x}}\right) + 1 \]
      5. +-commutative4.1%

        \[\leadsto \color{blue}{1 + \left(-\frac{0.1111111111111111}{x}\right)} \]
      6. flip-+32.2%

        \[\leadsto \color{blue}{\frac{1 \cdot 1 - \left(-\frac{0.1111111111111111}{x}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)}} \]
      7. metadata-eval32.2%

        \[\leadsto \frac{\color{blue}{1} - \left(-\frac{0.1111111111111111}{x}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      8. div-inv32.2%

        \[\leadsto \frac{1 - \left(-\color{blue}{0.1111111111111111 \cdot \frac{1}{x}}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      9. distribute-lft-neg-in32.2%

        \[\leadsto \frac{1 - \color{blue}{\left(\left(-0.1111111111111111\right) \cdot \frac{1}{x}\right)} \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      10. metadata-eval32.2%

        \[\leadsto \frac{1 - \left(\color{blue}{-0.1111111111111111} \cdot \frac{1}{x}\right) \cdot \left(-\frac{0.1111111111111111}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      11. div-inv32.2%

        \[\leadsto \frac{1 - \left(-0.1111111111111111 \cdot \frac{1}{x}\right) \cdot \left(-\color{blue}{0.1111111111111111 \cdot \frac{1}{x}}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      12. distribute-lft-neg-in32.2%

        \[\leadsto \frac{1 - \left(-0.1111111111111111 \cdot \frac{1}{x}\right) \cdot \color{blue}{\left(\left(-0.1111111111111111\right) \cdot \frac{1}{x}\right)}}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      13. metadata-eval32.2%

        \[\leadsto \frac{1 - \left(-0.1111111111111111 \cdot \frac{1}{x}\right) \cdot \left(\color{blue}{-0.1111111111111111} \cdot \frac{1}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      14. un-div-inv32.2%

        \[\leadsto \frac{1 - \color{blue}{\frac{-0.1111111111111111}{x}} \cdot \left(-0.1111111111111111 \cdot \frac{1}{x}\right)}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      15. un-div-inv32.2%

        \[\leadsto \frac{1 - \frac{-0.1111111111111111}{x} \cdot \color{blue}{\frac{-0.1111111111111111}{x}}}{1 - \left(-\frac{0.1111111111111111}{x}\right)} \]
      16. distribute-neg-frac32.2%

        \[\leadsto \frac{1 - \frac{-0.1111111111111111}{x} \cdot \frac{-0.1111111111111111}{x}}{1 - \color{blue}{\frac{-0.1111111111111111}{x}}} \]
      17. metadata-eval32.2%

        \[\leadsto \frac{1 - \frac{-0.1111111111111111}{x} \cdot \frac{-0.1111111111111111}{x}}{1 - \frac{\color{blue}{-0.1111111111111111}}{x}} \]
    10. Applied egg-rr32.2%

      \[\leadsto \color{blue}{\frac{1 - \frac{-0.1111111111111111}{x} \cdot \frac{-0.1111111111111111}{x}}{1 - \frac{-0.1111111111111111}{x}}} \]
    11. Step-by-step derivation
      1. frac-times32.2%

        \[\leadsto \frac{1 - \color{blue}{\frac{-0.1111111111111111 \cdot -0.1111111111111111}{x \cdot x}}}{1 - \frac{-0.1111111111111111}{x}} \]
      2. associate-/r*32.2%

        \[\leadsto \frac{1 - \color{blue}{\frac{\frac{-0.1111111111111111 \cdot -0.1111111111111111}{x}}{x}}}{1 - \frac{-0.1111111111111111}{x}} \]
      3. metadata-eval32.2%

        \[\leadsto \frac{1 - \frac{\frac{\color{blue}{0.012345679012345678}}{x}}{x}}{1 - \frac{-0.1111111111111111}{x}} \]
    12. Applied egg-rr32.2%

      \[\leadsto \frac{1 - \color{blue}{\frac{\frac{0.012345679012345678}{x}}{x}}}{1 - \frac{-0.1111111111111111}{x}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification71.2%

    \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq 7 \cdot 10^{+124}:\\ \;\;\;\;1 + \frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;\frac{1 - \frac{\frac{0.012345679012345678}{x}}{x}}{1 - \frac{-0.1111111111111111}{x}}\\ \end{array} \]

Alternative 13: 61.3% accurate, 22.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq 2300:\\ \;\;\;\;\frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1\\ \end{array} \end{array} \]
(FPCore (x y)
 :precision binary64
 (if (<= x 2300.0) (/ -0.1111111111111111 x) 1.0))
double code(double x, double y) {
	double tmp;
	if (x <= 2300.0) {
		tmp = -0.1111111111111111 / x;
	} else {
		tmp = 1.0;
	}
	return tmp;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8) :: tmp
    if (x <= 2300.0d0) then
        tmp = (-0.1111111111111111d0) / x
    else
        tmp = 1.0d0
    end if
    code = tmp
end function
public static double code(double x, double y) {
	double tmp;
	if (x <= 2300.0) {
		tmp = -0.1111111111111111 / x;
	} else {
		tmp = 1.0;
	}
	return tmp;
}
def code(x, y):
	tmp = 0
	if x <= 2300.0:
		tmp = -0.1111111111111111 / x
	else:
		tmp = 1.0
	return tmp
function code(x, y)
	tmp = 0.0
	if (x <= 2300.0)
		tmp = Float64(-0.1111111111111111 / x);
	else
		tmp = 1.0;
	end
	return tmp
end
function tmp_2 = code(x, y)
	tmp = 0.0;
	if (x <= 2300.0)
		tmp = -0.1111111111111111 / x;
	else
		tmp = 1.0;
	end
	tmp_2 = tmp;
end
code[x_, y_] := If[LessEqual[x, 2300.0], N[(-0.1111111111111111 / x), $MachinePrecision], 1.0]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;x \leq 2300:\\
\;\;\;\;\frac{-0.1111111111111111}{x}\\

\mathbf{else}:\\
\;\;\;\;1\\


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

    1. Initial program 99.7%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. sub-neg99.7%

        \[\leadsto \color{blue}{\left(1 - \frac{1}{x \cdot 9}\right) + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. distribute-frac-neg99.7%

        \[\leadsto \left(1 - \frac{1}{x \cdot 9}\right) + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}} \]
      3. *-commutative99.7%

        \[\leadsto \left(1 - \frac{1}{\color{blue}{9 \cdot x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
      4. associate-/r*99.6%

        \[\leadsto \left(1 - \color{blue}{\frac{\frac{1}{9}}{x}}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
      5. metadata-eval99.6%

        \[\leadsto \left(1 - \frac{\color{blue}{0.1111111111111111}}{x}\right) + \frac{-y}{3 \cdot \sqrt{x}} \]
      6. neg-mul-199.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} \]
      7. times-frac99.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{\frac{-1}{3} \cdot \frac{y}{\sqrt{x}}} \]
      8. metadata-eval99.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + \color{blue}{-0.3333333333333333} \cdot \frac{y}{\sqrt{x}} \]
    3. Simplified99.6%

      \[\leadsto \color{blue}{\left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \frac{y}{\sqrt{x}}} \]
    4. Step-by-step derivation
      1. clear-num99.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \color{blue}{\frac{1}{\frac{\sqrt{x}}{y}}} \]
      2. associate-/r/99.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \color{blue}{\left(\frac{1}{\sqrt{x}} \cdot y\right)} \]
      3. pow1/299.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left(\frac{1}{\color{blue}{{x}^{0.5}}} \cdot y\right) \]
      4. pow-flip99.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left(\color{blue}{{x}^{\left(-0.5\right)}} \cdot y\right) \]
      5. metadata-eval99.6%

        \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \left({x}^{\color{blue}{-0.5}} \cdot y\right) \]
    5. Applied egg-rr99.6%

      \[\leadsto \left(1 - \frac{0.1111111111111111}{x}\right) + -0.3333333333333333 \cdot \color{blue}{\left({x}^{-0.5} \cdot y\right)} \]
    6. Taylor expanded in x around 0 65.4%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x}} \]

    if 2300 < x

    1. Initial program 99.8%

      \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
    2. Step-by-step derivation
      1. associate--l-99.8%

        \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
      2. +-commutative99.8%

        \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
      3. associate--r+99.8%

        \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
      4. sub-neg99.8%

        \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
      5. distribute-frac-neg99.8%

        \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
      6. associate-+r-99.8%

        \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
      7. neg-mul-199.8%

        \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
      8. associate-*l/99.8%

        \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
      9. fma-neg99.8%

        \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
      10. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
      11. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
      12. distribute-neg-frac99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
      13. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
      14. *-commutative99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
      15. associate-/r*99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
      16. metadata-eval99.8%

        \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
    3. Simplified99.8%

      \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
    4. Taylor expanded in x around inf 68.1%

      \[\leadsto \color{blue}{1} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification66.8%

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 2300:\\ \;\;\;\;\frac{-0.1111111111111111}{x}\\ \mathbf{else}:\\ \;\;\;\;1\\ \end{array} \]

Alternative 14: 62.3% accurate, 22.6× speedup?

\[\begin{array}{l} \\ 1 + \frac{-0.1111111111111111}{x} \end{array} \]
(FPCore (x y) :precision binary64 (+ 1.0 (/ -0.1111111111111111 x)))
double code(double x, double y) {
	return 1.0 + (-0.1111111111111111 / x);
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = 1.0d0 + ((-0.1111111111111111d0) / x)
end function
public static double code(double x, double y) {
	return 1.0 + (-0.1111111111111111 / x);
}
def code(x, y):
	return 1.0 + (-0.1111111111111111 / x)
function code(x, y)
	return Float64(1.0 + Float64(-0.1111111111111111 / x))
end
function tmp = code(x, y)
	tmp = 1.0 + (-0.1111111111111111 / x);
end
code[x_, y_] := N[(1.0 + N[(-0.1111111111111111 / x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
1 + \frac{-0.1111111111111111}{x}
\end{array}
Derivation
  1. Initial program 99.8%

    \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
  2. Step-by-step derivation
    1. associate--l-99.8%

      \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
    2. +-commutative99.8%

      \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
    3. associate--r+99.8%

      \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
    4. sub-neg99.8%

      \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
    5. distribute-frac-neg99.8%

      \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
    6. associate-+r-99.8%

      \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
    7. neg-mul-199.8%

      \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
    8. associate-*l/99.7%

      \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
    9. fma-neg99.7%

      \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
    10. associate-/r*99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
    11. metadata-eval99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
    12. distribute-neg-frac99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
    13. metadata-eval99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
    14. *-commutative99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
    15. associate-/r*99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
    16. metadata-eval99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
  3. Simplified99.7%

    \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
  4. Taylor expanded in y around 0 67.1%

    \[\leadsto \color{blue}{1 - 0.1111111111111111 \cdot \frac{1}{x}} \]
  5. Step-by-step derivation
    1. cancel-sign-sub-inv67.1%

      \[\leadsto \color{blue}{1 + \left(-0.1111111111111111\right) \cdot \frac{1}{x}} \]
    2. metadata-eval67.1%

      \[\leadsto 1 + \color{blue}{-0.1111111111111111} \cdot \frac{1}{x} \]
    3. associate-*r/67.2%

      \[\leadsto 1 + \color{blue}{\frac{-0.1111111111111111 \cdot 1}{x}} \]
    4. metadata-eval67.2%

      \[\leadsto 1 + \frac{\color{blue}{-0.1111111111111111}}{x} \]
    5. +-commutative67.2%

      \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
  6. Simplified67.2%

    \[\leadsto \color{blue}{\frac{-0.1111111111111111}{x} + 1} \]
  7. Final simplification67.2%

    \[\leadsto 1 + \frac{-0.1111111111111111}{x} \]

Alternative 15: 31.7% accurate, 113.0× speedup?

\[\begin{array}{l} \\ 1 \end{array} \]
(FPCore (x y) :precision binary64 1.0)
double code(double x, double y) {
	return 1.0;
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = 1.0d0
end function
public static double code(double x, double y) {
	return 1.0;
}
def code(x, y):
	return 1.0
function code(x, y)
	return 1.0
end
function tmp = code(x, y)
	tmp = 1.0;
end
code[x_, y_] := 1.0
\begin{array}{l}

\\
1
\end{array}
Derivation
  1. Initial program 99.8%

    \[\left(1 - \frac{1}{x \cdot 9}\right) - \frac{y}{3 \cdot \sqrt{x}} \]
  2. Step-by-step derivation
    1. associate--l-99.8%

      \[\leadsto \color{blue}{1 - \left(\frac{1}{x \cdot 9} + \frac{y}{3 \cdot \sqrt{x}}\right)} \]
    2. +-commutative99.8%

      \[\leadsto 1 - \color{blue}{\left(\frac{y}{3 \cdot \sqrt{x}} + \frac{1}{x \cdot 9}\right)} \]
    3. associate--r+99.8%

      \[\leadsto \color{blue}{\left(1 - \frac{y}{3 \cdot \sqrt{x}}\right) - \frac{1}{x \cdot 9}} \]
    4. sub-neg99.8%

      \[\leadsto \color{blue}{\left(1 + \left(-\frac{y}{3 \cdot \sqrt{x}}\right)\right)} - \frac{1}{x \cdot 9} \]
    5. distribute-frac-neg99.8%

      \[\leadsto \left(1 + \color{blue}{\frac{-y}{3 \cdot \sqrt{x}}}\right) - \frac{1}{x \cdot 9} \]
    6. associate-+r-99.8%

      \[\leadsto \color{blue}{1 + \left(\frac{-y}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right)} \]
    7. neg-mul-199.8%

      \[\leadsto 1 + \left(\frac{\color{blue}{-1 \cdot y}}{3 \cdot \sqrt{x}} - \frac{1}{x \cdot 9}\right) \]
    8. associate-*l/99.7%

      \[\leadsto 1 + \left(\color{blue}{\frac{-1}{3 \cdot \sqrt{x}} \cdot y} - \frac{1}{x \cdot 9}\right) \]
    9. fma-neg99.7%

      \[\leadsto 1 + \color{blue}{\mathsf{fma}\left(\frac{-1}{3 \cdot \sqrt{x}}, y, -\frac{1}{x \cdot 9}\right)} \]
    10. associate-/r*99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\color{blue}{\frac{\frac{-1}{3}}{\sqrt{x}}}, y, -\frac{1}{x \cdot 9}\right) \]
    11. metadata-eval99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{\color{blue}{-0.3333333333333333}}{\sqrt{x}}, y, -\frac{1}{x \cdot 9}\right) \]
    12. distribute-neg-frac99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{-1}{x \cdot 9}}\right) \]
    13. metadata-eval99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-1}}{x \cdot 9}\right) \]
    14. *-commutative99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-1}{\color{blue}{9 \cdot x}}\right) \]
    15. associate-/r*99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \color{blue}{\frac{\frac{-1}{9}}{x}}\right) \]
    16. metadata-eval99.7%

      \[\leadsto 1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{\color{blue}{-0.1111111111111111}}{x}\right) \]
  3. Simplified99.7%

    \[\leadsto \color{blue}{1 + \mathsf{fma}\left(\frac{-0.3333333333333333}{\sqrt{x}}, y, \frac{-0.1111111111111111}{x}\right)} \]
  4. Taylor expanded in x around inf 36.8%

    \[\leadsto \color{blue}{1} \]
  5. Final simplification36.8%

    \[\leadsto 1 \]

Developer target: 99.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(1 - \frac{\frac{1}{x}}{9}\right) - \frac{y}{3 \cdot \sqrt{x}} \end{array} \]
(FPCore (x y)
 :precision binary64
 (- (- 1.0 (/ (/ 1.0 x) 9.0)) (/ y (* 3.0 (sqrt x)))))
double code(double x, double y) {
	return (1.0 - ((1.0 / x) / 9.0)) - (y / (3.0 * sqrt(x)));
}
real(8) function code(x, y)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    code = (1.0d0 - ((1.0d0 / x) / 9.0d0)) - (y / (3.0d0 * sqrt(x)))
end function
public static double code(double x, double y) {
	return (1.0 - ((1.0 / x) / 9.0)) - (y / (3.0 * Math.sqrt(x)));
}
def code(x, y):
	return (1.0 - ((1.0 / x) / 9.0)) - (y / (3.0 * math.sqrt(x)))
function code(x, y)
	return Float64(Float64(1.0 - Float64(Float64(1.0 / x) / 9.0)) - Float64(y / Float64(3.0 * sqrt(x))))
end
function tmp = code(x, y)
	tmp = (1.0 - ((1.0 / x) / 9.0)) - (y / (3.0 * sqrt(x)));
end
code[x_, y_] := N[(N[(1.0 - N[(N[(1.0 / x), $MachinePrecision] / 9.0), $MachinePrecision]), $MachinePrecision] - N[(y / N[(3.0 * N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(1 - \frac{\frac{1}{x}}{9}\right) - \frac{y}{3 \cdot \sqrt{x}}
\end{array}

Reproduce

?
herbie shell --seed 2023318 
(FPCore (x y)
  :name "Numeric.SpecFunctions:invIncompleteGamma from math-functions-0.1.5.2, D"
  :precision binary64

  :herbie-target
  (- (- 1.0 (/ (/ 1.0 x) 9.0)) (/ y (* 3.0 (sqrt x))))

  (- (- 1.0 (/ 1.0 (* x 9.0))) (/ y (* 3.0 (sqrt x)))))