Diagrams.Backend.Cairo.Internal:setTexture from diagrams-cairo-1.3.0.3

Percentage Accurate: 84.7% → 97.5%
Time: 7.3s
Alternatives: 7
Speedup: 1.0×

Specification

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

\\
\frac{x \cdot \left(y - z\right)}{y}
\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 7 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: 84.7% accurate, 1.0× speedup?

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

\\
\frac{x \cdot \left(y - z\right)}{y}
\end{array}

Alternative 1: 97.5% accurate, 0.8× speedup?

\[\begin{array}{l} x\_m = \left|x\right| \\ x\_s = \mathsf{copysign}\left(1, x\right) \\ x\_s \cdot \begin{array}{l} \mathbf{if}\;x\_m \leq 6 \cdot 10^{-120}:\\ \;\;\;\;x\_m - \frac{x\_m \cdot z}{y}\\ \mathbf{else}:\\ \;\;\;\;x\_m \cdot \left(1 - \frac{z}{y}\right)\\ \end{array} \end{array} \]
x\_m = (fabs.f64 x)
x\_s = (copysign.f64 #s(literal 1 binary64) x)
(FPCore (x_s x_m y z)
 :precision binary64
 (* x_s (if (<= x_m 6e-120) (- x_m (/ (* x_m z) y)) (* x_m (- 1.0 (/ z y))))))
x\_m = fabs(x);
x\_s = copysign(1.0, x);
double code(double x_s, double x_m, double y, double z) {
	double tmp;
	if (x_m <= 6e-120) {
		tmp = x_m - ((x_m * z) / y);
	} else {
		tmp = x_m * (1.0 - (z / y));
	}
	return x_s * tmp;
}
x\_m = abs(x)
x\_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m, y, z)
    real(8), intent (in) :: x_s
    real(8), intent (in) :: x_m
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8) :: tmp
    if (x_m <= 6d-120) then
        tmp = x_m - ((x_m * z) / y)
    else
        tmp = x_m * (1.0d0 - (z / y))
    end if
    code = x_s * tmp
end function
x\_m = Math.abs(x);
x\_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m, double y, double z) {
	double tmp;
	if (x_m <= 6e-120) {
		tmp = x_m - ((x_m * z) / y);
	} else {
		tmp = x_m * (1.0 - (z / y));
	}
	return x_s * tmp;
}
x\_m = math.fabs(x)
x\_s = math.copysign(1.0, x)
def code(x_s, x_m, y, z):
	tmp = 0
	if x_m <= 6e-120:
		tmp = x_m - ((x_m * z) / y)
	else:
		tmp = x_m * (1.0 - (z / y))
	return x_s * tmp
x\_m = abs(x)
x\_s = copysign(1.0, x)
function code(x_s, x_m, y, z)
	tmp = 0.0
	if (x_m <= 6e-120)
		tmp = Float64(x_m - Float64(Float64(x_m * z) / y));
	else
		tmp = Float64(x_m * Float64(1.0 - Float64(z / y)));
	end
	return Float64(x_s * tmp)
end
x\_m = abs(x);
x\_s = sign(x) * abs(1.0);
function tmp_2 = code(x_s, x_m, y, z)
	tmp = 0.0;
	if (x_m <= 6e-120)
		tmp = x_m - ((x_m * z) / y);
	else
		tmp = x_m * (1.0 - (z / y));
	end
	tmp_2 = x_s * tmp;
end
x\_m = N[Abs[x], $MachinePrecision]
x\_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_, y_, z_] := N[(x$95$s * If[LessEqual[x$95$m, 6e-120], N[(x$95$m - N[(N[(x$95$m * z), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision], N[(x$95$m * N[(1.0 - N[(z / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]), $MachinePrecision]
\begin{array}{l}
x\_m = \left|x\right|
\\
x\_s = \mathsf{copysign}\left(1, x\right)

\\
x\_s \cdot \begin{array}{l}
\mathbf{if}\;x\_m \leq 6 \cdot 10^{-120}:\\
\;\;\;\;x\_m - \frac{x\_m \cdot z}{y}\\

\mathbf{else}:\\
\;\;\;\;x\_m \cdot \left(1 - \frac{z}{y}\right)\\


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

    1. Initial program 87.6%

      \[\frac{x \cdot \left(y - z\right)}{y} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\frac{x \cdot \left(y - z\right)}{y}} \]
    4. Step-by-step derivation
      1. associate-/l*N/A

        \[\leadsto \color{blue}{x \cdot \frac{y - z}{y}} \]
      2. div-subN/A

        \[\leadsto x \cdot \color{blue}{\left(\frac{y}{y} - \frac{z}{y}\right)} \]
      3. *-inversesN/A

        \[\leadsto x \cdot \left(\color{blue}{1} - \frac{z}{y}\right) \]
      4. distribute-lft-out--N/A

        \[\leadsto \color{blue}{x \cdot 1 - x \cdot \frac{z}{y}} \]
      5. *-rgt-identityN/A

        \[\leadsto \color{blue}{x} - x \cdot \frac{z}{y} \]
      6. associate-/l*N/A

        \[\leadsto x - \color{blue}{\frac{x \cdot z}{y}} \]
      7. --lowering--.f64N/A

        \[\leadsto \color{blue}{x - \frac{x \cdot z}{y}} \]
      8. /-lowering-/.f64N/A

        \[\leadsto x - \color{blue}{\frac{x \cdot z}{y}} \]
      9. *-lowering-*.f6497.0

        \[\leadsto x - \frac{\color{blue}{x \cdot z}}{y} \]
    5. Simplified97.0%

      \[\leadsto \color{blue}{x - \frac{x \cdot z}{y}} \]

    if 6.00000000000000022e-120 < x

    1. Initial program 76.0%

      \[\frac{x \cdot \left(y - z\right)}{y} \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. associate-/l*N/A

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

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

        \[\leadsto \color{blue}{\frac{y - z}{y} \cdot x} \]
      4. div-subN/A

        \[\leadsto \color{blue}{\left(\frac{y}{y} - \frac{z}{y}\right)} \cdot x \]
      5. *-inversesN/A

        \[\leadsto \left(\color{blue}{1} - \frac{z}{y}\right) \cdot x \]
      6. --lowering--.f64N/A

        \[\leadsto \color{blue}{\left(1 - \frac{z}{y}\right)} \cdot x \]
      7. /-lowering-/.f6499.9

        \[\leadsto \left(1 - \color{blue}{\frac{z}{y}}\right) \cdot x \]
    4. Applied egg-rr99.9%

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

    \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 6 \cdot 10^{-120}:\\ \;\;\;\;x - \frac{x \cdot z}{y}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(1 - \frac{z}{y}\right)\\ \end{array} \]
  5. Add Preprocessing

Alternative 2: 73.3% accurate, 0.3× speedup?

\[\begin{array}{l} x\_m = \left|x\right| \\ x\_s = \mathsf{copysign}\left(1, x\right) \\ \begin{array}{l} t_0 := \frac{x\_m \cdot \left(y - z\right)}{y}\\ x\_s \cdot \begin{array}{l} \mathbf{if}\;t\_0 \leq -5 \cdot 10^{-120}:\\ \;\;\;\;x\_m \cdot \frac{z}{-y}\\ \mathbf{elif}\;t\_0 \leq 2 \cdot 10^{+211}:\\ \;\;\;\;x\_m\\ \mathbf{else}:\\ \;\;\;\;y \cdot \frac{x\_m}{y}\\ \end{array} \end{array} \end{array} \]
x\_m = (fabs.f64 x)
x\_s = (copysign.f64 #s(literal 1 binary64) x)
(FPCore (x_s x_m y z)
 :precision binary64
 (let* ((t_0 (/ (* x_m (- y z)) y)))
   (*
    x_s
    (if (<= t_0 -5e-120)
      (* x_m (/ z (- y)))
      (if (<= t_0 2e+211) x_m (* y (/ x_m y)))))))
x\_m = fabs(x);
x\_s = copysign(1.0, x);
double code(double x_s, double x_m, double y, double z) {
	double t_0 = (x_m * (y - z)) / y;
	double tmp;
	if (t_0 <= -5e-120) {
		tmp = x_m * (z / -y);
	} else if (t_0 <= 2e+211) {
		tmp = x_m;
	} else {
		tmp = y * (x_m / y);
	}
	return x_s * tmp;
}
x\_m = abs(x)
x\_s = copysign(1.0d0, x)
real(8) function code(x_s, x_m, y, z)
    real(8), intent (in) :: x_s
    real(8), intent (in) :: x_m
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8) :: t_0
    real(8) :: tmp
    t_0 = (x_m * (y - z)) / y
    if (t_0 <= (-5d-120)) then
        tmp = x_m * (z / -y)
    else if (t_0 <= 2d+211) then
        tmp = x_m
    else
        tmp = y * (x_m / y)
    end if
    code = x_s * tmp
end function
x\_m = Math.abs(x);
x\_s = Math.copySign(1.0, x);
public static double code(double x_s, double x_m, double y, double z) {
	double t_0 = (x_m * (y - z)) / y;
	double tmp;
	if (t_0 <= -5e-120) {
		tmp = x_m * (z / -y);
	} else if (t_0 <= 2e+211) {
		tmp = x_m;
	} else {
		tmp = y * (x_m / y);
	}
	return x_s * tmp;
}
x\_m = math.fabs(x)
x\_s = math.copysign(1.0, x)
def code(x_s, x_m, y, z):
	t_0 = (x_m * (y - z)) / y
	tmp = 0
	if t_0 <= -5e-120:
		tmp = x_m * (z / -y)
	elif t_0 <= 2e+211:
		tmp = x_m
	else:
		tmp = y * (x_m / y)
	return x_s * tmp
x\_m = abs(x)
x\_s = copysign(1.0, x)
function code(x_s, x_m, y, z)
	t_0 = Float64(Float64(x_m * Float64(y - z)) / y)
	tmp = 0.0
	if (t_0 <= -5e-120)
		tmp = Float64(x_m * Float64(z / Float64(-y)));
	elseif (t_0 <= 2e+211)
		tmp = x_m;
	else
		tmp = Float64(y * Float64(x_m / y));
	end
	return Float64(x_s * tmp)
end
x\_m = abs(x);
x\_s = sign(x) * abs(1.0);
function tmp_2 = code(x_s, x_m, y, z)
	t_0 = (x_m * (y - z)) / y;
	tmp = 0.0;
	if (t_0 <= -5e-120)
		tmp = x_m * (z / -y);
	elseif (t_0 <= 2e+211)
		tmp = x_m;
	else
		tmp = y * (x_m / y);
	end
	tmp_2 = x_s * tmp;
end
x\_m = N[Abs[x], $MachinePrecision]
x\_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
code[x$95$s_, x$95$m_, y_, z_] := Block[{t$95$0 = N[(N[(x$95$m * N[(y - z), $MachinePrecision]), $MachinePrecision] / y), $MachinePrecision]}, N[(x$95$s * If[LessEqual[t$95$0, -5e-120], N[(x$95$m * N[(z / (-y)), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$0, 2e+211], x$95$m, N[(y * N[(x$95$m / y), $MachinePrecision]), $MachinePrecision]]]), $MachinePrecision]]
\begin{array}{l}
x\_m = \left|x\right|
\\
x\_s = \mathsf{copysign}\left(1, x\right)

\\
\begin{array}{l}
t_0 := \frac{x\_m \cdot \left(y - z\right)}{y}\\
x\_s \cdot \begin{array}{l}
\mathbf{if}\;t\_0 \leq -5 \cdot 10^{-120}:\\
\;\;\;\;x\_m \cdot \frac{z}{-y}\\

\mathbf{elif}\;t\_0 \leq 2 \cdot 10^{+211}:\\
\;\;\;\;x\_m\\

\mathbf{else}:\\
\;\;\;\;y \cdot \frac{x\_m}{y}\\


\end{array}
\end{array}
\end{array}
Derivation
  1. Split input into 3 regimes
  2. if (/.f64 (*.f64 x (-.f64 y z)) y) < -5.00000000000000007e-120

    1. Initial program 84.0%

      \[\frac{x \cdot \left(y - z\right)}{y} \]
    2. Add Preprocessing
    3. Taylor expanded in y around 0

      \[\leadsto \color{blue}{-1 \cdot \frac{x \cdot z}{y}} \]
    4. Step-by-step derivation
      1. associate-*r/N/A

        \[\leadsto \color{blue}{\frac{-1 \cdot \left(x \cdot z\right)}{y}} \]
      2. /-lowering-/.f64N/A

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

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

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

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

        \[\leadsto \frac{z \cdot \color{blue}{\left(\mathsf{neg}\left(x\right)\right)}}{y} \]
      7. neg-lowering-neg.f6450.8

        \[\leadsto \frac{z \cdot \color{blue}{\left(-x\right)}}{y} \]
    5. Simplified50.8%

      \[\leadsto \color{blue}{\frac{z \cdot \left(-x\right)}{y}} \]
    6. Step-by-step derivation
      1. distribute-rgt-neg-outN/A

        \[\leadsto \frac{\color{blue}{\mathsf{neg}\left(z \cdot x\right)}}{y} \]
      2. distribute-lft-neg-inN/A

        \[\leadsto \frac{\color{blue}{\left(\mathsf{neg}\left(z\right)\right) \cdot x}}{y} \]
      3. associate-*l/N/A

        \[\leadsto \color{blue}{\frac{\mathsf{neg}\left(z\right)}{y} \cdot x} \]
      4. distribute-neg-fracN/A

        \[\leadsto \color{blue}{\left(\mathsf{neg}\left(\frac{z}{y}\right)\right)} \cdot x \]
      5. *-lowering-*.f64N/A

        \[\leadsto \color{blue}{\left(\mathsf{neg}\left(\frac{z}{y}\right)\right) \cdot x} \]
      6. distribute-neg-frac2N/A

        \[\leadsto \color{blue}{\frac{z}{\mathsf{neg}\left(y\right)}} \cdot x \]
      7. /-lowering-/.f64N/A

        \[\leadsto \color{blue}{\frac{z}{\mathsf{neg}\left(y\right)}} \cdot x \]
      8. neg-lowering-neg.f6448.8

        \[\leadsto \frac{z}{\color{blue}{-y}} \cdot x \]
    7. Applied egg-rr48.8%

      \[\leadsto \color{blue}{\frac{z}{-y} \cdot x} \]

    if -5.00000000000000007e-120 < (/.f64 (*.f64 x (-.f64 y z)) y) < 1.9999999999999999e211

    1. Initial program 95.7%

      \[\frac{x \cdot \left(y - z\right)}{y} \]
    2. Add Preprocessing
    3. Taylor expanded in y around inf

      \[\leadsto \color{blue}{x} \]
    4. Step-by-step derivation
      1. Simplified70.2%

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

      if 1.9999999999999999e211 < (/.f64 (*.f64 x (-.f64 y z)) y)

      1. Initial program 54.5%

        \[\frac{x \cdot \left(y - z\right)}{y} \]
      2. Add Preprocessing
      3. Taylor expanded in y around inf

        \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
      4. Step-by-step derivation
        1. *-lowering-*.f646.3

          \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
      5. Simplified6.3%

        \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
      6. Step-by-step derivation
        1. associate-*l/N/A

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

          \[\leadsto \color{blue}{\frac{x}{y} \cdot y} \]
        3. /-lowering-/.f6449.4

          \[\leadsto \color{blue}{\frac{x}{y}} \cdot y \]
      7. Applied egg-rr49.4%

        \[\leadsto \color{blue}{\frac{x}{y} \cdot y} \]
    5. Recombined 3 regimes into one program.
    6. Final simplification58.1%

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

    Alternative 3: 74.1% accurate, 0.3× speedup?

    \[\begin{array}{l} x\_m = \left|x\right| \\ x\_s = \mathsf{copysign}\left(1, x\right) \\ \begin{array}{l} t_0 := \frac{x\_m \cdot \left(y - z\right)}{y}\\ x\_s \cdot \begin{array}{l} \mathbf{if}\;t\_0 \leq -5 \cdot 10^{-120}:\\ \;\;\;\;\frac{x\_m}{y} \cdot \left(-z\right)\\ \mathbf{elif}\;t\_0 \leq 2 \cdot 10^{+211}:\\ \;\;\;\;x\_m\\ \mathbf{else}:\\ \;\;\;\;y \cdot \frac{x\_m}{y}\\ \end{array} \end{array} \end{array} \]
    x\_m = (fabs.f64 x)
    x\_s = (copysign.f64 #s(literal 1 binary64) x)
    (FPCore (x_s x_m y z)
     :precision binary64
     (let* ((t_0 (/ (* x_m (- y z)) y)))
       (*
        x_s
        (if (<= t_0 -5e-120)
          (* (/ x_m y) (- z))
          (if (<= t_0 2e+211) x_m (* y (/ x_m y)))))))
    x\_m = fabs(x);
    x\_s = copysign(1.0, x);
    double code(double x_s, double x_m, double y, double z) {
    	double t_0 = (x_m * (y - z)) / y;
    	double tmp;
    	if (t_0 <= -5e-120) {
    		tmp = (x_m / y) * -z;
    	} else if (t_0 <= 2e+211) {
    		tmp = x_m;
    	} else {
    		tmp = y * (x_m / y);
    	}
    	return x_s * tmp;
    }
    
    x\_m = abs(x)
    x\_s = copysign(1.0d0, x)
    real(8) function code(x_s, x_m, y, z)
        real(8), intent (in) :: x_s
        real(8), intent (in) :: x_m
        real(8), intent (in) :: y
        real(8), intent (in) :: z
        real(8) :: t_0
        real(8) :: tmp
        t_0 = (x_m * (y - z)) / y
        if (t_0 <= (-5d-120)) then
            tmp = (x_m / y) * -z
        else if (t_0 <= 2d+211) then
            tmp = x_m
        else
            tmp = y * (x_m / y)
        end if
        code = x_s * tmp
    end function
    
    x\_m = Math.abs(x);
    x\_s = Math.copySign(1.0, x);
    public static double code(double x_s, double x_m, double y, double z) {
    	double t_0 = (x_m * (y - z)) / y;
    	double tmp;
    	if (t_0 <= -5e-120) {
    		tmp = (x_m / y) * -z;
    	} else if (t_0 <= 2e+211) {
    		tmp = x_m;
    	} else {
    		tmp = y * (x_m / y);
    	}
    	return x_s * tmp;
    }
    
    x\_m = math.fabs(x)
    x\_s = math.copysign(1.0, x)
    def code(x_s, x_m, y, z):
    	t_0 = (x_m * (y - z)) / y
    	tmp = 0
    	if t_0 <= -5e-120:
    		tmp = (x_m / y) * -z
    	elif t_0 <= 2e+211:
    		tmp = x_m
    	else:
    		tmp = y * (x_m / y)
    	return x_s * tmp
    
    x\_m = abs(x)
    x\_s = copysign(1.0, x)
    function code(x_s, x_m, y, z)
    	t_0 = Float64(Float64(x_m * Float64(y - z)) / y)
    	tmp = 0.0
    	if (t_0 <= -5e-120)
    		tmp = Float64(Float64(x_m / y) * Float64(-z));
    	elseif (t_0 <= 2e+211)
    		tmp = x_m;
    	else
    		tmp = Float64(y * Float64(x_m / y));
    	end
    	return Float64(x_s * tmp)
    end
    
    x\_m = abs(x);
    x\_s = sign(x) * abs(1.0);
    function tmp_2 = code(x_s, x_m, y, z)
    	t_0 = (x_m * (y - z)) / y;
    	tmp = 0.0;
    	if (t_0 <= -5e-120)
    		tmp = (x_m / y) * -z;
    	elseif (t_0 <= 2e+211)
    		tmp = x_m;
    	else
    		tmp = y * (x_m / y);
    	end
    	tmp_2 = x_s * tmp;
    end
    
    x\_m = N[Abs[x], $MachinePrecision]
    x\_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
    code[x$95$s_, x$95$m_, y_, z_] := Block[{t$95$0 = N[(N[(x$95$m * N[(y - z), $MachinePrecision]), $MachinePrecision] / y), $MachinePrecision]}, N[(x$95$s * If[LessEqual[t$95$0, -5e-120], N[(N[(x$95$m / y), $MachinePrecision] * (-z)), $MachinePrecision], If[LessEqual[t$95$0, 2e+211], x$95$m, N[(y * N[(x$95$m / y), $MachinePrecision]), $MachinePrecision]]]), $MachinePrecision]]
    
    \begin{array}{l}
    x\_m = \left|x\right|
    \\
    x\_s = \mathsf{copysign}\left(1, x\right)
    
    \\
    \begin{array}{l}
    t_0 := \frac{x\_m \cdot \left(y - z\right)}{y}\\
    x\_s \cdot \begin{array}{l}
    \mathbf{if}\;t\_0 \leq -5 \cdot 10^{-120}:\\
    \;\;\;\;\frac{x\_m}{y} \cdot \left(-z\right)\\
    
    \mathbf{elif}\;t\_0 \leq 2 \cdot 10^{+211}:\\
    \;\;\;\;x\_m\\
    
    \mathbf{else}:\\
    \;\;\;\;y \cdot \frac{x\_m}{y}\\
    
    
    \end{array}
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 3 regimes
    2. if (/.f64 (*.f64 x (-.f64 y z)) y) < -5.00000000000000007e-120

      1. Initial program 84.0%

        \[\frac{x \cdot \left(y - z\right)}{y} \]
      2. Add Preprocessing
      3. Taylor expanded in y around 0

        \[\leadsto \color{blue}{-1 \cdot \frac{x \cdot z}{y}} \]
      4. Step-by-step derivation
        1. associate-*r/N/A

          \[\leadsto \color{blue}{\frac{-1 \cdot \left(x \cdot z\right)}{y}} \]
        2. /-lowering-/.f64N/A

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

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

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

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

          \[\leadsto \frac{z \cdot \color{blue}{\left(\mathsf{neg}\left(x\right)\right)}}{y} \]
        7. neg-lowering-neg.f6450.8

          \[\leadsto \frac{z \cdot \color{blue}{\left(-x\right)}}{y} \]
      5. Simplified50.8%

        \[\leadsto \color{blue}{\frac{z \cdot \left(-x\right)}{y}} \]
      6. Step-by-step derivation
        1. associate-/l*N/A

          \[\leadsto \color{blue}{z \cdot \frac{\mathsf{neg}\left(x\right)}{y}} \]
        2. *-commutativeN/A

          \[\leadsto \color{blue}{\frac{\mathsf{neg}\left(x\right)}{y} \cdot z} \]
        3. *-lowering-*.f64N/A

          \[\leadsto \color{blue}{\frac{\mathsf{neg}\left(x\right)}{y} \cdot z} \]
        4. frac-2negN/A

          \[\leadsto \color{blue}{\frac{\mathsf{neg}\left(\left(\mathsf{neg}\left(x\right)\right)\right)}{\mathsf{neg}\left(y\right)}} \cdot z \]
        5. remove-double-negN/A

          \[\leadsto \frac{\color{blue}{x}}{\mathsf{neg}\left(y\right)} \cdot z \]
        6. /-lowering-/.f64N/A

          \[\leadsto \color{blue}{\frac{x}{\mathsf{neg}\left(y\right)}} \cdot z \]
        7. neg-lowering-neg.f6448.0

          \[\leadsto \frac{x}{\color{blue}{-y}} \cdot z \]
      7. Applied egg-rr48.0%

        \[\leadsto \color{blue}{\frac{x}{-y} \cdot z} \]

      if -5.00000000000000007e-120 < (/.f64 (*.f64 x (-.f64 y z)) y) < 1.9999999999999999e211

      1. Initial program 95.7%

        \[\frac{x \cdot \left(y - z\right)}{y} \]
      2. Add Preprocessing
      3. Taylor expanded in y around inf

        \[\leadsto \color{blue}{x} \]
      4. Step-by-step derivation
        1. Simplified70.2%

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

        if 1.9999999999999999e211 < (/.f64 (*.f64 x (-.f64 y z)) y)

        1. Initial program 54.5%

          \[\frac{x \cdot \left(y - z\right)}{y} \]
        2. Add Preprocessing
        3. Taylor expanded in y around inf

          \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
        4. Step-by-step derivation
          1. *-lowering-*.f646.3

            \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
        5. Simplified6.3%

          \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
        6. Step-by-step derivation
          1. associate-*l/N/A

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

            \[\leadsto \color{blue}{\frac{x}{y} \cdot y} \]
          3. /-lowering-/.f6449.4

            \[\leadsto \color{blue}{\frac{x}{y}} \cdot y \]
        7. Applied egg-rr49.4%

          \[\leadsto \color{blue}{\frac{x}{y} \cdot y} \]
      5. Recombined 3 regimes into one program.
      6. Final simplification57.8%

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

      Alternative 4: 52.6% accurate, 0.5× speedup?

      \[\begin{array}{l} x\_m = \left|x\right| \\ x\_s = \mathsf{copysign}\left(1, x\right) \\ x\_s \cdot \begin{array}{l} \mathbf{if}\;\frac{x\_m \cdot \left(y - z\right)}{y} \leq 2 \cdot 10^{+211}:\\ \;\;\;\;x\_m\\ \mathbf{else}:\\ \;\;\;\;y \cdot \frac{x\_m}{y}\\ \end{array} \end{array} \]
      x\_m = (fabs.f64 x)
      x\_s = (copysign.f64 #s(literal 1 binary64) x)
      (FPCore (x_s x_m y z)
       :precision binary64
       (* x_s (if (<= (/ (* x_m (- y z)) y) 2e+211) x_m (* y (/ x_m y)))))
      x\_m = fabs(x);
      x\_s = copysign(1.0, x);
      double code(double x_s, double x_m, double y, double z) {
      	double tmp;
      	if (((x_m * (y - z)) / y) <= 2e+211) {
      		tmp = x_m;
      	} else {
      		tmp = y * (x_m / y);
      	}
      	return x_s * tmp;
      }
      
      x\_m = abs(x)
      x\_s = copysign(1.0d0, x)
      real(8) function code(x_s, x_m, y, z)
          real(8), intent (in) :: x_s
          real(8), intent (in) :: x_m
          real(8), intent (in) :: y
          real(8), intent (in) :: z
          real(8) :: tmp
          if (((x_m * (y - z)) / y) <= 2d+211) then
              tmp = x_m
          else
              tmp = y * (x_m / y)
          end if
          code = x_s * tmp
      end function
      
      x\_m = Math.abs(x);
      x\_s = Math.copySign(1.0, x);
      public static double code(double x_s, double x_m, double y, double z) {
      	double tmp;
      	if (((x_m * (y - z)) / y) <= 2e+211) {
      		tmp = x_m;
      	} else {
      		tmp = y * (x_m / y);
      	}
      	return x_s * tmp;
      }
      
      x\_m = math.fabs(x)
      x\_s = math.copysign(1.0, x)
      def code(x_s, x_m, y, z):
      	tmp = 0
      	if ((x_m * (y - z)) / y) <= 2e+211:
      		tmp = x_m
      	else:
      		tmp = y * (x_m / y)
      	return x_s * tmp
      
      x\_m = abs(x)
      x\_s = copysign(1.0, x)
      function code(x_s, x_m, y, z)
      	tmp = 0.0
      	if (Float64(Float64(x_m * Float64(y - z)) / y) <= 2e+211)
      		tmp = x_m;
      	else
      		tmp = Float64(y * Float64(x_m / y));
      	end
      	return Float64(x_s * tmp)
      end
      
      x\_m = abs(x);
      x\_s = sign(x) * abs(1.0);
      function tmp_2 = code(x_s, x_m, y, z)
      	tmp = 0.0;
      	if (((x_m * (y - z)) / y) <= 2e+211)
      		tmp = x_m;
      	else
      		tmp = y * (x_m / y);
      	end
      	tmp_2 = x_s * tmp;
      end
      
      x\_m = N[Abs[x], $MachinePrecision]
      x\_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
      code[x$95$s_, x$95$m_, y_, z_] := N[(x$95$s * If[LessEqual[N[(N[(x$95$m * N[(y - z), $MachinePrecision]), $MachinePrecision] / y), $MachinePrecision], 2e+211], x$95$m, N[(y * N[(x$95$m / y), $MachinePrecision]), $MachinePrecision]]), $MachinePrecision]
      
      \begin{array}{l}
      x\_m = \left|x\right|
      \\
      x\_s = \mathsf{copysign}\left(1, x\right)
      
      \\
      x\_s \cdot \begin{array}{l}
      \mathbf{if}\;\frac{x\_m \cdot \left(y - z\right)}{y} \leq 2 \cdot 10^{+211}:\\
      \;\;\;\;x\_m\\
      
      \mathbf{else}:\\
      \;\;\;\;y \cdot \frac{x\_m}{y}\\
      
      
      \end{array}
      \end{array}
      
      Derivation
      1. Split input into 2 regimes
      2. if (/.f64 (*.f64 x (-.f64 y z)) y) < 1.9999999999999999e211

        1. Initial program 90.1%

          \[\frac{x \cdot \left(y - z\right)}{y} \]
        2. Add Preprocessing
        3. Taylor expanded in y around inf

          \[\leadsto \color{blue}{x} \]
        4. Step-by-step derivation
          1. Simplified59.8%

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

          if 1.9999999999999999e211 < (/.f64 (*.f64 x (-.f64 y z)) y)

          1. Initial program 54.5%

            \[\frac{x \cdot \left(y - z\right)}{y} \]
          2. Add Preprocessing
          3. Taylor expanded in y around inf

            \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
          4. Step-by-step derivation
            1. *-lowering-*.f646.3

              \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
          5. Simplified6.3%

            \[\leadsto \frac{\color{blue}{x \cdot y}}{y} \]
          6. Step-by-step derivation
            1. associate-*l/N/A

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

              \[\leadsto \color{blue}{\frac{x}{y} \cdot y} \]
            3. /-lowering-/.f6449.4

              \[\leadsto \color{blue}{\frac{x}{y}} \cdot y \]
          7. Applied egg-rr49.4%

            \[\leadsto \color{blue}{\frac{x}{y} \cdot y} \]
        5. Recombined 2 regimes into one program.
        6. Final simplification58.0%

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

        Alternative 5: 72.7% accurate, 0.6× speedup?

        \[\begin{array}{l} x\_m = \left|x\right| \\ x\_s = \mathsf{copysign}\left(1, x\right) \\ x\_s \cdot \begin{array}{l} \mathbf{if}\;y \leq -8 \cdot 10^{-73}:\\ \;\;\;\;x\_m\\ \mathbf{elif}\;y \leq 2.05 \cdot 10^{-6}:\\ \;\;\;\;\frac{x\_m \cdot z}{-y}\\ \mathbf{else}:\\ \;\;\;\;x\_m\\ \end{array} \end{array} \]
        x\_m = (fabs.f64 x)
        x\_s = (copysign.f64 #s(literal 1 binary64) x)
        (FPCore (x_s x_m y z)
         :precision binary64
         (* x_s (if (<= y -8e-73) x_m (if (<= y 2.05e-6) (/ (* x_m z) (- y)) x_m))))
        x\_m = fabs(x);
        x\_s = copysign(1.0, x);
        double code(double x_s, double x_m, double y, double z) {
        	double tmp;
        	if (y <= -8e-73) {
        		tmp = x_m;
        	} else if (y <= 2.05e-6) {
        		tmp = (x_m * z) / -y;
        	} else {
        		tmp = x_m;
        	}
        	return x_s * tmp;
        }
        
        x\_m = abs(x)
        x\_s = copysign(1.0d0, x)
        real(8) function code(x_s, x_m, y, z)
            real(8), intent (in) :: x_s
            real(8), intent (in) :: x_m
            real(8), intent (in) :: y
            real(8), intent (in) :: z
            real(8) :: tmp
            if (y <= (-8d-73)) then
                tmp = x_m
            else if (y <= 2.05d-6) then
                tmp = (x_m * z) / -y
            else
                tmp = x_m
            end if
            code = x_s * tmp
        end function
        
        x\_m = Math.abs(x);
        x\_s = Math.copySign(1.0, x);
        public static double code(double x_s, double x_m, double y, double z) {
        	double tmp;
        	if (y <= -8e-73) {
        		tmp = x_m;
        	} else if (y <= 2.05e-6) {
        		tmp = (x_m * z) / -y;
        	} else {
        		tmp = x_m;
        	}
        	return x_s * tmp;
        }
        
        x\_m = math.fabs(x)
        x\_s = math.copysign(1.0, x)
        def code(x_s, x_m, y, z):
        	tmp = 0
        	if y <= -8e-73:
        		tmp = x_m
        	elif y <= 2.05e-6:
        		tmp = (x_m * z) / -y
        	else:
        		tmp = x_m
        	return x_s * tmp
        
        x\_m = abs(x)
        x\_s = copysign(1.0, x)
        function code(x_s, x_m, y, z)
        	tmp = 0.0
        	if (y <= -8e-73)
        		tmp = x_m;
        	elseif (y <= 2.05e-6)
        		tmp = Float64(Float64(x_m * z) / Float64(-y));
        	else
        		tmp = x_m;
        	end
        	return Float64(x_s * tmp)
        end
        
        x\_m = abs(x);
        x\_s = sign(x) * abs(1.0);
        function tmp_2 = code(x_s, x_m, y, z)
        	tmp = 0.0;
        	if (y <= -8e-73)
        		tmp = x_m;
        	elseif (y <= 2.05e-6)
        		tmp = (x_m * z) / -y;
        	else
        		tmp = x_m;
        	end
        	tmp_2 = x_s * tmp;
        end
        
        x\_m = N[Abs[x], $MachinePrecision]
        x\_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
        code[x$95$s_, x$95$m_, y_, z_] := N[(x$95$s * If[LessEqual[y, -8e-73], x$95$m, If[LessEqual[y, 2.05e-6], N[(N[(x$95$m * z), $MachinePrecision] / (-y)), $MachinePrecision], x$95$m]]), $MachinePrecision]
        
        \begin{array}{l}
        x\_m = \left|x\right|
        \\
        x\_s = \mathsf{copysign}\left(1, x\right)
        
        \\
        x\_s \cdot \begin{array}{l}
        \mathbf{if}\;y \leq -8 \cdot 10^{-73}:\\
        \;\;\;\;x\_m\\
        
        \mathbf{elif}\;y \leq 2.05 \cdot 10^{-6}:\\
        \;\;\;\;\frac{x\_m \cdot z}{-y}\\
        
        \mathbf{else}:\\
        \;\;\;\;x\_m\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 2 regimes
        2. if y < -7.99999999999999998e-73 or 2.0499999999999999e-6 < y

          1. Initial program 75.9%

            \[\frac{x \cdot \left(y - z\right)}{y} \]
          2. Add Preprocessing
          3. Taylor expanded in y around inf

            \[\leadsto \color{blue}{x} \]
          4. Step-by-step derivation
            1. Simplified80.8%

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

            if -7.99999999999999998e-73 < y < 2.0499999999999999e-6

            1. Initial program 95.5%

              \[\frac{x \cdot \left(y - z\right)}{y} \]
            2. Add Preprocessing
            3. Taylor expanded in y around 0

              \[\leadsto \color{blue}{-1 \cdot \frac{x \cdot z}{y}} \]
            4. Step-by-step derivation
              1. associate-*r/N/A

                \[\leadsto \color{blue}{\frac{-1 \cdot \left(x \cdot z\right)}{y}} \]
              2. /-lowering-/.f64N/A

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

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

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

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

                \[\leadsto \frac{z \cdot \color{blue}{\left(\mathsf{neg}\left(x\right)\right)}}{y} \]
              7. neg-lowering-neg.f6478.1

                \[\leadsto \frac{z \cdot \color{blue}{\left(-x\right)}}{y} \]
            5. Simplified78.1%

              \[\leadsto \color{blue}{\frac{z \cdot \left(-x\right)}{y}} \]
          5. Recombined 2 regimes into one program.
          6. Final simplification79.7%

            \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq -8 \cdot 10^{-73}:\\ \;\;\;\;x\\ \mathbf{elif}\;y \leq 2.05 \cdot 10^{-6}:\\ \;\;\;\;\frac{x \cdot z}{-y}\\ \mathbf{else}:\\ \;\;\;\;x\\ \end{array} \]
          7. Add Preprocessing

          Alternative 6: 95.9% accurate, 1.0× speedup?

          \[\begin{array}{l} x\_m = \left|x\right| \\ x\_s = \mathsf{copysign}\left(1, x\right) \\ x\_s \cdot \left(x\_m \cdot \left(1 - \frac{z}{y}\right)\right) \end{array} \]
          x\_m = (fabs.f64 x)
          x\_s = (copysign.f64 #s(literal 1 binary64) x)
          (FPCore (x_s x_m y z) :precision binary64 (* x_s (* x_m (- 1.0 (/ z y)))))
          x\_m = fabs(x);
          x\_s = copysign(1.0, x);
          double code(double x_s, double x_m, double y, double z) {
          	return x_s * (x_m * (1.0 - (z / y)));
          }
          
          x\_m = abs(x)
          x\_s = copysign(1.0d0, x)
          real(8) function code(x_s, x_m, y, z)
              real(8), intent (in) :: x_s
              real(8), intent (in) :: x_m
              real(8), intent (in) :: y
              real(8), intent (in) :: z
              code = x_s * (x_m * (1.0d0 - (z / y)))
          end function
          
          x\_m = Math.abs(x);
          x\_s = Math.copySign(1.0, x);
          public static double code(double x_s, double x_m, double y, double z) {
          	return x_s * (x_m * (1.0 - (z / y)));
          }
          
          x\_m = math.fabs(x)
          x\_s = math.copysign(1.0, x)
          def code(x_s, x_m, y, z):
          	return x_s * (x_m * (1.0 - (z / y)))
          
          x\_m = abs(x)
          x\_s = copysign(1.0, x)
          function code(x_s, x_m, y, z)
          	return Float64(x_s * Float64(x_m * Float64(1.0 - Float64(z / y))))
          end
          
          x\_m = abs(x);
          x\_s = sign(x) * abs(1.0);
          function tmp = code(x_s, x_m, y, z)
          	tmp = x_s * (x_m * (1.0 - (z / y)));
          end
          
          x\_m = N[Abs[x], $MachinePrecision]
          x\_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
          code[x$95$s_, x$95$m_, y_, z_] := N[(x$95$s * N[(x$95$m * N[(1.0 - N[(z / y), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
          
          \begin{array}{l}
          x\_m = \left|x\right|
          \\
          x\_s = \mathsf{copysign}\left(1, x\right)
          
          \\
          x\_s \cdot \left(x\_m \cdot \left(1 - \frac{z}{y}\right)\right)
          \end{array}
          
          Derivation
          1. Initial program 83.9%

            \[\frac{x \cdot \left(y - z\right)}{y} \]
          2. Add Preprocessing
          3. Step-by-step derivation
            1. associate-/l*N/A

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

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

              \[\leadsto \color{blue}{\frac{y - z}{y} \cdot x} \]
            4. div-subN/A

              \[\leadsto \color{blue}{\left(\frac{y}{y} - \frac{z}{y}\right)} \cdot x \]
            5. *-inversesN/A

              \[\leadsto \left(\color{blue}{1} - \frac{z}{y}\right) \cdot x \]
            6. --lowering--.f64N/A

              \[\leadsto \color{blue}{\left(1 - \frac{z}{y}\right)} \cdot x \]
            7. /-lowering-/.f6497.3

              \[\leadsto \left(1 - \color{blue}{\frac{z}{y}}\right) \cdot x \]
          4. Applied egg-rr97.3%

            \[\leadsto \color{blue}{\left(1 - \frac{z}{y}\right) \cdot x} \]
          5. Final simplification97.3%

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

          Alternative 7: 49.6% accurate, 20.0× speedup?

          \[\begin{array}{l} x\_m = \left|x\right| \\ x\_s = \mathsf{copysign}\left(1, x\right) \\ x\_s \cdot x\_m \end{array} \]
          x\_m = (fabs.f64 x)
          x\_s = (copysign.f64 #s(literal 1 binary64) x)
          (FPCore (x_s x_m y z) :precision binary64 (* x_s x_m))
          x\_m = fabs(x);
          x\_s = copysign(1.0, x);
          double code(double x_s, double x_m, double y, double z) {
          	return x_s * x_m;
          }
          
          x\_m = abs(x)
          x\_s = copysign(1.0d0, x)
          real(8) function code(x_s, x_m, y, z)
              real(8), intent (in) :: x_s
              real(8), intent (in) :: x_m
              real(8), intent (in) :: y
              real(8), intent (in) :: z
              code = x_s * x_m
          end function
          
          x\_m = Math.abs(x);
          x\_s = Math.copySign(1.0, x);
          public static double code(double x_s, double x_m, double y, double z) {
          	return x_s * x_m;
          }
          
          x\_m = math.fabs(x)
          x\_s = math.copysign(1.0, x)
          def code(x_s, x_m, y, z):
          	return x_s * x_m
          
          x\_m = abs(x)
          x\_s = copysign(1.0, x)
          function code(x_s, x_m, y, z)
          	return Float64(x_s * x_m)
          end
          
          x\_m = abs(x);
          x\_s = sign(x) * abs(1.0);
          function tmp = code(x_s, x_m, y, z)
          	tmp = x_s * x_m;
          end
          
          x\_m = N[Abs[x], $MachinePrecision]
          x\_s = N[With[{TMP1 = Abs[1.0], TMP2 = Sign[x]}, TMP1 * If[TMP2 == 0, 1, TMP2]], $MachinePrecision]
          code[x$95$s_, x$95$m_, y_, z_] := N[(x$95$s * x$95$m), $MachinePrecision]
          
          \begin{array}{l}
          x\_m = \left|x\right|
          \\
          x\_s = \mathsf{copysign}\left(1, x\right)
          
          \\
          x\_s \cdot x\_m
          \end{array}
          
          Derivation
          1. Initial program 83.9%

            \[\frac{x \cdot \left(y - z\right)}{y} \]
          2. Add Preprocessing
          3. Taylor expanded in y around inf

            \[\leadsto \color{blue}{x} \]
          4. Step-by-step derivation
            1. Simplified57.3%

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

            Developer Target 1: 96.3% accurate, 0.5× speedup?

            \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;z < -2.060202331921739 \cdot 10^{+104}:\\ \;\;\;\;x - \frac{z \cdot x}{y}\\ \mathbf{elif}\;z < 1.6939766013828526 \cdot 10^{+213}:\\ \;\;\;\;\frac{x}{\frac{y}{y - z}}\\ \mathbf{else}:\\ \;\;\;\;\left(y - z\right) \cdot \frac{x}{y}\\ \end{array} \end{array} \]
            (FPCore (x y z)
             :precision binary64
             (if (< z -2.060202331921739e+104)
               (- x (/ (* z x) y))
               (if (< z 1.6939766013828526e+213) (/ x (/ y (- y z))) (* (- y z) (/ x y)))))
            double code(double x, double y, double z) {
            	double tmp;
            	if (z < -2.060202331921739e+104) {
            		tmp = x - ((z * x) / y);
            	} else if (z < 1.6939766013828526e+213) {
            		tmp = x / (y / (y - z));
            	} else {
            		tmp = (y - z) * (x / y);
            	}
            	return tmp;
            }
            
            real(8) function code(x, y, z)
                real(8), intent (in) :: x
                real(8), intent (in) :: y
                real(8), intent (in) :: z
                real(8) :: tmp
                if (z < (-2.060202331921739d+104)) then
                    tmp = x - ((z * x) / y)
                else if (z < 1.6939766013828526d+213) then
                    tmp = x / (y / (y - z))
                else
                    tmp = (y - z) * (x / y)
                end if
                code = tmp
            end function
            
            public static double code(double x, double y, double z) {
            	double tmp;
            	if (z < -2.060202331921739e+104) {
            		tmp = x - ((z * x) / y);
            	} else if (z < 1.6939766013828526e+213) {
            		tmp = x / (y / (y - z));
            	} else {
            		tmp = (y - z) * (x / y);
            	}
            	return tmp;
            }
            
            def code(x, y, z):
            	tmp = 0
            	if z < -2.060202331921739e+104:
            		tmp = x - ((z * x) / y)
            	elif z < 1.6939766013828526e+213:
            		tmp = x / (y / (y - z))
            	else:
            		tmp = (y - z) * (x / y)
            	return tmp
            
            function code(x, y, z)
            	tmp = 0.0
            	if (z < -2.060202331921739e+104)
            		tmp = Float64(x - Float64(Float64(z * x) / y));
            	elseif (z < 1.6939766013828526e+213)
            		tmp = Float64(x / Float64(y / Float64(y - z)));
            	else
            		tmp = Float64(Float64(y - z) * Float64(x / y));
            	end
            	return tmp
            end
            
            function tmp_2 = code(x, y, z)
            	tmp = 0.0;
            	if (z < -2.060202331921739e+104)
            		tmp = x - ((z * x) / y);
            	elseif (z < 1.6939766013828526e+213)
            		tmp = x / (y / (y - z));
            	else
            		tmp = (y - z) * (x / y);
            	end
            	tmp_2 = tmp;
            end
            
            code[x_, y_, z_] := If[Less[z, -2.060202331921739e+104], N[(x - N[(N[(z * x), $MachinePrecision] / y), $MachinePrecision]), $MachinePrecision], If[Less[z, 1.6939766013828526e+213], N[(x / N[(y / N[(y - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(y - z), $MachinePrecision] * N[(x / y), $MachinePrecision]), $MachinePrecision]]]
            
            \begin{array}{l}
            
            \\
            \begin{array}{l}
            \mathbf{if}\;z < -2.060202331921739 \cdot 10^{+104}:\\
            \;\;\;\;x - \frac{z \cdot x}{y}\\
            
            \mathbf{elif}\;z < 1.6939766013828526 \cdot 10^{+213}:\\
            \;\;\;\;\frac{x}{\frac{y}{y - z}}\\
            
            \mathbf{else}:\\
            \;\;\;\;\left(y - z\right) \cdot \frac{x}{y}\\
            
            
            \end{array}
            \end{array}
            

            Reproduce

            ?
            herbie shell --seed 2024204 
            (FPCore (x y z)
              :name "Diagrams.Backend.Cairo.Internal:setTexture from diagrams-cairo-1.3.0.3"
              :precision binary64
            
              :alt
              (! :herbie-platform default (if (< z -206020233192173900000000000000000000000000000000000000000000000000000000000000000000000000000000000000000) (- x (/ (* z x) y)) (if (< z 1693976601382852600000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000) (/ x (/ y (- y z))) (* (- y z) (/ x y)))))
            
              (/ (* x (- y z)) y))