fabs fraction 1

Percentage Accurate: 91.3% → 99.6%

Time: 7.9s

Alternatives: 13

Speedup: 1.0×

• 21.0% of points produce a very large (infinite) output. You may want to add a precondition.

Specification

Math

\[\begin{array}{l} \\ \left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \end{array} \]

FPCore

(FPCore (x y z) :precision binary64 (fabs (- (/ (+ x 4.0) y) (* (/ x y) z))))

C

double code(double x, double y, double z) {
	return fabs((((x + 4.0) / y) - ((x / y) * z)));
}

Fortran

real(8) function code(x, y, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = abs((((x + 4.0d0) / y) - ((x / y) * z)))
end function

Java

public static double code(double x, double y, double z) {
	return Math.abs((((x + 4.0) / y) - ((x / y) * z)));
}

Python

def code(x, y, z):
	return math.fabs((((x + 4.0) / y) - ((x / y) * z)))

Julia

function code(x, y, z)
	return abs(Float64(Float64(Float64(x + 4.0) / y) - Float64(Float64(x / y) * z)))
end

MATLAB

function tmp = code(x, y, z)
	tmp = abs((((x + 4.0) / y) - ((x / y) * z)));
end

Wolfram

code[x_, y_, z_] := N[Abs[N[(N[(N[(x + 4.0), $MachinePrecision] / y), $MachinePrecision] - N[(N[(x / y), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]

Initial Program: 91.3% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \end{array} \]

FPCore

(FPCore (x y z) :precision binary64 (fabs (- (/ (+ x 4.0) y) (* (/ x y) z))))

C

double code(double x, double y, double z) {
	return fabs((((x + 4.0) / y) - ((x / y) * z)));
}

Fortran

real(8) function code(x, y, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = abs((((x + 4.0d0) / y) - ((x / y) * z)))
end function

Java

public static double code(double x, double y, double z) {
	return Math.abs((((x + 4.0) / y) - ((x / y) * z)));
}

Python

def code(x, y, z):
	return math.fabs((((x + 4.0) / y) - ((x / y) * z)))

Julia

function code(x, y, z)
	return abs(Float64(Float64(Float64(x + 4.0) / y) - Float64(Float64(x / y) * z)))
end

MATLAB

function tmp = code(x, y, z)
	tmp = abs((((x + 4.0) / y) - ((x / y) * z)));
end

Wolfram

code[x_, y_, z_] := N[Abs[N[(N[(N[(x + 4.0), $MachinePrecision] / y), $MachinePrecision] - N[(N[(x / y), $MachinePrecision] * z), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]

Alternative 1: 99.6% accurate, 0.5× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} \mathbf{if}\;y_m \leq 8 \cdot 10^{+80}:\\ \;\;\;\;\left|\frac{\left(4 + x\right) - x \cdot z}{y_m}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\mathsf{fma}\left(x, \frac{z}{y_m}, \frac{-4 - x}{y_m}\right)\right|\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (if (<= y_m 8e+80)
   (fabs (/ (- (+ 4.0 x) (* x z)) y_m))
   (fabs (fma x (/ z y_m) (/ (- -4.0 x) y_m)))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double tmp;
	if (y_m <= 8e+80) {
		tmp = fabs((((4.0 + x) - (x * z)) / y_m));
	} else {
		tmp = fabs(fma(x, (z / y_m), ((-4.0 - x) / y_m)));
	}
	return tmp;
}

Julia

y_m = abs(y)
function code(x, y_m, z)
	tmp = 0.0
	if (y_m <= 8e+80)
		tmp = abs(Float64(Float64(Float64(4.0 + x) - Float64(x * z)) / y_m));
	else
		tmp = abs(fma(x, Float64(z / y_m), Float64(Float64(-4.0 - x) / y_m)));
	end
	return tmp
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := If[LessEqual[y$95$m, 8e+80], N[Abs[N[(N[(N[(4.0 + x), $MachinePrecision] - N[(x * z), $MachinePrecision]), $MachinePrecision] / y$95$m), $MachinePrecision]], $MachinePrecision], N[Abs[N[(x * N[(z / y$95$m), $MachinePrecision] + N[(N[(-4.0 - x), $MachinePrecision] / y$95$m), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if y < 8e80

   1. Initial program 92.3%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 98.1%

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

   if 8e80 < y

   1. Initial program 96.3%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 99.9%

      \[\leadsto \color{blue}{\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|} \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq 8 \cdot 10^{+80}:\\ \;\;\;\;\left|\frac{\left(4 + x\right) - x \cdot z}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|\\ \end{array} \]

Alternative 2: 69.0% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} t_0 := \left|\frac{x}{y_m}\right|\\ t_1 := \left|x \cdot \frac{z}{y_m}\right|\\ \mathbf{if}\;x \leq -1.85 \cdot 10^{+99}:\\ \;\;\;\;t_0\\ \mathbf{elif}\;x \leq -4.8 \cdot 10^{-24}:\\ \;\;\;\;t_1\\ \mathbf{elif}\;x \leq 1.86 \cdot 10^{-16}:\\ \;\;\;\;\left|\frac{4}{y_m}\right|\\ \mathbf{elif}\;x \leq 1.7 \cdot 10^{+164}:\\ \;\;\;\;t_1\\ \mathbf{else}:\\ \;\;\;\;t_0\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (let* ((t_0 (fabs (/ x y_m))) (t_1 (fabs (* x (/ z y_m)))))
   (if (<= x -1.85e+99)
     t_0
     (if (<= x -4.8e-24)
       t_1
       (if (<= x 1.86e-16) (fabs (/ 4.0 y_m)) (if (<= x 1.7e+164) t_1 t_0))))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double t_0 = fabs((x / y_m));
	double t_1 = fabs((x * (z / y_m)));
	double tmp;
	if (x <= -1.85e+99) {
		tmp = t_0;
	} else if (x <= -4.8e-24) {
		tmp = t_1;
	} else if (x <= 1.86e-16) {
		tmp = fabs((4.0 / y_m));
	} else if (x <= 1.7e+164) {
		tmp = t_1;
	} else {
		tmp = t_0;
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: t_0
    real(8) :: t_1
    real(8) :: tmp
    t_0 = abs((x / y_m))
    t_1 = abs((x * (z / y_m)))
    if (x <= (-1.85d+99)) then
        tmp = t_0
    else if (x <= (-4.8d-24)) then
        tmp = t_1
    else if (x <= 1.86d-16) then
        tmp = abs((4.0d0 / y_m))
    else if (x <= 1.7d+164) then
        tmp = t_1
    else
        tmp = t_0
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double t_0 = Math.abs((x / y_m));
	double t_1 = Math.abs((x * (z / y_m)));
	double tmp;
	if (x <= -1.85e+99) {
		tmp = t_0;
	} else if (x <= -4.8e-24) {
		tmp = t_1;
	} else if (x <= 1.86e-16) {
		tmp = Math.abs((4.0 / y_m));
	} else if (x <= 1.7e+164) {
		tmp = t_1;
	} else {
		tmp = t_0;
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	t_0 = math.fabs((x / y_m))
	t_1 = math.fabs((x * (z / y_m)))
	tmp = 0
	if x <= -1.85e+99:
		tmp = t_0
	elif x <= -4.8e-24:
		tmp = t_1
	elif x <= 1.86e-16:
		tmp = math.fabs((4.0 / y_m))
	elif x <= 1.7e+164:
		tmp = t_1
	else:
		tmp = t_0
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	t_0 = abs(Float64(x / y_m))
	t_1 = abs(Float64(x * Float64(z / y_m)))
	tmp = 0.0
	if (x <= -1.85e+99)
		tmp = t_0;
	elseif (x <= -4.8e-24)
		tmp = t_1;
	elseif (x <= 1.86e-16)
		tmp = abs(Float64(4.0 / y_m));
	elseif (x <= 1.7e+164)
		tmp = t_1;
	else
		tmp = t_0;
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	t_0 = abs((x / y_m));
	t_1 = abs((x * (z / y_m)));
	tmp = 0.0;
	if (x <= -1.85e+99)
		tmp = t_0;
	elseif (x <= -4.8e-24)
		tmp = t_1;
	elseif (x <= 1.86e-16)
		tmp = abs((4.0 / y_m));
	elseif (x <= 1.7e+164)
		tmp = t_1;
	else
		tmp = t_0;
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := Block[{t$95$0 = N[Abs[N[(x / y$95$m), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$1 = N[Abs[N[(x * N[(z / y$95$m), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[x, -1.85e+99], t$95$0, If[LessEqual[x, -4.8e-24], t$95$1, If[LessEqual[x, 1.86e-16], N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision], If[LessEqual[x, 1.7e+164], t$95$1, t$95$0]]]]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.85000000000000005e99 or 1.7000000000000001e164 < x

   1. Initial program 82.7%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 98.5%

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

   3. Taylor expanded in x around inf 98.5%

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

      1. associate-/l* 99.9%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   5. Simplified 99.9%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   6. Taylor expanded in z around 0 78.4%

      \[\leadsto \left|\color{blue}{\frac{x}{y}}\right| \]

   if -1.85000000000000005e99 < x < -4.7999999999999996e-24 or 1.8599999999999999e-16 < x < 1.7000000000000001e164

   1. Initial program 97.0%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 96.8%

      \[\leadsto \color{blue}{\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|} \]

   4. Taylor expanded in x around inf 94.6%

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

   5. Taylor expanded in z around inf 64.3%

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

   if -4.7999999999999996e-24 < x < 1.8599999999999999e-16

   1. Initial program 96.8%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in x around 0 80.2%

      \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]
3. Recombined 3 regimes into one program.

4. Final simplification 75.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -1.85 \cdot 10^{+99}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \mathbf{elif}\;x \leq -4.8 \cdot 10^{-24}:\\ \;\;\;\;\left|x \cdot \frac{z}{y}\right|\\ \mathbf{elif}\;x \leq 1.86 \cdot 10^{-16}:\\ \;\;\;\;\left|\frac{4}{y}\right|\\ \mathbf{elif}\;x \leq 1.7 \cdot 10^{+164}:\\ \;\;\;\;\left|x \cdot \frac{z}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \end{array} \]

Alternative 3: 68.5% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} t_0 := \left|\frac{x}{y_m}\right|\\ t_1 := \left|z \cdot \frac{x}{y_m}\right|\\ \mathbf{if}\;x \leq -4.2 \cdot 10^{+99}:\\ \;\;\;\;t_0\\ \mathbf{elif}\;x \leq -1.06 \cdot 10^{-89}:\\ \;\;\;\;t_1\\ \mathbf{elif}\;x \leq 3.8 \cdot 10^{-12}:\\ \;\;\;\;\left|\frac{4}{y_m}\right|\\ \mathbf{elif}\;x \leq 10^{+164}:\\ \;\;\;\;t_1\\ \mathbf{else}:\\ \;\;\;\;t_0\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (let* ((t_0 (fabs (/ x y_m))) (t_1 (fabs (* z (/ x y_m)))))
   (if (<= x -4.2e+99)
     t_0
     (if (<= x -1.06e-89)
       t_1
       (if (<= x 3.8e-12) (fabs (/ 4.0 y_m)) (if (<= x 1e+164) t_1 t_0))))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double t_0 = fabs((x / y_m));
	double t_1 = fabs((z * (x / y_m)));
	double tmp;
	if (x <= -4.2e+99) {
		tmp = t_0;
	} else if (x <= -1.06e-89) {
		tmp = t_1;
	} else if (x <= 3.8e-12) {
		tmp = fabs((4.0 / y_m));
	} else if (x <= 1e+164) {
		tmp = t_1;
	} else {
		tmp = t_0;
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: t_0
    real(8) :: t_1
    real(8) :: tmp
    t_0 = abs((x / y_m))
    t_1 = abs((z * (x / y_m)))
    if (x <= (-4.2d+99)) then
        tmp = t_0
    else if (x <= (-1.06d-89)) then
        tmp = t_1
    else if (x <= 3.8d-12) then
        tmp = abs((4.0d0 / y_m))
    else if (x <= 1d+164) then
        tmp = t_1
    else
        tmp = t_0
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double t_0 = Math.abs((x / y_m));
	double t_1 = Math.abs((z * (x / y_m)));
	double tmp;
	if (x <= -4.2e+99) {
		tmp = t_0;
	} else if (x <= -1.06e-89) {
		tmp = t_1;
	} else if (x <= 3.8e-12) {
		tmp = Math.abs((4.0 / y_m));
	} else if (x <= 1e+164) {
		tmp = t_1;
	} else {
		tmp = t_0;
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	t_0 = math.fabs((x / y_m))
	t_1 = math.fabs((z * (x / y_m)))
	tmp = 0
	if x <= -4.2e+99:
		tmp = t_0
	elif x <= -1.06e-89:
		tmp = t_1
	elif x <= 3.8e-12:
		tmp = math.fabs((4.0 / y_m))
	elif x <= 1e+164:
		tmp = t_1
	else:
		tmp = t_0
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	t_0 = abs(Float64(x / y_m))
	t_1 = abs(Float64(z * Float64(x / y_m)))
	tmp = 0.0
	if (x <= -4.2e+99)
		tmp = t_0;
	elseif (x <= -1.06e-89)
		tmp = t_1;
	elseif (x <= 3.8e-12)
		tmp = abs(Float64(4.0 / y_m));
	elseif (x <= 1e+164)
		tmp = t_1;
	else
		tmp = t_0;
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	t_0 = abs((x / y_m));
	t_1 = abs((z * (x / y_m)));
	tmp = 0.0;
	if (x <= -4.2e+99)
		tmp = t_0;
	elseif (x <= -1.06e-89)
		tmp = t_1;
	elseif (x <= 3.8e-12)
		tmp = abs((4.0 / y_m));
	elseif (x <= 1e+164)
		tmp = t_1;
	else
		tmp = t_0;
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := Block[{t$95$0 = N[Abs[N[(x / y$95$m), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$1 = N[Abs[N[(z * N[(x / y$95$m), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[x, -4.2e+99], t$95$0, If[LessEqual[x, -1.06e-89], t$95$1, If[LessEqual[x, 3.8e-12], N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision], If[LessEqual[x, 1e+164], t$95$1, t$95$0]]]]]]

Derivation

1. Split input into 3 regimes

2. if x < -4.2000000000000002e99 or 1e164 < x

   1. Initial program 82.7%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 98.5%

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

   3. Taylor expanded in x around inf 98.5%

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

      1. associate-/l* 99.9%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   5. Simplified 99.9%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   6. Taylor expanded in z around 0 78.4%

      \[\leadsto \left|\color{blue}{\frac{x}{y}}\right| \]

   if -4.2000000000000002e99 < x < -1.0600000000000001e-89 or 3.79999999999999996e-12 < x < 1e164

   1. Initial program 97.4%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 93.9%

      \[\leadsto \color{blue}{\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|} \]

   4. Taylor expanded in x around inf 84.4%

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

   5. Taylor expanded in z around inf 54.1%

      \[\leadsto \left|\color{blue}{\frac{x \cdot z}{y}}\right| \]
   6. Step-by-step derivation

      1. associate-/l* 58.8%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{z}}}\right| \]

      2. associate-/r/ 62.2%

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

   7. Simplified 62.2%

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

   if -1.0600000000000001e-89 < x < 3.79999999999999996e-12

   1. Initial program 96.5%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in x around 0 84.0%

      \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]
3. Recombined 3 regimes into one program.

4. Final simplification 75.5%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -4.2 \cdot 10^{+99}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \mathbf{elif}\;x \leq -1.06 \cdot 10^{-89}:\\ \;\;\;\;\left|z \cdot \frac{x}{y}\right|\\ \mathbf{elif}\;x \leq 3.8 \cdot 10^{-12}:\\ \;\;\;\;\left|\frac{4}{y}\right|\\ \mathbf{elif}\;x \leq 10^{+164}:\\ \;\;\;\;\left|z \cdot \frac{x}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \end{array} \]

Alternative 4: 67.8% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} t_0 := \left|\frac{x}{y_m}\right|\\ \mathbf{if}\;x \leq -5.4 \cdot 10^{+103}:\\ \;\;\;\;t_0\\ \mathbf{elif}\;x \leq -1.06 \cdot 10^{-89}:\\ \;\;\;\;\left|z \cdot \frac{x}{y_m}\right|\\ \mathbf{elif}\;x \leq 4.3 \cdot 10^{-13}:\\ \;\;\;\;\left|\frac{4}{y_m}\right|\\ \mathbf{elif}\;x \leq 3.4 \cdot 10^{+164}:\\ \;\;\;\;\left|\frac{x}{\frac{y_m}{z}}\right|\\ \mathbf{else}:\\ \;\;\;\;t_0\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (let* ((t_0 (fabs (/ x y_m))))
   (if (<= x -5.4e+103)
     t_0
     (if (<= x -1.06e-89)
       (fabs (* z (/ x y_m)))
       (if (<= x 4.3e-13)
         (fabs (/ 4.0 y_m))
         (if (<= x 3.4e+164) (fabs (/ x (/ y_m z))) t_0))))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double t_0 = fabs((x / y_m));
	double tmp;
	if (x <= -5.4e+103) {
		tmp = t_0;
	} else if (x <= -1.06e-89) {
		tmp = fabs((z * (x / y_m)));
	} else if (x <= 4.3e-13) {
		tmp = fabs((4.0 / y_m));
	} else if (x <= 3.4e+164) {
		tmp = fabs((x / (y_m / z)));
	} else {
		tmp = t_0;
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: t_0
    real(8) :: tmp
    t_0 = abs((x / y_m))
    if (x <= (-5.4d+103)) then
        tmp = t_0
    else if (x <= (-1.06d-89)) then
        tmp = abs((z * (x / y_m)))
    else if (x <= 4.3d-13) then
        tmp = abs((4.0d0 / y_m))
    else if (x <= 3.4d+164) then
        tmp = abs((x / (y_m / z)))
    else
        tmp = t_0
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double t_0 = Math.abs((x / y_m));
	double tmp;
	if (x <= -5.4e+103) {
		tmp = t_0;
	} else if (x <= -1.06e-89) {
		tmp = Math.abs((z * (x / y_m)));
	} else if (x <= 4.3e-13) {
		tmp = Math.abs((4.0 / y_m));
	} else if (x <= 3.4e+164) {
		tmp = Math.abs((x / (y_m / z)));
	} else {
		tmp = t_0;
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	t_0 = math.fabs((x / y_m))
	tmp = 0
	if x <= -5.4e+103:
		tmp = t_0
	elif x <= -1.06e-89:
		tmp = math.fabs((z * (x / y_m)))
	elif x <= 4.3e-13:
		tmp = math.fabs((4.0 / y_m))
	elif x <= 3.4e+164:
		tmp = math.fabs((x / (y_m / z)))
	else:
		tmp = t_0
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	t_0 = abs(Float64(x / y_m))
	tmp = 0.0
	if (x <= -5.4e+103)
		tmp = t_0;
	elseif (x <= -1.06e-89)
		tmp = abs(Float64(z * Float64(x / y_m)));
	elseif (x <= 4.3e-13)
		tmp = abs(Float64(4.0 / y_m));
	elseif (x <= 3.4e+164)
		tmp = abs(Float64(x / Float64(y_m / z)));
	else
		tmp = t_0;
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	t_0 = abs((x / y_m));
	tmp = 0.0;
	if (x <= -5.4e+103)
		tmp = t_0;
	elseif (x <= -1.06e-89)
		tmp = abs((z * (x / y_m)));
	elseif (x <= 4.3e-13)
		tmp = abs((4.0 / y_m));
	elseif (x <= 3.4e+164)
		tmp = abs((x / (y_m / z)));
	else
		tmp = t_0;
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := Block[{t$95$0 = N[Abs[N[(x / y$95$m), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[x, -5.4e+103], t$95$0, If[LessEqual[x, -1.06e-89], N[Abs[N[(z * N[(x / y$95$m), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], If[LessEqual[x, 4.3e-13], N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision], If[LessEqual[x, 3.4e+164], N[Abs[N[(x / N[(y$95$m / z), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], t$95$0]]]]]

Derivation

1. Split input into 4 regimes

2. if x < -5.39999999999999985e103 or 3.4000000000000001e164 < x

   1. Initial program 82.7%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 98.5%

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

   3. Taylor expanded in x around inf 98.5%

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

      1. associate-/l* 99.9%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   5. Simplified 99.9%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   6. Taylor expanded in z around 0 78.4%

      \[\leadsto \left|\color{blue}{\frac{x}{y}}\right| \]

   if -5.39999999999999985e103 < x < -1.0600000000000001e-89

   1. Initial program 95.7%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 89.8%

      \[\leadsto \color{blue}{\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|} \]

   4. Taylor expanded in x around inf 75.8%

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

   5. Taylor expanded in z around inf 58.9%

      \[\leadsto \left|\color{blue}{\frac{x \cdot z}{y}}\right| \]
   6. Step-by-step derivation

      1. associate-/l* 58.9%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{z}}}\right| \]

      2. associate-/r/ 64.7%

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

   7. Simplified 64.7%

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

   if -1.0600000000000001e-89 < x < 4.2999999999999999e-13

   1. Initial program 96.5%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in x around 0 84.0%

      \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]

   if 4.2999999999999999e-13 < x < 3.4000000000000001e164

   1. Initial program 99.9%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in z around inf 47.4%

      \[\leadsto \left|\color{blue}{-1 \cdot \frac{x \cdot z}{y}}\right| \]
   3. Step-by-step derivation

      1. mul-1-neg 47.4%

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

      2. associate-*l/ 58.6%

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

      3. distribute-rgt-neg-out 58.6%

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

   4. Simplified 58.6%

      \[\leadsto \left|\color{blue}{\frac{x}{y} \cdot \left(-z\right)}\right| \]
   5. Step-by-step derivation

      1. associate-*l/ 47.4%

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

      2. add-cube-cbrt 46.8%

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

      3. times-frac 57.7%

         \[\leadsto \left|\color{blue}{\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{-z}{\sqrt[3]{y}}}\right| \]

      4. add-sqr-sqrt 30.1%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\color{blue}{\sqrt{-z} \cdot \sqrt{-z}}}{\sqrt[3]{y}}\right| \]

      5. sqrt-unprod 41.2%

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

      6. sqr-neg 41.2%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\sqrt{\color{blue}{z \cdot z}}}{\sqrt[3]{y}}\right| \]

      7. sqrt-unprod 27.5%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\color{blue}{\sqrt{z} \cdot \sqrt{z}}}{\sqrt[3]{y}}\right| \]

      8. add-sqr-sqrt 57.7%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\color{blue}{z}}{\sqrt[3]{y}}\right| \]

      9. times-frac 46.8%

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

      10. add-cube-cbrt 47.4%

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

      11. clear-num 47.3%

          \[\leadsto \left|\color{blue}{\frac{1}{\frac{y}{x \cdot z}}}\right| \]

      12. associate-/l/ 58.6%

          \[\leadsto \left|\frac{1}{\color{blue}{\frac{\frac{y}{z}}{x}}}\right| \]

      13. clear-num 58.7%

          \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{z}}}\right| \]

   6. Applied egg-rr 58.7%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{z}}}\right| \]
3. Recombined 4 regimes into one program.

4. Final simplification 75.5%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -5.4 \cdot 10^{+103}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \mathbf{elif}\;x \leq -1.06 \cdot 10^{-89}:\\ \;\;\;\;\left|z \cdot \frac{x}{y}\right|\\ \mathbf{elif}\;x \leq 4.3 \cdot 10^{-13}:\\ \;\;\;\;\left|\frac{4}{y}\right|\\ \mathbf{elif}\;x \leq 3.4 \cdot 10^{+164}:\\ \;\;\;\;\left|\frac{x}{\frac{y}{z}}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \end{array} \]

Alternative 5: 67.5% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} t_0 := \left|\frac{x}{y_m}\right|\\ \mathbf{if}\;x \leq -2.35 \cdot 10^{+101}:\\ \;\;\;\;t_0\\ \mathbf{elif}\;x \leq -1.06 \cdot 10^{-89}:\\ \;\;\;\;\left|\frac{z}{\frac{y_m}{x}}\right|\\ \mathbf{elif}\;x \leq 3.3 \cdot 10^{-12}:\\ \;\;\;\;\left|\frac{4}{y_m}\right|\\ \mathbf{elif}\;x \leq 1.75 \cdot 10^{+164}:\\ \;\;\;\;\left|\frac{x}{\frac{y_m}{z}}\right|\\ \mathbf{else}:\\ \;\;\;\;t_0\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (let* ((t_0 (fabs (/ x y_m))))
   (if (<= x -2.35e+101)
     t_0
     (if (<= x -1.06e-89)
       (fabs (/ z (/ y_m x)))
       (if (<= x 3.3e-12)
         (fabs (/ 4.0 y_m))
         (if (<= x 1.75e+164) (fabs (/ x (/ y_m z))) t_0))))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double t_0 = fabs((x / y_m));
	double tmp;
	if (x <= -2.35e+101) {
		tmp = t_0;
	} else if (x <= -1.06e-89) {
		tmp = fabs((z / (y_m / x)));
	} else if (x <= 3.3e-12) {
		tmp = fabs((4.0 / y_m));
	} else if (x <= 1.75e+164) {
		tmp = fabs((x / (y_m / z)));
	} else {
		tmp = t_0;
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: t_0
    real(8) :: tmp
    t_0 = abs((x / y_m))
    if (x <= (-2.35d+101)) then
        tmp = t_0
    else if (x <= (-1.06d-89)) then
        tmp = abs((z / (y_m / x)))
    else if (x <= 3.3d-12) then
        tmp = abs((4.0d0 / y_m))
    else if (x <= 1.75d+164) then
        tmp = abs((x / (y_m / z)))
    else
        tmp = t_0
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double t_0 = Math.abs((x / y_m));
	double tmp;
	if (x <= -2.35e+101) {
		tmp = t_0;
	} else if (x <= -1.06e-89) {
		tmp = Math.abs((z / (y_m / x)));
	} else if (x <= 3.3e-12) {
		tmp = Math.abs((4.0 / y_m));
	} else if (x <= 1.75e+164) {
		tmp = Math.abs((x / (y_m / z)));
	} else {
		tmp = t_0;
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	t_0 = math.fabs((x / y_m))
	tmp = 0
	if x <= -2.35e+101:
		tmp = t_0
	elif x <= -1.06e-89:
		tmp = math.fabs((z / (y_m / x)))
	elif x <= 3.3e-12:
		tmp = math.fabs((4.0 / y_m))
	elif x <= 1.75e+164:
		tmp = math.fabs((x / (y_m / z)))
	else:
		tmp = t_0
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	t_0 = abs(Float64(x / y_m))
	tmp = 0.0
	if (x <= -2.35e+101)
		tmp = t_0;
	elseif (x <= -1.06e-89)
		tmp = abs(Float64(z / Float64(y_m / x)));
	elseif (x <= 3.3e-12)
		tmp = abs(Float64(4.0 / y_m));
	elseif (x <= 1.75e+164)
		tmp = abs(Float64(x / Float64(y_m / z)));
	else
		tmp = t_0;
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	t_0 = abs((x / y_m));
	tmp = 0.0;
	if (x <= -2.35e+101)
		tmp = t_0;
	elseif (x <= -1.06e-89)
		tmp = abs((z / (y_m / x)));
	elseif (x <= 3.3e-12)
		tmp = abs((4.0 / y_m));
	elseif (x <= 1.75e+164)
		tmp = abs((x / (y_m / z)));
	else
		tmp = t_0;
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := Block[{t$95$0 = N[Abs[N[(x / y$95$m), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[x, -2.35e+101], t$95$0, If[LessEqual[x, -1.06e-89], N[Abs[N[(z / N[(y$95$m / x), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], If[LessEqual[x, 3.3e-12], N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision], If[LessEqual[x, 1.75e+164], N[Abs[N[(x / N[(y$95$m / z), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], t$95$0]]]]]

Derivation

1. Split input into 4 regimes

2. if x < -2.34999999999999985e101 or 1.7499999999999999e164 < x

   1. Initial program 82.7%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 98.5%

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

   3. Taylor expanded in x around inf 98.5%

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

      1. associate-/l* 99.9%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   5. Simplified 99.9%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   6. Taylor expanded in z around 0 78.4%

      \[\leadsto \left|\color{blue}{\frac{x}{y}}\right| \]

   if -2.34999999999999985e101 < x < -1.0600000000000001e-89

   1. Initial program 95.7%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in z around inf 58.9%

      \[\leadsto \left|\color{blue}{-1 \cdot \frac{x \cdot z}{y}}\right| \]
   3. Step-by-step derivation

      1. mul-1-neg 58.9%

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

      2. associate-*l/ 64.7%

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

      3. distribute-rgt-neg-out 64.7%

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

   4. Simplified 64.7%

      \[\leadsto \left|\color{blue}{\frac{x}{y} \cdot \left(-z\right)}\right| \]
   5. Step-by-step derivation

      1. *-commutative 64.7%

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

      2. clear-num 64.7%

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

      3. un-div-inv 64.7%

         \[\leadsto \left|\color{blue}{\frac{-z}{\frac{y}{x}}}\right| \]

      4. add-sqr-sqrt 32.2%

         \[\leadsto \left|\frac{\color{blue}{\sqrt{-z} \cdot \sqrt{-z}}}{\frac{y}{x}}\right| \]

      5. sqrt-unprod 45.0%

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

      6. sqr-neg 45.0%

         \[\leadsto \left|\frac{\sqrt{\color{blue}{z \cdot z}}}{\frac{y}{x}}\right| \]

      7. sqrt-unprod 32.3%

         \[\leadsto \left|\frac{\color{blue}{\sqrt{z} \cdot \sqrt{z}}}{\frac{y}{x}}\right| \]

      8. add-sqr-sqrt 64.7%

         \[\leadsto \left|\frac{\color{blue}{z}}{\frac{y}{x}}\right| \]

   6. Applied egg-rr 64.7%

      \[\leadsto \left|\color{blue}{\frac{z}{\frac{y}{x}}}\right| \]

   if -1.0600000000000001e-89 < x < 3.3000000000000001e-12

   1. Initial program 96.5%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in x around 0 84.0%

      \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]

   if 3.3000000000000001e-12 < x < 1.7499999999999999e164

   1. Initial program 99.9%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in z around inf 47.4%

      \[\leadsto \left|\color{blue}{-1 \cdot \frac{x \cdot z}{y}}\right| \]
   3. Step-by-step derivation

      1. mul-1-neg 47.4%

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

      2. associate-*l/ 58.6%

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

      3. distribute-rgt-neg-out 58.6%

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

   4. Simplified 58.6%

      \[\leadsto \left|\color{blue}{\frac{x}{y} \cdot \left(-z\right)}\right| \]
   5. Step-by-step derivation

      1. associate-*l/ 47.4%

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

      2. add-cube-cbrt 46.8%

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

      3. times-frac 57.7%

         \[\leadsto \left|\color{blue}{\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{-z}{\sqrt[3]{y}}}\right| \]

      4. add-sqr-sqrt 30.1%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\color{blue}{\sqrt{-z} \cdot \sqrt{-z}}}{\sqrt[3]{y}}\right| \]

      5. sqrt-unprod 41.2%

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

      6. sqr-neg 41.2%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\sqrt{\color{blue}{z \cdot z}}}{\sqrt[3]{y}}\right| \]

      7. sqrt-unprod 27.5%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\color{blue}{\sqrt{z} \cdot \sqrt{z}}}{\sqrt[3]{y}}\right| \]

      8. add-sqr-sqrt 57.7%

         \[\leadsto \left|\frac{x}{\sqrt[3]{y} \cdot \sqrt[3]{y}} \cdot \frac{\color{blue}{z}}{\sqrt[3]{y}}\right| \]

      9. times-frac 46.8%

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

      10. add-cube-cbrt 47.4%

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

      11. clear-num 47.3%

          \[\leadsto \left|\color{blue}{\frac{1}{\frac{y}{x \cdot z}}}\right| \]

      12. associate-/l/ 58.6%

          \[\leadsto \left|\frac{1}{\color{blue}{\frac{\frac{y}{z}}{x}}}\right| \]

      13. clear-num 58.7%

          \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{z}}}\right| \]

   6. Applied egg-rr 58.7%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{z}}}\right| \]
3. Recombined 4 regimes into one program.

4. Final simplification 75.5%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -2.35 \cdot 10^{+101}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \mathbf{elif}\;x \leq -1.06 \cdot 10^{-89}:\\ \;\;\;\;\left|\frac{z}{\frac{y}{x}}\right|\\ \mathbf{elif}\;x \leq 3.3 \cdot 10^{-12}:\\ \;\;\;\;\left|\frac{4}{y}\right|\\ \mathbf{elif}\;x \leq 1.75 \cdot 10^{+164}:\\ \;\;\;\;\left|\frac{x}{\frac{y}{z}}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \end{array} \]

Alternative 6: 97.0% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} \mathbf{if}\;y_m \leq 8.2 \cdot 10^{+146}:\\ \;\;\;\;\left|\frac{\left(4 + x\right) - x \cdot z}{y_m}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4 + x}{y_m} - z \cdot \frac{x}{y_m}\right|\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (if (<= y_m 8.2e+146)
   (fabs (/ (- (+ 4.0 x) (* x z)) y_m))
   (fabs (- (/ (+ 4.0 x) y_m) (* z (/ x y_m))))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double tmp;
	if (y_m <= 8.2e+146) {
		tmp = fabs((((4.0 + x) - (x * z)) / y_m));
	} else {
		tmp = fabs((((4.0 + x) / y_m) - (z * (x / y_m))));
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: tmp
    if (y_m <= 8.2d+146) then
        tmp = abs((((4.0d0 + x) - (x * z)) / y_m))
    else
        tmp = abs((((4.0d0 + x) / y_m) - (z * (x / y_m))))
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double tmp;
	if (y_m <= 8.2e+146) {
		tmp = Math.abs((((4.0 + x) - (x * z)) / y_m));
	} else {
		tmp = Math.abs((((4.0 + x) / y_m) - (z * (x / y_m))));
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	tmp = 0
	if y_m <= 8.2e+146:
		tmp = math.fabs((((4.0 + x) - (x * z)) / y_m))
	else:
		tmp = math.fabs((((4.0 + x) / y_m) - (z * (x / y_m))))
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	tmp = 0.0
	if (y_m <= 8.2e+146)
		tmp = abs(Float64(Float64(Float64(4.0 + x) - Float64(x * z)) / y_m));
	else
		tmp = abs(Float64(Float64(Float64(4.0 + x) / y_m) - Float64(z * Float64(x / y_m))));
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	tmp = 0.0;
	if (y_m <= 8.2e+146)
		tmp = abs((((4.0 + x) - (x * z)) / y_m));
	else
		tmp = abs((((4.0 + x) / y_m) - (z * (x / y_m))));
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := If[LessEqual[y$95$m, 8.2e+146], N[Abs[N[(N[(N[(4.0 + x), $MachinePrecision] - N[(x * z), $MachinePrecision]), $MachinePrecision] / y$95$m), $MachinePrecision]], $MachinePrecision], N[Abs[N[(N[(N[(4.0 + x), $MachinePrecision] / y$95$m), $MachinePrecision] - N[(z * N[(x / y$95$m), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if y < 8.2000000000000007e146

   1. Initial program 92.3%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 98.2%

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

   if 8.2000000000000007e146 < y

   1. Initial program 97.4%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq 8.2 \cdot 10^{+146}:\\ \;\;\;\;\left|\frac{\left(4 + x\right) - x \cdot z}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4 + x}{y} - z \cdot \frac{x}{y}\right|\\ \end{array} \]

Alternative 7: 99.6% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} \mathbf{if}\;y_m \leq 2.5 \cdot 10^{+81}:\\ \;\;\;\;\left|\frac{\left(4 + x\right) - x \cdot z}{y_m}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4 + x}{y_m} - x \cdot \frac{z}{y_m}\right|\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (if (<= y_m 2.5e+81)
   (fabs (/ (- (+ 4.0 x) (* x z)) y_m))
   (fabs (- (/ (+ 4.0 x) y_m) (* x (/ z y_m))))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double tmp;
	if (y_m <= 2.5e+81) {
		tmp = fabs((((4.0 + x) - (x * z)) / y_m));
	} else {
		tmp = fabs((((4.0 + x) / y_m) - (x * (z / y_m))));
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: tmp
    if (y_m <= 2.5d+81) then
        tmp = abs((((4.0d0 + x) - (x * z)) / y_m))
    else
        tmp = abs((((4.0d0 + x) / y_m) - (x * (z / y_m))))
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double tmp;
	if (y_m <= 2.5e+81) {
		tmp = Math.abs((((4.0 + x) - (x * z)) / y_m));
	} else {
		tmp = Math.abs((((4.0 + x) / y_m) - (x * (z / y_m))));
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	tmp = 0
	if y_m <= 2.5e+81:
		tmp = math.fabs((((4.0 + x) - (x * z)) / y_m))
	else:
		tmp = math.fabs((((4.0 + x) / y_m) - (x * (z / y_m))))
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	tmp = 0.0
	if (y_m <= 2.5e+81)
		tmp = abs(Float64(Float64(Float64(4.0 + x) - Float64(x * z)) / y_m));
	else
		tmp = abs(Float64(Float64(Float64(4.0 + x) / y_m) - Float64(x * Float64(z / y_m))));
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	tmp = 0.0;
	if (y_m <= 2.5e+81)
		tmp = abs((((4.0 + x) - (x * z)) / y_m));
	else
		tmp = abs((((4.0 + x) / y_m) - (x * (z / y_m))));
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := If[LessEqual[y$95$m, 2.5e+81], N[Abs[N[(N[(N[(4.0 + x), $MachinePrecision] - N[(x * z), $MachinePrecision]), $MachinePrecision] / y$95$m), $MachinePrecision]], $MachinePrecision], N[Abs[N[(N[(N[(4.0 + x), $MachinePrecision] / y$95$m), $MachinePrecision] - N[(x * N[(z / y$95$m), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if y < 2.4999999999999999e81

   1. Initial program 92.3%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 98.1%

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

   if 2.4999999999999999e81 < y

   1. Initial program 96.3%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 92.1%

      \[\leadsto \color{blue}{\left|\frac{x + 4}{y} - \frac{x \cdot z}{y}\right|} \]
   4. Step-by-step derivation

      1. associate-*r/ 99.8%

         \[\leadsto \left|\frac{x + 4}{y} - \color{blue}{x \cdot \frac{z}{y}}\right| \]

      2. *-commutative 99.8%

         \[\leadsto \left|\frac{x + 4}{y} - \color{blue}{\frac{z}{y} \cdot x}\right| \]

   5. Applied egg-rr 99.8%

      \[\leadsto \left|\frac{x + 4}{y} - \color{blue}{\frac{z}{y} \cdot x}\right| \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq 2.5 \cdot 10^{+81}:\\ \;\;\;\;\left|\frac{\left(4 + x\right) - x \cdot z}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4 + x}{y} - x \cdot \frac{z}{y}\right|\\ \end{array} \]

Alternative 8: 87.1% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} \mathbf{if}\;x \leq -2.85 \cdot 10^{-24} \lor \neg \left(x \leq 3.5 \cdot 10^{-12}\right):\\ \;\;\;\;\left|x \cdot \frac{z + -1}{y_m}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4}{y_m}\right|\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (if (or (<= x -2.85e-24) (not (<= x 3.5e-12)))
   (fabs (* x (/ (+ z -1.0) y_m)))
   (fabs (/ 4.0 y_m))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double tmp;
	if ((x <= -2.85e-24) || !(x <= 3.5e-12)) {
		tmp = fabs((x * ((z + -1.0) / y_m)));
	} else {
		tmp = fabs((4.0 / y_m));
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: tmp
    if ((x <= (-2.85d-24)) .or. (.not. (x <= 3.5d-12))) then
        tmp = abs((x * ((z + (-1.0d0)) / y_m)))
    else
        tmp = abs((4.0d0 / y_m))
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double tmp;
	if ((x <= -2.85e-24) || !(x <= 3.5e-12)) {
		tmp = Math.abs((x * ((z + -1.0) / y_m)));
	} else {
		tmp = Math.abs((4.0 / y_m));
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	tmp = 0
	if (x <= -2.85e-24) or not (x <= 3.5e-12):
		tmp = math.fabs((x * ((z + -1.0) / y_m)))
	else:
		tmp = math.fabs((4.0 / y_m))
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	tmp = 0.0
	if ((x <= -2.85e-24) || !(x <= 3.5e-12))
		tmp = abs(Float64(x * Float64(Float64(z + -1.0) / y_m)));
	else
		tmp = abs(Float64(4.0 / y_m));
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	tmp = 0.0;
	if ((x <= -2.85e-24) || ~((x <= 3.5e-12)))
		tmp = abs((x * ((z + -1.0) / y_m)));
	else
		tmp = abs((4.0 / y_m));
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := If[Or[LessEqual[x, -2.85e-24], N[Not[LessEqual[x, 3.5e-12]], $MachinePrecision]], N[Abs[N[(x * N[(N[(z + -1.0), $MachinePrecision] / y$95$m), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if x < -2.85000000000000001e-24 or 3.5e-12 < x

   1. Initial program 89.8%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 95.5%

      \[\leadsto \color{blue}{\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|} \]

   4. Taylor expanded in x around inf 97.1%

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

   5. Taylor expanded in y around 0 97.1%

      \[\leadsto \left|x \cdot \color{blue}{\frac{z - 1}{y}}\right| \]

   if -2.85000000000000001e-24 < x < 3.5e-12

   1. Initial program 96.8%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in x around 0 80.2%

      \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]
3. Recombined 2 regimes into one program.

4. Final simplification 89.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -2.85 \cdot 10^{-24} \lor \neg \left(x \leq 3.5 \cdot 10^{-12}\right):\\ \;\;\;\;\left|x \cdot \frac{z + -1}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4}{y}\right|\\ \end{array} \]

Alternative 9: 87.2% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} \mathbf{if}\;x \leq -3.6 \cdot 10^{-24} \lor \neg \left(x \leq 3.1 \cdot 10^{-14}\right):\\ \;\;\;\;\left|\frac{x}{\frac{y_m}{1 - z}}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4}{y_m}\right|\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (if (or (<= x -3.6e-24) (not (<= x 3.1e-14)))
   (fabs (/ x (/ y_m (- 1.0 z))))
   (fabs (/ 4.0 y_m))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double tmp;
	if ((x <= -3.6e-24) || !(x <= 3.1e-14)) {
		tmp = fabs((x / (y_m / (1.0 - z))));
	} else {
		tmp = fabs((4.0 / y_m));
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: tmp
    if ((x <= (-3.6d-24)) .or. (.not. (x <= 3.1d-14))) then
        tmp = abs((x / (y_m / (1.0d0 - z))))
    else
        tmp = abs((4.0d0 / y_m))
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double tmp;
	if ((x <= -3.6e-24) || !(x <= 3.1e-14)) {
		tmp = Math.abs((x / (y_m / (1.0 - z))));
	} else {
		tmp = Math.abs((4.0 / y_m));
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	tmp = 0
	if (x <= -3.6e-24) or not (x <= 3.1e-14):
		tmp = math.fabs((x / (y_m / (1.0 - z))))
	else:
		tmp = math.fabs((4.0 / y_m))
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	tmp = 0.0
	if ((x <= -3.6e-24) || !(x <= 3.1e-14))
		tmp = abs(Float64(x / Float64(y_m / Float64(1.0 - z))));
	else
		tmp = abs(Float64(4.0 / y_m));
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	tmp = 0.0;
	if ((x <= -3.6e-24) || ~((x <= 3.1e-14)))
		tmp = abs((x / (y_m / (1.0 - z))));
	else
		tmp = abs((4.0 / y_m));
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := If[Or[LessEqual[x, -3.6e-24], N[Not[LessEqual[x, 3.1e-14]], $MachinePrecision]], N[Abs[N[(x / N[(y$95$m / N[(1.0 - z), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if x < -3.6000000000000001e-24 or 3.10000000000000004e-14 < x

   1. Initial program 89.8%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 94.4%

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

   3. Taylor expanded in x around inf 91.9%

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

      1. associate-/l* 97.4%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   5. Simplified 97.4%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   if -3.6000000000000001e-24 < x < 3.10000000000000004e-14

   1. Initial program 96.8%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in x around 0 80.2%

      \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]
3. Recombined 2 regimes into one program.

4. Final simplification 89.5%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -3.6 \cdot 10^{-24} \lor \neg \left(x \leq 3.1 \cdot 10^{-14}\right):\\ \;\;\;\;\left|\frac{x}{\frac{y}{1 - z}}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4}{y}\right|\\ \end{array} \]

Alternative 10: 85.8% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} \mathbf{if}\;z \leq -2 \cdot 10^{+17}:\\ \;\;\;\;\left|z \cdot \frac{x}{y_m}\right|\\ \mathbf{elif}\;z \leq 2.5 \cdot 10^{+33}:\\ \;\;\;\;\left|\frac{-4 - x}{y_m}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{z}{\frac{y_m}{x}}\right|\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (if (<= z -2e+17)
   (fabs (* z (/ x y_m)))
   (if (<= z 2.5e+33) (fabs (/ (- -4.0 x) y_m)) (fabs (/ z (/ y_m x))))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double tmp;
	if (z <= -2e+17) {
		tmp = fabs((z * (x / y_m)));
	} else if (z <= 2.5e+33) {
		tmp = fabs(((-4.0 - x) / y_m));
	} else {
		tmp = fabs((z / (y_m / x)));
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: tmp
    if (z <= (-2d+17)) then
        tmp = abs((z * (x / y_m)))
    else if (z <= 2.5d+33) then
        tmp = abs((((-4.0d0) - x) / y_m))
    else
        tmp = abs((z / (y_m / x)))
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double tmp;
	if (z <= -2e+17) {
		tmp = Math.abs((z * (x / y_m)));
	} else if (z <= 2.5e+33) {
		tmp = Math.abs(((-4.0 - x) / y_m));
	} else {
		tmp = Math.abs((z / (y_m / x)));
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	tmp = 0
	if z <= -2e+17:
		tmp = math.fabs((z * (x / y_m)))
	elif z <= 2.5e+33:
		tmp = math.fabs(((-4.0 - x) / y_m))
	else:
		tmp = math.fabs((z / (y_m / x)))
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	tmp = 0.0
	if (z <= -2e+17)
		tmp = abs(Float64(z * Float64(x / y_m)));
	elseif (z <= 2.5e+33)
		tmp = abs(Float64(Float64(-4.0 - x) / y_m));
	else
		tmp = abs(Float64(z / Float64(y_m / x)));
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	tmp = 0.0;
	if (z <= -2e+17)
		tmp = abs((z * (x / y_m)));
	elseif (z <= 2.5e+33)
		tmp = abs(((-4.0 - x) / y_m));
	else
		tmp = abs((z / (y_m / x)));
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := If[LessEqual[z, -2e+17], N[Abs[N[(z * N[(x / y$95$m), $MachinePrecision]), $MachinePrecision]], $MachinePrecision], If[LessEqual[z, 2.5e+33], N[Abs[N[(N[(-4.0 - x), $MachinePrecision] / y$95$m), $MachinePrecision]], $MachinePrecision], N[Abs[N[(z / N[(y$95$m / x), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if z < -2e17

   1. Initial program 98.2%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 94.6%

      \[\leadsto \color{blue}{\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|} \]

   4. Taylor expanded in x around inf 79.1%

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

   5. Taylor expanded in z around inf 73.8%

      \[\leadsto \left|\color{blue}{\frac{x \cdot z}{y}}\right| \]
   6. Step-by-step derivation

      1. associate-/l* 79.2%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{z}}}\right| \]

      2. associate-/r/ 80.9%

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

   7. Simplified 80.9%

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

   if -2e17 < z < 2.49999999999999986e33

   1. Initial program 95.9%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\left|\mathsf{fma}\left(x, \frac{z}{y}, \frac{-4 - x}{y}\right)\right|} \]

   4. Taylor expanded in z around 0 94.6%

      \[\leadsto \left|\color{blue}{-1 \cdot \frac{4 + x}{y}}\right| \]
   5. Step-by-step derivation

      1. associate-*r/ 94.6%

         \[\leadsto \left|\color{blue}{\frac{-1 \cdot \left(4 + x\right)}{y}}\right| \]

      2. distribute-lft-in 94.6%

         \[\leadsto \left|\frac{\color{blue}{-1 \cdot 4 + -1 \cdot x}}{y}\right| \]

      3. metadata-eval 94.6%

         \[\leadsto \left|\frac{\color{blue}{-4} + -1 \cdot x}{y}\right| \]

      4. neg-mul-1 94.6%

         \[\leadsto \left|\frac{-4 + \color{blue}{\left(-x\right)}}{y}\right| \]

      5. sub-neg 94.6%

         \[\leadsto \left|\frac{\color{blue}{-4 - x}}{y}\right| \]

   6. Simplified 94.6%

      \[\leadsto \left|\color{blue}{\frac{-4 - x}{y}}\right| \]

   if 2.49999999999999986e33 < z

   1. Initial program 80.3%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in z around inf 71.1%

      \[\leadsto \left|\color{blue}{-1 \cdot \frac{x \cdot z}{y}}\right| \]
   3. Step-by-step derivation

      1. mul-1-neg 71.1%

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

      2. associate-*l/ 72.5%

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

      3. distribute-rgt-neg-out 72.5%

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

   4. Simplified 72.5%

      \[\leadsto \left|\color{blue}{\frac{x}{y} \cdot \left(-z\right)}\right| \]
   5. Step-by-step derivation

      1. *-commutative 72.5%

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

      2. clear-num 72.4%

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

      3. un-div-inv 72.5%

         \[\leadsto \left|\color{blue}{\frac{-z}{\frac{y}{x}}}\right| \]

      4. add-sqr-sqrt 0.0%

         \[\leadsto \left|\frac{\color{blue}{\sqrt{-z} \cdot \sqrt{-z}}}{\frac{y}{x}}\right| \]

      5. sqrt-unprod 52.8%

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

      6. sqr-neg 52.8%

         \[\leadsto \left|\frac{\sqrt{\color{blue}{z \cdot z}}}{\frac{y}{x}}\right| \]

      7. sqrt-unprod 72.3%

         \[\leadsto \left|\frac{\color{blue}{\sqrt{z} \cdot \sqrt{z}}}{\frac{y}{x}}\right| \]

      8. add-sqr-sqrt 72.5%

         \[\leadsto \left|\frac{\color{blue}{z}}{\frac{y}{x}}\right| \]

   6. Applied egg-rr 72.5%

      \[\leadsto \left|\color{blue}{\frac{z}{\frac{y}{x}}}\right| \]
3. Recombined 3 regimes into one program.

4. Final simplification 87.0%

   \[\leadsto \begin{array}{l} \mathbf{if}\;z \leq -2 \cdot 10^{+17}:\\ \;\;\;\;\left|z \cdot \frac{x}{y}\right|\\ \mathbf{elif}\;z \leq 2.5 \cdot 10^{+33}:\\ \;\;\;\;\left|\frac{-4 - x}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{z}{\frac{y}{x}}\right|\\ \end{array} \]

Alternative 11: 96.3% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \left|\frac{\left(4 + x\right) - x \cdot z}{y_m}\right| \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z) :precision binary64 (fabs (/ (- (+ 4.0 x) (* x z)) y_m)))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	return fabs((((4.0 + x) - (x * z)) / y_m));
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    code = abs((((4.0d0 + x) - (x * z)) / y_m))
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	return Math.abs((((4.0 + x) - (x * z)) / y_m));
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	return math.fabs((((4.0 + x) - (x * z)) / y_m))

Julia

y_m = abs(y)
function code(x, y_m, z)
	return abs(Float64(Float64(Float64(4.0 + x) - Float64(x * z)) / y_m))
end

MATLAB

y_m = abs(y);
function tmp = code(x, y_m, z)
	tmp = abs((((4.0 + x) - (x * z)) / y_m));
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := N[Abs[N[(N[(N[(4.0 + x), $MachinePrecision] - N[(x * z), $MachinePrecision]), $MachinePrecision] / y$95$m), $MachinePrecision]], $MachinePrecision]

Derivation

1. Initial program 93.0%

   \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

2. Taylor expanded in y around 0 96.9%

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

3. Final simplification 96.9%

   \[\leadsto \left|\frac{\left(4 + x\right) - x \cdot z}{y}\right| \]

Alternative 12: 68.7% accurate, 1.0× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \lor \neg \left(x \leq 4\right):\\ \;\;\;\;\left|\frac{x}{y_m}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4}{y_m}\right|\\ \end{array} \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z)
 :precision binary64
 (if (or (<= x -1.5) (not (<= x 4.0))) (fabs (/ x y_m)) (fabs (/ 4.0 y_m))))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	double tmp;
	if ((x <= -1.5) || !(x <= 4.0)) {
		tmp = fabs((x / y_m));
	} else {
		tmp = fabs((4.0 / y_m));
	}
	return tmp;
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    real(8) :: tmp
    if ((x <= (-1.5d0)) .or. (.not. (x <= 4.0d0))) then
        tmp = abs((x / y_m))
    else
        tmp = abs((4.0d0 / y_m))
    end if
    code = tmp
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	double tmp;
	if ((x <= -1.5) || !(x <= 4.0)) {
		tmp = Math.abs((x / y_m));
	} else {
		tmp = Math.abs((4.0 / y_m));
	}
	return tmp;
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	tmp = 0
	if (x <= -1.5) or not (x <= 4.0):
		tmp = math.fabs((x / y_m))
	else:
		tmp = math.fabs((4.0 / y_m))
	return tmp

Julia

y_m = abs(y)
function code(x, y_m, z)
	tmp = 0.0
	if ((x <= -1.5) || !(x <= 4.0))
		tmp = abs(Float64(x / y_m));
	else
		tmp = abs(Float64(4.0 / y_m));
	end
	return tmp
end

MATLAB

y_m = abs(y);
function tmp_2 = code(x, y_m, z)
	tmp = 0.0;
	if ((x <= -1.5) || ~((x <= 4.0)))
		tmp = abs((x / y_m));
	else
		tmp = abs((4.0 / y_m));
	end
	tmp_2 = tmp;
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := If[Or[LessEqual[x, -1.5], N[Not[LessEqual[x, 4.0]], $MachinePrecision]], N[Abs[N[(x / y$95$m), $MachinePrecision]], $MachinePrecision], N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if x < -1.5 or 4 < x

   1. Initial program 89.2%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in y around 0 94.1%

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

   3. Taylor expanded in x around inf 93.5%

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

      1. associate-/l* 99.3%

         \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   5. Simplified 99.3%

      \[\leadsto \left|\color{blue}{\frac{x}{\frac{y}{1 - z}}}\right| \]

   6. Taylor expanded in z around 0 63.2%

      \[\leadsto \left|\color{blue}{\frac{x}{y}}\right| \]

   if -1.5 < x < 4

   1. Initial program 97.0%

      \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

   2. Taylor expanded in x around 0 76.6%

      \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]
3. Recombined 2 regimes into one program.

4. Final simplification 69.7%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -1.5 \lor \neg \left(x \leq 4\right):\\ \;\;\;\;\left|\frac{x}{y}\right|\\ \mathbf{else}:\\ \;\;\;\;\left|\frac{4}{y}\right|\\ \end{array} \]

Alternative 13: 40.1% accurate, 1.1× speedup

Math

\[\begin{array}{l} y_m = \left|y\right| \\ \left|\frac{4}{y_m}\right| \end{array} \]

FPCore

y_m = (fabs.f64 y)
(FPCore (x y_m z) :precision binary64 (fabs (/ 4.0 y_m)))

C

y_m = fabs(y);
double code(double x, double y_m, double z) {
	return fabs((4.0 / y_m));
}

Fortran

y_m = abs(y)
real(8) function code(x, y_m, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y_m
    real(8), intent (in) :: z
    code = abs((4.0d0 / y_m))
end function

Java

y_m = Math.abs(y);
public static double code(double x, double y_m, double z) {
	return Math.abs((4.0 / y_m));
}

Python

y_m = math.fabs(y)
def code(x, y_m, z):
	return math.fabs((4.0 / y_m))

Julia

y_m = abs(y)
function code(x, y_m, z)
	return abs(Float64(4.0 / y_m))
end

MATLAB

y_m = abs(y);
function tmp = code(x, y_m, z)
	tmp = abs((4.0 / y_m));
end

Wolfram

y_m = N[Abs[y], $MachinePrecision]
code[x_, y$95$m_, z_] := N[Abs[N[(4.0 / y$95$m), $MachinePrecision]], $MachinePrecision]

Derivation

1. Initial program 93.0%

   \[\left|\frac{x + 4}{y} - \frac{x}{y} \cdot z\right| \]

2. Taylor expanded in x around 0 40.0%

   \[\leadsto \left|\color{blue}{\frac{4}{y}}\right| \]

3. Final simplification 40.0%

   \[\leadsto \left|\frac{4}{y}\right| \]

Reproduce

herbie shell --seed 2023336 
(FPCore (x y z)
  :name "fabs fraction 1"
  :precision binary64
  (fabs (- (/ (+ x 4.0) y) (* (/ x y) z))))