Diagrams.Color.HSV:lerp from diagrams-contrib-1.3.0.5

Percentage Accurate: 98.0% → 100.0%

Time: 4.6s

Alternatives: 6

Speedup: 1.3×

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

Specification

Math

\[\begin{array}{l} \\ \left(1 - x\right) \cdot y + x \cdot z \end{array} \]

FPCore

(FPCore (x y z) :precision binary64 (+ (* (- 1.0 x) y) (* x z)))

C

double code(double x, double y, double z) {
	return ((1.0 - x) * y) + (x * 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 = ((1.0d0 - x) * y) + (x * z)
end function

Java

public static double code(double x, double y, double z) {
	return ((1.0 - x) * y) + (x * z);
}

Python

def code(x, y, z):
	return ((1.0 - x) * y) + (x * z)

Julia

function code(x, y, z)
	return Float64(Float64(Float64(1.0 - x) * y) + Float64(x * z))
end

MATLAB

function tmp = code(x, y, z)
	tmp = ((1.0 - x) * y) + (x * z);
end

Wolfram

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

Initial Program: 98.0% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \left(1 - x\right) \cdot y + x \cdot z \end{array} \]

FPCore

(FPCore (x y z) :precision binary64 (+ (* (- 1.0 x) y) (* x z)))

C

double code(double x, double y, double z) {
	return ((1.0 - x) * y) + (x * 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 = ((1.0d0 - x) * y) + (x * z)
end function

Java

public static double code(double x, double y, double z) {
	return ((1.0 - x) * y) + (x * z);
}

Python

def code(x, y, z):
	return ((1.0 - x) * y) + (x * z)

Julia

function code(x, y, z)
	return Float64(Float64(Float64(1.0 - x) * y) + Float64(x * z))
end

MATLAB

function tmp = code(x, y, z)
	tmp = ((1.0 - x) * y) + (x * z);
end

Wolfram

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

Alternative 1: 100.0% accurate, 0.1× speedup

Math

\[\begin{array}{l} \\ \mathsf{fma}\left(x, z - y, y\right) \end{array} \]

FPCore

(FPCore (x y z) :precision binary64 (fma x (- z y) y))

C

double code(double x, double y, double z) {
	return fma(x, (z - y), y);
}

Julia

function code(x, y, z)
	return fma(x, Float64(z - y), y)
end

Wolfram

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

Derivation

1. Initial program 98.4%

   \[\left(1 - x\right) \cdot y + x \cdot z \]
2. Step-by-step derivation

   1. *-commutative 98.4%

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

   2. distribute-lft-out-- 98.4%

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

   3. *-rgt-identity 98.4%

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

   4. cancel-sign-sub-inv 98.4%

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

   5. associate-+l+ 98.4%

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

   6. +-commutative 98.4%

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

   7. *-commutative 98.4%

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

   8. distribute-rgt-out 100.0%

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

   9. fma-define 100.0%

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

   10. +-commutative 100.0%

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

   11. unsub-neg 100.0%

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

3. Simplified 100.0%

   \[\leadsto \color{blue}{\mathsf{fma}\left(x, z - y, y\right)} \]
4. Add Preprocessing
5. Add Preprocessing

Alternative 2: 62.1% accurate, 0.3× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.38 \cdot 10^{-42}:\\ \;\;\;\;x \cdot z\\ \mathbf{elif}\;x \leq 5.5 \cdot 10^{-72}:\\ \;\;\;\;y\\ \mathbf{elif}\;x \leq 2.5 \cdot 10^{+152} \lor \neg \left(x \leq 4.6 \cdot 10^{+227}\right) \land x \leq 4.8 \cdot 10^{+261}:\\ \;\;\;\;x \cdot z\\ \mathbf{else}:\\ \;\;\;\;y \cdot \left(-x\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.38e-42)
   (* x z)
   (if (<= x 5.5e-72)
     y
     (if (or (<= x 2.5e+152) (and (not (<= x 4.6e+227)) (<= x 4.8e+261)))
       (* x z)
       (* y (- x))))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.38e-42) {
		tmp = x * z;
	} else if (x <= 5.5e-72) {
		tmp = y;
	} else if ((x <= 2.5e+152) || (!(x <= 4.6e+227) && (x <= 4.8e+261))) {
		tmp = x * z;
	} else {
		tmp = y * -x;
	}
	return tmp;
}

Fortran

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 (x <= (-1.38d-42)) then
        tmp = x * z
    else if (x <= 5.5d-72) then
        tmp = y
    else if ((x <= 2.5d+152) .or. (.not. (x <= 4.6d+227)) .and. (x <= 4.8d+261)) then
        tmp = x * z
    else
        tmp = y * -x
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.38e-42) {
		tmp = x * z;
	} else if (x <= 5.5e-72) {
		tmp = y;
	} else if ((x <= 2.5e+152) || (!(x <= 4.6e+227) && (x <= 4.8e+261))) {
		tmp = x * z;
	} else {
		tmp = y * -x;
	}
	return tmp;
}

Python

def code(x, y, z):
	tmp = 0
	if x <= -1.38e-42:
		tmp = x * z
	elif x <= 5.5e-72:
		tmp = y
	elif (x <= 2.5e+152) or (not (x <= 4.6e+227) and (x <= 4.8e+261)):
		tmp = x * z
	else:
		tmp = y * -x
	return tmp

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.38e-42)
		tmp = Float64(x * z);
	elseif (x <= 5.5e-72)
		tmp = y;
	elseif ((x <= 2.5e+152) || (!(x <= 4.6e+227) && (x <= 4.8e+261)))
		tmp = Float64(x * z);
	else
		tmp = Float64(y * Float64(-x));
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z)
	tmp = 0.0;
	if (x <= -1.38e-42)
		tmp = x * z;
	elseif (x <= 5.5e-72)
		tmp = y;
	elseif ((x <= 2.5e+152) || (~((x <= 4.6e+227)) && (x <= 4.8e+261)))
		tmp = x * z;
	else
		tmp = y * -x;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.38e-42], N[(x * z), $MachinePrecision], If[LessEqual[x, 5.5e-72], y, If[Or[LessEqual[x, 2.5e+152], And[N[Not[LessEqual[x, 4.6e+227]], $MachinePrecision], LessEqual[x, 4.8e+261]]], N[(x * z), $MachinePrecision], N[(y * (-x)), $MachinePrecision]]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.37999999999999993e-42 or 5.49999999999999994e-72 < x < 2.5e152 or 4.5999999999999996e227 < x < 4.7999999999999997e261

   1. Initial program 98.5%

      \[\left(1 - x\right) \cdot y + x \cdot z \]
   2. Step-by-step derivation

      1. remove-double-neg 98.5%

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

      2. distribute-rgt-neg-out 98.5%

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

      3. neg-sub0 98.5%

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

      4. neg-sub0 98.5%

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

      5. *-commutative 98.5%

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

      6. distribute-lft-neg-in 98.5%

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

      7. remove-double-neg 98.5%

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

      8. distribute-rgt-out-- 98.5%

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

      9. *-lft-identity 98.5%

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

      10. associate-+l- 98.5%

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

      11. distribute-lft-out-- 100.0%

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

   3. Simplified 100.0%

      \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in y around 0 62.3%

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

   if -1.37999999999999993e-42 < x < 5.49999999999999994e-72

   1. Initial program 100.0%

      \[\left(1 - x\right) \cdot y + x \cdot z \]
   2. Step-by-step derivation

      1. remove-double-neg 100.0%

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

      2. distribute-rgt-neg-out 100.0%

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

      3. neg-sub0 100.0%

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

      4. neg-sub0 100.0%

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

      5. *-commutative 100.0%

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

      6. distribute-lft-neg-in 100.0%

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

      7. remove-double-neg 100.0%

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

      8. distribute-rgt-out-- 100.0%

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

      9. *-lft-identity 100.0%

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

      10. associate-+l- 100.0%

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

      11. distribute-lft-out-- 100.0%

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

   3. Simplified 100.0%

      \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around 0 79.1%

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

   if 2.5e152 < x < 4.5999999999999996e227 or 4.7999999999999997e261 < x

   1. Initial program 90.5%

      \[\left(1 - x\right) \cdot y + x \cdot z \]
   2. Step-by-step derivation

      1. remove-double-neg 90.5%

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

      2. distribute-rgt-neg-out 90.5%

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

      3. neg-sub0 90.5%

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

      4. neg-sub0 90.5%

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

      5. *-commutative 90.5%

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

      6. distribute-lft-neg-in 90.5%

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

      7. remove-double-neg 90.5%

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

      8. distribute-rgt-out-- 90.5%

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

      9. *-lft-identity 90.5%

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

      10. associate-+l- 90.5%

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

      11. distribute-lft-out-- 100.0%

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

   3. Simplified 100.0%

      \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in z around 0 81.4%

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

   6. Taylor expanded in x around inf 81.4%

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

      1. mul-1-neg 81.4%

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

      2. *-commutative 81.4%

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

      3. distribute-rgt-neg-in 81.4%

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

   8. Simplified 81.4%

      \[\leadsto \color{blue}{y \cdot \left(-x\right)} \]
3. Recombined 3 regimes into one program.

4. Final simplification 70.5%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -1.38 \cdot 10^{-42}:\\ \;\;\;\;x \cdot z\\ \mathbf{elif}\;x \leq 5.5 \cdot 10^{-72}:\\ \;\;\;\;y\\ \mathbf{elif}\;x \leq 2.5 \cdot 10^{+152} \lor \neg \left(x \leq 4.6 \cdot 10^{+227}\right) \land x \leq 4.8 \cdot 10^{+261}:\\ \;\;\;\;x \cdot z\\ \mathbf{else}:\\ \;\;\;\;y \cdot \left(-x\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 3: 84.5% accurate, 0.6× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -3.4 \cdot 10^{-42} \lor \neg \left(x \leq 5.6 \cdot 10^{-72}\right):\\ \;\;\;\;x \cdot \left(z - y\right)\\ \mathbf{else}:\\ \;\;\;\;y\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (or (<= x -3.4e-42) (not (<= x 5.6e-72))) (* x (- z y)) y))

C

double code(double x, double y, double z) {
	double tmp;
	if ((x <= -3.4e-42) || !(x <= 5.6e-72)) {
		tmp = x * (z - y);
	} else {
		tmp = y;
	}
	return tmp;
}

Fortran

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 ((x <= (-3.4d-42)) .or. (.not. (x <= 5.6d-72))) then
        tmp = x * (z - y)
    else
        tmp = y
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z) {
	double tmp;
	if ((x <= -3.4e-42) || !(x <= 5.6e-72)) {
		tmp = x * (z - y);
	} else {
		tmp = y;
	}
	return tmp;
}

Python

def code(x, y, z):
	tmp = 0
	if (x <= -3.4e-42) or not (x <= 5.6e-72):
		tmp = x * (z - y)
	else:
		tmp = y
	return tmp

Julia

function code(x, y, z)
	tmp = 0.0
	if ((x <= -3.4e-42) || !(x <= 5.6e-72))
		tmp = Float64(x * Float64(z - y));
	else
		tmp = y;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z)
	tmp = 0.0;
	if ((x <= -3.4e-42) || ~((x <= 5.6e-72)))
		tmp = x * (z - y);
	else
		tmp = y;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_] := If[Or[LessEqual[x, -3.4e-42], N[Not[LessEqual[x, 5.6e-72]], $MachinePrecision]], N[(x * N[(z - y), $MachinePrecision]), $MachinePrecision], y]

Derivation

1. Split input into 2 regimes

2. if x < -3.40000000000000022e-42 or 5.5999999999999996e-72 < x

   1. Initial program 97.4%

      \[\left(1 - x\right) \cdot y + x \cdot z \]
   2. Step-by-step derivation

      1. remove-double-neg 97.4%

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

      2. distribute-rgt-neg-out 97.4%

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

      3. neg-sub0 97.4%

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

      4. neg-sub0 97.4%

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

      5. *-commutative 97.4%

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

      6. distribute-lft-neg-in 97.4%

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

      7. remove-double-neg 97.4%

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

      8. distribute-rgt-out-- 97.4%

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

      9. *-lft-identity 97.4%

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

      10. associate-+l- 97.4%

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

      11. distribute-lft-out-- 100.0%

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

   3. Simplified 100.0%

      \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around inf 91.6%

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

   if -3.40000000000000022e-42 < x < 5.5999999999999996e-72

   1. Initial program 100.0%

      \[\left(1 - x\right) \cdot y + x \cdot z \]
   2. Step-by-step derivation

      1. remove-double-neg 100.0%

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

      2. distribute-rgt-neg-out 100.0%

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

      3. neg-sub0 100.0%

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

      4. neg-sub0 100.0%

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

      5. *-commutative 100.0%

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

      6. distribute-lft-neg-in 100.0%

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

      7. remove-double-neg 100.0%

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

      8. distribute-rgt-out-- 100.0%

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

      9. *-lft-identity 100.0%

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

      10. associate-+l- 100.0%

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

      11. distribute-lft-out-- 100.0%

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

   3. Simplified 100.0%

      \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around 0 79.1%

      \[\leadsto \color{blue}{y} \]
3. Recombined 2 regimes into one program.

4. Final simplification 86.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -3.4 \cdot 10^{-42} \lor \neg \left(x \leq 5.6 \cdot 10^{-72}\right):\\ \;\;\;\;x \cdot \left(z - y\right)\\ \mathbf{else}:\\ \;\;\;\;y\\ \end{array} \]
5. Add Preprocessing

Alternative 4: 61.9% accurate, 0.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -2.4 \cdot 10^{-42} \lor \neg \left(x \leq 1.05 \cdot 10^{-72}\right):\\ \;\;\;\;x \cdot z\\ \mathbf{else}:\\ \;\;\;\;y\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (or (<= x -2.4e-42) (not (<= x 1.05e-72))) (* x z) y))

C

double code(double x, double y, double z) {
	double tmp;
	if ((x <= -2.4e-42) || !(x <= 1.05e-72)) {
		tmp = x * z;
	} else {
		tmp = y;
	}
	return tmp;
}

Fortran

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 ((x <= (-2.4d-42)) .or. (.not. (x <= 1.05d-72))) then
        tmp = x * z
    else
        tmp = y
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z) {
	double tmp;
	if ((x <= -2.4e-42) || !(x <= 1.05e-72)) {
		tmp = x * z;
	} else {
		tmp = y;
	}
	return tmp;
}

Python

def code(x, y, z):
	tmp = 0
	if (x <= -2.4e-42) or not (x <= 1.05e-72):
		tmp = x * z
	else:
		tmp = y
	return tmp

Julia

function code(x, y, z)
	tmp = 0.0
	if ((x <= -2.4e-42) || !(x <= 1.05e-72))
		tmp = Float64(x * z);
	else
		tmp = y;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z)
	tmp = 0.0;
	if ((x <= -2.4e-42) || ~((x <= 1.05e-72)))
		tmp = x * z;
	else
		tmp = y;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_] := If[Or[LessEqual[x, -2.4e-42], N[Not[LessEqual[x, 1.05e-72]], $MachinePrecision]], N[(x * z), $MachinePrecision], y]

Derivation

1. Split input into 2 regimes

2. if x < -2.40000000000000003e-42 or 1.05e-72 < x

   1. Initial program 97.4%

      \[\left(1 - x\right) \cdot y + x \cdot z \]
   2. Step-by-step derivation

      1. remove-double-neg 97.4%

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

      2. distribute-rgt-neg-out 97.4%

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

      3. neg-sub0 97.4%

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

      4. neg-sub0 97.4%

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

      5. *-commutative 97.4%

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

      6. distribute-lft-neg-in 97.4%

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

      7. remove-double-neg 97.4%

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

      8. distribute-rgt-out-- 97.4%

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

      9. *-lft-identity 97.4%

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

      10. associate-+l- 97.4%

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

      11. distribute-lft-out-- 100.0%

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

   3. Simplified 100.0%

      \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in y around 0 57.4%

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

   if -2.40000000000000003e-42 < x < 1.05e-72

   1. Initial program 100.0%

      \[\left(1 - x\right) \cdot y + x \cdot z \]
   2. Step-by-step derivation

      1. remove-double-neg 100.0%

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

      2. distribute-rgt-neg-out 100.0%

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

      3. neg-sub0 100.0%

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

      4. neg-sub0 100.0%

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

      5. *-commutative 100.0%

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

      6. distribute-lft-neg-in 100.0%

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

      7. remove-double-neg 100.0%

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

      8. distribute-rgt-out-- 100.0%

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

      9. *-lft-identity 100.0%

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

      10. associate-+l- 100.0%

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

      11. distribute-lft-out-- 100.0%

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

   3. Simplified 100.0%

      \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around 0 79.1%

      \[\leadsto \color{blue}{y} \]
3. Recombined 2 regimes into one program.

4. Final simplification 65.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -2.4 \cdot 10^{-42} \lor \neg \left(x \leq 1.05 \cdot 10^{-72}\right):\\ \;\;\;\;x \cdot z\\ \mathbf{else}:\\ \;\;\;\;y\\ \end{array} \]
5. Add Preprocessing

Alternative 5: 100.0% accurate, 1.3× speedup

Math

\[\begin{array}{l} \\ y + x \cdot \left(z - y\right) \end{array} \]

FPCore

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

C

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

Fortran

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

Java

public static double code(double x, double y, double z) {
	return y + (x * (z - y));
}

Python

def code(x, y, z):
	return y + (x * (z - y))

Julia

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

MATLAB

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

Wolfram

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

Derivation

1. Initial program 98.4%

   \[\left(1 - x\right) \cdot y + x \cdot z \]
2. Step-by-step derivation

   1. remove-double-neg 98.4%

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

   2. distribute-rgt-neg-out 98.4%

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

   3. neg-sub0 98.4%

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

   4. neg-sub0 98.4%

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

   5. *-commutative 98.4%

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

   6. distribute-lft-neg-in 98.4%

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

   7. remove-double-neg 98.4%

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

   8. distribute-rgt-out-- 98.4%

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

   9. *-lft-identity 98.4%

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

   10. associate-+l- 98.4%

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

   11. distribute-lft-out-- 100.0%

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

3. Simplified 100.0%

   \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
4. Add Preprocessing

5. Final simplification 100.0%

   \[\leadsto y + x \cdot \left(z - y\right) \]
6. Add Preprocessing

Alternative 6: 36.6% accurate, 9.0× speedup

Math

\[\begin{array}{l} \\ y \end{array} \]

FPCore

(FPCore (x y z) :precision binary64 y)

C

double code(double x, double y, double z) {
	return y;
}

Fortran

real(8) function code(x, y, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = y
end function

Java

public static double code(double x, double y, double z) {
	return y;
}

Python

def code(x, y, z):
	return y

Julia

function code(x, y, z)
	return y
end

MATLAB

function tmp = code(x, y, z)
	tmp = y;
end

Wolfram

code[x_, y_, z_] := y

Derivation

1. Initial program 98.4%

   \[\left(1 - x\right) \cdot y + x \cdot z \]
2. Step-by-step derivation

   1. remove-double-neg 98.4%

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

   2. distribute-rgt-neg-out 98.4%

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

   3. neg-sub0 98.4%

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

   4. neg-sub0 98.4%

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

   5. *-commutative 98.4%

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

   6. distribute-lft-neg-in 98.4%

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

   7. remove-double-neg 98.4%

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

   8. distribute-rgt-out-- 98.4%

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

   9. *-lft-identity 98.4%

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

   10. associate-+l- 98.4%

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

   11. distribute-lft-out-- 100.0%

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

3. Simplified 100.0%

   \[\leadsto \color{blue}{y - x \cdot \left(y - z\right)} \]
4. Add Preprocessing

5. Taylor expanded in x around 0 35.3%

   \[\leadsto \color{blue}{y} \]
6. Add Preprocessing

Developer target: 100.0% accurate, 1.3× speedup

Math

\[\begin{array}{l} \\ y - x \cdot \left(y - z\right) \end{array} \]

FPCore

(FPCore (x y z) :precision binary64 (- y (* x (- y z))))

C

double code(double x, double y, double z) {
	return 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 = y - (x * (y - z))
end function

Java

public static double code(double x, double y, double z) {
	return y - (x * (y - z));
}

Python

def code(x, y, z):
	return y - (x * (y - z))

Julia

function code(x, y, z)
	return Float64(y - Float64(x * Float64(y - z)))
end

MATLAB

function tmp = code(x, y, z)
	tmp = y - (x * (y - z));
end

Wolfram

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

Reproduce

herbie shell --seed 2024083 
(FPCore (x y z)
  :name "Diagrams.Color.HSV:lerp  from diagrams-contrib-1.3.0.5"
  :precision binary64

  :alt
  (- y (* x (- y z)))

  (+ (* (- 1.0 x) y) (* x z)))