Diagrams.Solve.Polynomial:quartForm from diagrams-solve-0.1, C

Percentage Accurate: 97.6% → 97.6%

Time: 9.6s

Alternatives: 15

Speedup: 1.0×

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

Specification

Math

\[\begin{array}{l} \\ \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (+ (- (+ (* x y) (/ (* z t) 16.0)) (/ (* a b) 4.0)) c))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	return (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = (((x * y) + ((z * t) / 16.0d0)) - ((a * b) / 4.0d0)) + c
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	return (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c;
}

Python

def code(x, y, z, t, a, b, c):
	return (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c

Julia

function code(x, y, z, t, a, b, c)
	return Float64(Float64(Float64(Float64(x * y) + Float64(Float64(z * t) / 16.0)) - Float64(Float64(a * b) / 4.0)) + c)
end

MATLAB

function tmp = code(x, y, z, t, a, b, c)
	tmp = (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := N[(N[(N[(N[(x * y), $MachinePrecision] + N[(N[(z * t), $MachinePrecision] / 16.0), $MachinePrecision]), $MachinePrecision] - N[(N[(a * b), $MachinePrecision] / 4.0), $MachinePrecision]), $MachinePrecision] + c), $MachinePrecision]

Initial Program: 97.6% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (+ (- (+ (* x y) (/ (* z t) 16.0)) (/ (* a b) 4.0)) c))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	return (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = (((x * y) + ((z * t) / 16.0d0)) - ((a * b) / 4.0d0)) + c
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	return (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c;
}

Python

def code(x, y, z, t, a, b, c):
	return (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c

Julia

function code(x, y, z, t, a, b, c)
	return Float64(Float64(Float64(Float64(x * y) + Float64(Float64(z * t) / 16.0)) - Float64(Float64(a * b) / 4.0)) + c)
end

MATLAB

function tmp = code(x, y, z, t, a, b, c)
	tmp = (((x * y) + ((z * t) / 16.0)) - ((a * b) / 4.0)) + c;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := N[(N[(N[(N[(x * y), $MachinePrecision] + N[(N[(z * t), $MachinePrecision] / 16.0), $MachinePrecision]), $MachinePrecision] - N[(N[(a * b), $MachinePrecision] / 4.0), $MachinePrecision]), $MachinePrecision] + c), $MachinePrecision]

Alternative 1: 97.6% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \frac{a}{\frac{-4}{b}} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right) \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (+ (/ a (/ -4.0 b)) (+ (/ (* z t) 16.0) (+ (* x y) c))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	return (a / (-4.0 / b)) + (((z * t) / 16.0) + ((x * y) + c));
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = (a / ((-4.0d0) / b)) + (((z * t) / 16.0d0) + ((x * y) + c))
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	return (a / (-4.0 / b)) + (((z * t) / 16.0) + ((x * y) + c));
}

Python

def code(x, y, z, t, a, b, c):
	return (a / (-4.0 / b)) + (((z * t) / 16.0) + ((x * y) + c))

Julia

function code(x, y, z, t, a, b, c)
	return Float64(Float64(a / Float64(-4.0 / b)) + Float64(Float64(Float64(z * t) / 16.0) + Float64(Float64(x * y) + c)))
end

MATLAB

function tmp = code(x, y, z, t, a, b, c)
	tmp = (a / (-4.0 / b)) + (((z * t) / 16.0) + ((x * y) + c));
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := N[(N[(a / N[(-4.0 / b), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(z * t), $MachinePrecision] / 16.0), $MachinePrecision] + N[(N[(x * y), $MachinePrecision] + c), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 98.5%

   \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
2. Step-by-step derivation

   1. +-commutative N/A

      \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

   2. sub-neg N/A

      \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

   3. associate-+r+ N/A

      \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

   4. +-commutative N/A

      \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

   5. +-lowering-+.f64 N/A

      \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

   6. distribute-neg-frac2 N/A

      \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   7. /-lowering-/.f64 N/A

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   8. *-lowering-*.f64 N/A

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   9. metadata-eval N/A

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   10. associate-+r+ N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

   11. +-commutative N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

   12. +-lowering-+.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

   13. /-lowering-/.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

   14. *-lowering-*.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

   15. +-commutative N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

   16. +-lowering-+.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

   17. *-lowering-*.f64 98.5%

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

3. Simplified 98.5%

   \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
4. Add Preprocessing
5. Step-by-step derivation

   1. associate-/l* N/A

      \[\leadsto \mathsf{+.f64}\left(\left(a \cdot \frac{b}{-4}\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right)}, \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   2. clear-num N/A

      \[\leadsto \mathsf{+.f64}\left(\left(a \cdot \frac{1}{\frac{-4}{b}}\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), \color{blue}{16}\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. un-div-inv N/A

      \[\leadsto \mathsf{+.f64}\left(\left(\frac{a}{\frac{-4}{b}}\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right)}, \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   4. /-lowering-/.f64 N/A

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(a, \left(\frac{-4}{b}\right)\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right)}, \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   5. /-lowering-/.f64 98.8%

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(a, \mathsf{/.f64}\left(-4, b\right)\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), \color{blue}{16}\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

6. Applied egg-rr 98.8%

   \[\leadsto \color{blue}{\frac{a}{\frac{-4}{b}}} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right) \]
7. Add Preprocessing

Alternative 2: 66.6% accurate, 0.6× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_1 := 0.0625 \cdot \left(z \cdot t\right)\\ t_2 := x \cdot y + \frac{a \cdot b}{-4}\\ \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;t\_2\\ \mathbf{elif}\;a \cdot b \leq 5 \cdot 10^{-184}:\\ \;\;\;\;x \cdot y + t\_1\\ \mathbf{elif}\;a \cdot b \leq 0.005:\\ \;\;\;\;c + t\_1\\ \mathbf{else}:\\ \;\;\;\;t\_2\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (let* ((t_1 (* 0.0625 (* z t))) (t_2 (+ (* x y) (/ (* a b) -4.0))))
   (if (<= (* a b) -5e-43)
     t_2
     (if (<= (* a b) 5e-184)
       (+ (* x y) t_1)
       (if (<= (* a b) 0.005) (+ c t_1) t_2)))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = 0.0625 * (z * t);
	double t_2 = (x * y) + ((a * b) / -4.0);
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = t_2;
	} else if ((a * b) <= 5e-184) {
		tmp = (x * y) + t_1;
	} else if ((a * b) <= 0.005) {
		tmp = c + t_1;
	} else {
		tmp = t_2;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_1
    real(8) :: t_2
    real(8) :: tmp
    t_1 = 0.0625d0 * (z * t)
    t_2 = (x * y) + ((a * b) / (-4.0d0))
    if ((a * b) <= (-5d-43)) then
        tmp = t_2
    else if ((a * b) <= 5d-184) then
        tmp = (x * y) + t_1
    else if ((a * b) <= 0.005d0) then
        tmp = c + t_1
    else
        tmp = t_2
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = 0.0625 * (z * t);
	double t_2 = (x * y) + ((a * b) / -4.0);
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = t_2;
	} else if ((a * b) <= 5e-184) {
		tmp = (x * y) + t_1;
	} else if ((a * b) <= 0.005) {
		tmp = c + t_1;
	} else {
		tmp = t_2;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	t_1 = 0.0625 * (z * t)
	t_2 = (x * y) + ((a * b) / -4.0)
	tmp = 0
	if (a * b) <= -5e-43:
		tmp = t_2
	elif (a * b) <= 5e-184:
		tmp = (x * y) + t_1
	elif (a * b) <= 0.005:
		tmp = c + t_1
	else:
		tmp = t_2
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	t_1 = Float64(0.0625 * Float64(z * t))
	t_2 = Float64(Float64(x * y) + Float64(Float64(a * b) / -4.0))
	tmp = 0.0
	if (Float64(a * b) <= -5e-43)
		tmp = t_2;
	elseif (Float64(a * b) <= 5e-184)
		tmp = Float64(Float64(x * y) + t_1);
	elseif (Float64(a * b) <= 0.005)
		tmp = Float64(c + t_1);
	else
		tmp = t_2;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	t_1 = 0.0625 * (z * t);
	t_2 = (x * y) + ((a * b) / -4.0);
	tmp = 0.0;
	if ((a * b) <= -5e-43)
		tmp = t_2;
	elseif ((a * b) <= 5e-184)
		tmp = (x * y) + t_1;
	elseif ((a * b) <= 0.005)
		tmp = c + t_1;
	else
		tmp = t_2;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := Block[{t$95$1 = N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(x * y), $MachinePrecision] + N[(N[(a * b), $MachinePrecision] / -4.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(a * b), $MachinePrecision], -5e-43], t$95$2, If[LessEqual[N[(a * b), $MachinePrecision], 5e-184], N[(N[(x * y), $MachinePrecision] + t$95$1), $MachinePrecision], If[LessEqual[N[(a * b), $MachinePrecision], 0.005], N[(c + t$95$1), $MachinePrecision], t$95$2]]]]]

Derivation

1. Split input into 3 regimes

2. if (*.f64 a b) < -5.00000000000000019e-43 or 0.0050000000000000001 < (*.f64 a b)

   1. Initial program 97.4%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.4%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.4%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \color{blue}{\left(x \cdot y\right)}\right) \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 72.5%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right) \]

   7. Simplified 72.5%

      \[\leadsto \frac{a \cdot b}{-4} + \color{blue}{x \cdot y} \]

   if -5.00000000000000019e-43 < (*.f64 a b) < 5.00000000000000003e-184

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 100.0%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 100.0%

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

   8. Taylor expanded in c around 0

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

      1. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(x \cdot y\right)}\right) \]

      2. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{x} \cdot y\right)\right) \]

      3. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(x \cdot y\right)\right) \]

      4. *-lowering-*.f64 78.5%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right) \]

   10. Simplified 78.5%

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

   if 5.00000000000000003e-184 < (*.f64 a b) < 0.0050000000000000001

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 96.5%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 96.5%

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

   8. Taylor expanded in c around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \color{blue}{c}\right) \]
   9. Step-by-step derivation

   10. Simplified 74.8%

       \[\leadsto 0.0625 \cdot \left(t \cdot z\right) + \color{blue}{c} \]
3. Recombined 3 regimes into one program.

4. Final simplification 74.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;x \cdot y + \frac{a \cdot b}{-4}\\ \mathbf{elif}\;a \cdot b \leq 5 \cdot 10^{-184}:\\ \;\;\;\;x \cdot y + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{elif}\;a \cdot b \leq 0.005:\\ \;\;\;\;c + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;x \cdot y + \frac{a \cdot b}{-4}\\ \end{array} \]
5. Add Preprocessing

Alternative 3: 62.7% accurate, 0.6× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \cdot b \leq -1 \cdot 10^{+238}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{elif}\;a \cdot b \leq -1 \cdot 10^{-53}:\\ \;\;\;\;x \cdot y + c\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{+163}:\\ \;\;\;\;c + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;a \cdot \frac{b}{-4}\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (if (<= (* a b) -1e+238)
   (* (* a b) -0.25)
   (if (<= (* a b) -1e-53)
     (+ (* x y) c)
     (if (<= (* a b) 2e+163) (+ c (* 0.0625 (* z t))) (* a (/ b -4.0))))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((a * b) <= -1e+238) {
		tmp = (a * b) * -0.25;
	} else if ((a * b) <= -1e-53) {
		tmp = (x * y) + c;
	} else if ((a * b) <= 2e+163) {
		tmp = c + (0.0625 * (z * t));
	} else {
		tmp = a * (b / -4.0);
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: tmp
    if ((a * b) <= (-1d+238)) then
        tmp = (a * b) * (-0.25d0)
    else if ((a * b) <= (-1d-53)) then
        tmp = (x * y) + c
    else if ((a * b) <= 2d+163) then
        tmp = c + (0.0625d0 * (z * t))
    else
        tmp = a * (b / (-4.0d0))
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((a * b) <= -1e+238) {
		tmp = (a * b) * -0.25;
	} else if ((a * b) <= -1e-53) {
		tmp = (x * y) + c;
	} else if ((a * b) <= 2e+163) {
		tmp = c + (0.0625 * (z * t));
	} else {
		tmp = a * (b / -4.0);
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	tmp = 0
	if (a * b) <= -1e+238:
		tmp = (a * b) * -0.25
	elif (a * b) <= -1e-53:
		tmp = (x * y) + c
	elif (a * b) <= 2e+163:
		tmp = c + (0.0625 * (z * t))
	else:
		tmp = a * (b / -4.0)
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	tmp = 0.0
	if (Float64(a * b) <= -1e+238)
		tmp = Float64(Float64(a * b) * -0.25);
	elseif (Float64(a * b) <= -1e-53)
		tmp = Float64(Float64(x * y) + c);
	elseif (Float64(a * b) <= 2e+163)
		tmp = Float64(c + Float64(0.0625 * Float64(z * t)));
	else
		tmp = Float64(a * Float64(b / -4.0));
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	tmp = 0.0;
	if ((a * b) <= -1e+238)
		tmp = (a * b) * -0.25;
	elseif ((a * b) <= -1e-53)
		tmp = (x * y) + c;
	elseif ((a * b) <= 2e+163)
		tmp = c + (0.0625 * (z * t));
	else
		tmp = a * (b / -4.0);
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := If[LessEqual[N[(a * b), $MachinePrecision], -1e+238], N[(N[(a * b), $MachinePrecision] * -0.25), $MachinePrecision], If[LessEqual[N[(a * b), $MachinePrecision], -1e-53], N[(N[(x * y), $MachinePrecision] + c), $MachinePrecision], If[LessEqual[N[(a * b), $MachinePrecision], 2e+163], N[(c + N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(a * N[(b / -4.0), $MachinePrecision]), $MachinePrecision]]]]

Derivation

1. Split input into 4 regimes

2. if (*.f64 a b) < -1e238

   1. Initial program 90.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 90.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 90.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 90.3%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 90.3%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]

   if -1e238 < (*.f64 a b) < -1.00000000000000003e-53

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 71.3%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 71.3%

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

   8. Taylor expanded in t around 0

      \[\leadsto \color{blue}{c + x \cdot y} \]
   9. Step-by-step derivation

      1. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right) \]

      2. *-lowering-*.f64 59.2%

         \[\leadsto \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right) \]

   10. Simplified 59.2%

       \[\leadsto \color{blue}{c + x \cdot y} \]

   if -1.00000000000000003e-53 < (*.f64 a b) < 1.9999999999999999e163

   1. Initial program 99.3%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 99.3%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 99.3%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 91.2%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 91.2%

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

   8. Taylor expanded in c around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \color{blue}{c}\right) \]
   9. Step-by-step derivation

   10. Simplified 61.8%

       \[\leadsto 0.0625 \cdot \left(t \cdot z\right) + \color{blue}{c} \]

   if 1.9999999999999999e163 < (*.f64 a b)

   1. Initial program 97.7%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.7%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.7%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 86.6%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 86.6%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]
   8. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \frac{-1}{4} \cdot \left(b \cdot \color{blue}{a}\right) \]

      2. associate-*r* N/A

         \[\leadsto \left(\frac{-1}{4} \cdot b\right) \cdot \color{blue}{a} \]

      3. metadata-eval N/A

         \[\leadsto \left(\frac{1}{-4} \cdot b\right) \cdot a \]

      4. associate-/r/ N/A

         \[\leadsto \frac{1}{\frac{-4}{b}} \cdot a \]

      5. clear-num N/A

         \[\leadsto \frac{b}{-4} \cdot a \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\left(\frac{b}{-4}\right), \color{blue}{a}\right) \]

      7. /-lowering-/.f64 88.8%

         \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(b, -4\right), a\right) \]

   9. Applied egg-rr 88.8%

      \[\leadsto \color{blue}{\frac{b}{-4} \cdot a} \]
3. Recombined 4 regimes into one program.

4. Final simplification 67.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -1 \cdot 10^{+238}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{elif}\;a \cdot b \leq -1 \cdot 10^{-53}:\\ \;\;\;\;x \cdot y + c\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{+163}:\\ \;\;\;\;c + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;a \cdot \frac{b}{-4}\\ \end{array} \]
5. Add Preprocessing

Alternative 4: 86.9% accurate, 0.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_1 := x \cdot y + c\\ t_2 := \frac{a \cdot b}{-4} + t\_1\\ \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;t\_2\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{-32}:\\ \;\;\;\;t\_1 + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;t\_2\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (let* ((t_1 (+ (* x y) c)) (t_2 (+ (/ (* a b) -4.0) t_1)))
   (if (<= (* a b) -5e-43)
     t_2
     (if (<= (* a b) 2e-32) (+ t_1 (* 0.0625 (* z t))) t_2))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = (x * y) + c;
	double t_2 = ((a * b) / -4.0) + t_1;
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = t_2;
	} else if ((a * b) <= 2e-32) {
		tmp = t_1 + (0.0625 * (z * t));
	} else {
		tmp = t_2;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_1
    real(8) :: t_2
    real(8) :: tmp
    t_1 = (x * y) + c
    t_2 = ((a * b) / (-4.0d0)) + t_1
    if ((a * b) <= (-5d-43)) then
        tmp = t_2
    else if ((a * b) <= 2d-32) then
        tmp = t_1 + (0.0625d0 * (z * t))
    else
        tmp = t_2
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = (x * y) + c;
	double t_2 = ((a * b) / -4.0) + t_1;
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = t_2;
	} else if ((a * b) <= 2e-32) {
		tmp = t_1 + (0.0625 * (z * t));
	} else {
		tmp = t_2;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	t_1 = (x * y) + c
	t_2 = ((a * b) / -4.0) + t_1
	tmp = 0
	if (a * b) <= -5e-43:
		tmp = t_2
	elif (a * b) <= 2e-32:
		tmp = t_1 + (0.0625 * (z * t))
	else:
		tmp = t_2
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	t_1 = Float64(Float64(x * y) + c)
	t_2 = Float64(Float64(Float64(a * b) / -4.0) + t_1)
	tmp = 0.0
	if (Float64(a * b) <= -5e-43)
		tmp = t_2;
	elseif (Float64(a * b) <= 2e-32)
		tmp = Float64(t_1 + Float64(0.0625 * Float64(z * t)));
	else
		tmp = t_2;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	t_1 = (x * y) + c;
	t_2 = ((a * b) / -4.0) + t_1;
	tmp = 0.0;
	if ((a * b) <= -5e-43)
		tmp = t_2;
	elseif ((a * b) <= 2e-32)
		tmp = t_1 + (0.0625 * (z * t));
	else
		tmp = t_2;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := Block[{t$95$1 = N[(N[(x * y), $MachinePrecision] + c), $MachinePrecision]}, Block[{t$95$2 = N[(N[(N[(a * b), $MachinePrecision] / -4.0), $MachinePrecision] + t$95$1), $MachinePrecision]}, If[LessEqual[N[(a * b), $MachinePrecision], -5e-43], t$95$2, If[LessEqual[N[(a * b), $MachinePrecision], 2e-32], N[(t$95$1 + N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$2]]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 a b) < -5.00000000000000019e-43 or 2.00000000000000011e-32 < (*.f64 a b)

   1. Initial program 97.4%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.4%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.4%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in z around 0

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]
   6. Step-by-step derivation

      1. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      2. *-lowering-*.f64 87.6%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 87.6%

      \[\leadsto \frac{a \cdot b}{-4} + \color{blue}{\left(c + x \cdot y\right)} \]

   if -5.00000000000000019e-43 < (*.f64 a b) < 2.00000000000000011e-32

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 100.0%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 100.0%

      \[\leadsto \color{blue}{0.0625 \cdot \left(t \cdot z\right) + \left(c + x \cdot y\right)} \]
3. Recombined 2 regimes into one program.

4. Final simplification 92.8%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;\frac{a \cdot b}{-4} + \left(x \cdot y + c\right)\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{-32}:\\ \;\;\;\;\left(x \cdot y + c\right) + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{a \cdot b}{-4} + \left(x \cdot y + c\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 5: 86.4% accurate, 0.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_1 := 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{+223}:\\ \;\;\;\;c + \frac{a \cdot b}{-4}\\ \mathbf{elif}\;a \cdot b \leq 10^{+132}:\\ \;\;\;\;\left(x \cdot y + c\right) + t\_1\\ \mathbf{else}:\\ \;\;\;\;\frac{a}{\frac{-4}{b}} + t\_1\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (let* ((t_1 (* 0.0625 (* z t))))
   (if (<= (* a b) -5e+223)
     (+ c (/ (* a b) -4.0))
     (if (<= (* a b) 1e+132) (+ (+ (* x y) c) t_1) (+ (/ a (/ -4.0 b)) t_1)))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = 0.0625 * (z * t);
	double tmp;
	if ((a * b) <= -5e+223) {
		tmp = c + ((a * b) / -4.0);
	} else if ((a * b) <= 1e+132) {
		tmp = ((x * y) + c) + t_1;
	} else {
		tmp = (a / (-4.0 / b)) + t_1;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_1
    real(8) :: tmp
    t_1 = 0.0625d0 * (z * t)
    if ((a * b) <= (-5d+223)) then
        tmp = c + ((a * b) / (-4.0d0))
    else if ((a * b) <= 1d+132) then
        tmp = ((x * y) + c) + t_1
    else
        tmp = (a / ((-4.0d0) / b)) + t_1
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = 0.0625 * (z * t);
	double tmp;
	if ((a * b) <= -5e+223) {
		tmp = c + ((a * b) / -4.0);
	} else if ((a * b) <= 1e+132) {
		tmp = ((x * y) + c) + t_1;
	} else {
		tmp = (a / (-4.0 / b)) + t_1;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	t_1 = 0.0625 * (z * t)
	tmp = 0
	if (a * b) <= -5e+223:
		tmp = c + ((a * b) / -4.0)
	elif (a * b) <= 1e+132:
		tmp = ((x * y) + c) + t_1
	else:
		tmp = (a / (-4.0 / b)) + t_1
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	t_1 = Float64(0.0625 * Float64(z * t))
	tmp = 0.0
	if (Float64(a * b) <= -5e+223)
		tmp = Float64(c + Float64(Float64(a * b) / -4.0));
	elseif (Float64(a * b) <= 1e+132)
		tmp = Float64(Float64(Float64(x * y) + c) + t_1);
	else
		tmp = Float64(Float64(a / Float64(-4.0 / b)) + t_1);
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	t_1 = 0.0625 * (z * t);
	tmp = 0.0;
	if ((a * b) <= -5e+223)
		tmp = c + ((a * b) / -4.0);
	elseif ((a * b) <= 1e+132)
		tmp = ((x * y) + c) + t_1;
	else
		tmp = (a / (-4.0 / b)) + t_1;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := Block[{t$95$1 = N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(a * b), $MachinePrecision], -5e+223], N[(c + N[(N[(a * b), $MachinePrecision] / -4.0), $MachinePrecision]), $MachinePrecision], If[LessEqual[N[(a * b), $MachinePrecision], 1e+132], N[(N[(N[(x * y), $MachinePrecision] + c), $MachinePrecision] + t$95$1), $MachinePrecision], N[(N[(a / N[(-4.0 / b), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision]]]]

Derivation

1. Split input into 3 regimes

2. if (*.f64 a b) < -4.99999999999999985e223

   1. Initial program 90.9%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 90.9%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 90.9%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in c around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \color{blue}{c}\right) \]
   6. Step-by-step derivation

   7. Simplified 91.2%

      \[\leadsto \frac{a \cdot b}{-4} + \color{blue}{c} \]

   if -4.99999999999999985e223 < (*.f64 a b) < 9.99999999999999991e131

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 87.0%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 87.0%

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

   if 9.99999999999999991e131 < (*.f64 a b)

   1. Initial program 95.6%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 95.6%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 95.6%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing
   5. Step-by-step derivation

      1. associate-/l* N/A

         \[\leadsto \mathsf{+.f64}\left(\left(a \cdot \frac{b}{-4}\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right)}, \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

      2. clear-num N/A

         \[\leadsto \mathsf{+.f64}\left(\left(a \cdot \frac{1}{\frac{-4}{b}}\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), \color{blue}{16}\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

      3. un-div-inv N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a}{\frac{-4}{b}}\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right)}, \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

      4. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(a, \left(\frac{-4}{b}\right)\right), \mathsf{+.f64}\left(\color{blue}{\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right)}, \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

      5. /-lowering-/.f64 97.4%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(a, \mathsf{/.f64}\left(-4, b\right)\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), \color{blue}{16}\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   6. Applied egg-rr 97.4%

      \[\leadsto \color{blue}{\frac{a}{\frac{-4}{b}}} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right) \]

   7. Taylor expanded in z around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(a, \mathsf{/.f64}\left(-4, b\right)\right), \color{blue}{\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right)}\right) \]
   8. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(a, \mathsf{/.f64}\left(-4, b\right)\right), \mathsf{*.f64}\left(\frac{1}{16}, \color{blue}{\left(t \cdot z\right)}\right)\right) \]

      2. *-lowering-*.f64 90.3%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(a, \mathsf{/.f64}\left(-4, b\right)\right), \mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, \color{blue}{z}\right)\right)\right) \]

   9. Simplified 90.3%

      \[\leadsto \frac{a}{\frac{-4}{b}} + \color{blue}{0.0625 \cdot \left(t \cdot z\right)} \]
3. Recombined 3 regimes into one program.

4. Final simplification 87.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{+223}:\\ \;\;\;\;c + \frac{a \cdot b}{-4}\\ \mathbf{elif}\;a \cdot b \leq 10^{+132}:\\ \;\;\;\;\left(x \cdot y + c\right) + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{a}{\frac{-4}{b}} + 0.0625 \cdot \left(z \cdot t\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 6: 86.8% accurate, 0.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_1 := \frac{a \cdot b}{-4}\\ \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{+223}:\\ \;\;\;\;c + t\_1\\ \mathbf{elif}\;a \cdot b \leq 10^{+141}:\\ \;\;\;\;\left(x \cdot y + c\right) + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;x \cdot y + t\_1\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (let* ((t_1 (/ (* a b) -4.0)))
   (if (<= (* a b) -5e+223)
     (+ c t_1)
     (if (<= (* a b) 1e+141)
       (+ (+ (* x y) c) (* 0.0625 (* z t)))
       (+ (* x y) t_1)))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = (a * b) / -4.0;
	double tmp;
	if ((a * b) <= -5e+223) {
		tmp = c + t_1;
	} else if ((a * b) <= 1e+141) {
		tmp = ((x * y) + c) + (0.0625 * (z * t));
	} else {
		tmp = (x * y) + t_1;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_1
    real(8) :: tmp
    t_1 = (a * b) / (-4.0d0)
    if ((a * b) <= (-5d+223)) then
        tmp = c + t_1
    else if ((a * b) <= 1d+141) then
        tmp = ((x * y) + c) + (0.0625d0 * (z * t))
    else
        tmp = (x * y) + t_1
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = (a * b) / -4.0;
	double tmp;
	if ((a * b) <= -5e+223) {
		tmp = c + t_1;
	} else if ((a * b) <= 1e+141) {
		tmp = ((x * y) + c) + (0.0625 * (z * t));
	} else {
		tmp = (x * y) + t_1;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	t_1 = (a * b) / -4.0
	tmp = 0
	if (a * b) <= -5e+223:
		tmp = c + t_1
	elif (a * b) <= 1e+141:
		tmp = ((x * y) + c) + (0.0625 * (z * t))
	else:
		tmp = (x * y) + t_1
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	t_1 = Float64(Float64(a * b) / -4.0)
	tmp = 0.0
	if (Float64(a * b) <= -5e+223)
		tmp = Float64(c + t_1);
	elseif (Float64(a * b) <= 1e+141)
		tmp = Float64(Float64(Float64(x * y) + c) + Float64(0.0625 * Float64(z * t)));
	else
		tmp = Float64(Float64(x * y) + t_1);
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	t_1 = (a * b) / -4.0;
	tmp = 0.0;
	if ((a * b) <= -5e+223)
		tmp = c + t_1;
	elseif ((a * b) <= 1e+141)
		tmp = ((x * y) + c) + (0.0625 * (z * t));
	else
		tmp = (x * y) + t_1;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := Block[{t$95$1 = N[(N[(a * b), $MachinePrecision] / -4.0), $MachinePrecision]}, If[LessEqual[N[(a * b), $MachinePrecision], -5e+223], N[(c + t$95$1), $MachinePrecision], If[LessEqual[N[(a * b), $MachinePrecision], 1e+141], N[(N[(N[(x * y), $MachinePrecision] + c), $MachinePrecision] + N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(x * y), $MachinePrecision] + t$95$1), $MachinePrecision]]]]

Derivation

1. Split input into 3 regimes

2. if (*.f64 a b) < -4.99999999999999985e223

   1. Initial program 90.9%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 90.9%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 90.9%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in c around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \color{blue}{c}\right) \]
   6. Step-by-step derivation

   7. Simplified 91.2%

      \[\leadsto \frac{a \cdot b}{-4} + \color{blue}{c} \]

   if -4.99999999999999985e223 < (*.f64 a b) < 1.00000000000000002e141

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 87.1%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 87.1%

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

   if 1.00000000000000002e141 < (*.f64 a b)

   1. Initial program 95.5%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 95.5%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 95.5%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \color{blue}{\left(x \cdot y\right)}\right) \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 88.6%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right) \]

   7. Simplified 88.6%

      \[\leadsto \frac{a \cdot b}{-4} + \color{blue}{x \cdot y} \]
3. Recombined 3 regimes into one program.

4. Final simplification 87.7%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{+223}:\\ \;\;\;\;c + \frac{a \cdot b}{-4}\\ \mathbf{elif}\;a \cdot b \leq 10^{+141}:\\ \;\;\;\;\left(x \cdot y + c\right) + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;x \cdot y + \frac{a \cdot b}{-4}\\ \end{array} \]
5. Add Preprocessing

Alternative 7: 64.8% accurate, 0.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_1 := c + \frac{a \cdot b}{-4}\\ \mathbf{if}\;a \cdot b \leq -5:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{-32}:\\ \;\;\;\;x \cdot y + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;t\_1\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (let* ((t_1 (+ c (/ (* a b) -4.0))))
   (if (<= (* a b) -5.0)
     t_1
     (if (<= (* a b) 2e-32) (+ (* x y) (* 0.0625 (* z t))) t_1))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = c + ((a * b) / -4.0);
	double tmp;
	if ((a * b) <= -5.0) {
		tmp = t_1;
	} else if ((a * b) <= 2e-32) {
		tmp = (x * y) + (0.0625 * (z * t));
	} else {
		tmp = t_1;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_1
    real(8) :: tmp
    t_1 = c + ((a * b) / (-4.0d0))
    if ((a * b) <= (-5.0d0)) then
        tmp = t_1
    else if ((a * b) <= 2d-32) then
        tmp = (x * y) + (0.0625d0 * (z * t))
    else
        tmp = t_1
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = c + ((a * b) / -4.0);
	double tmp;
	if ((a * b) <= -5.0) {
		tmp = t_1;
	} else if ((a * b) <= 2e-32) {
		tmp = (x * y) + (0.0625 * (z * t));
	} else {
		tmp = t_1;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	t_1 = c + ((a * b) / -4.0)
	tmp = 0
	if (a * b) <= -5.0:
		tmp = t_1
	elif (a * b) <= 2e-32:
		tmp = (x * y) + (0.0625 * (z * t))
	else:
		tmp = t_1
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	t_1 = Float64(c + Float64(Float64(a * b) / -4.0))
	tmp = 0.0
	if (Float64(a * b) <= -5.0)
		tmp = t_1;
	elseif (Float64(a * b) <= 2e-32)
		tmp = Float64(Float64(x * y) + Float64(0.0625 * Float64(z * t)));
	else
		tmp = t_1;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	t_1 = c + ((a * b) / -4.0);
	tmp = 0.0;
	if ((a * b) <= -5.0)
		tmp = t_1;
	elseif ((a * b) <= 2e-32)
		tmp = (x * y) + (0.0625 * (z * t));
	else
		tmp = t_1;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := Block[{t$95$1 = N[(c + N[(N[(a * b), $MachinePrecision] / -4.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(a * b), $MachinePrecision], -5.0], t$95$1, If[LessEqual[N[(a * b), $MachinePrecision], 2e-32], N[(N[(x * y), $MachinePrecision] + N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 a b) < -5 or 2.00000000000000011e-32 < (*.f64 a b)

   1. Initial program 97.3%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.3%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.3%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in c around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \color{blue}{c}\right) \]
   6. Step-by-step derivation

   7. Simplified 70.7%

      \[\leadsto \frac{a \cdot b}{-4} + \color{blue}{c} \]

   if -5 < (*.f64 a b) < 2.00000000000000011e-32

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 98.3%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 98.3%

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

   8. Taylor expanded in c around 0

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

      1. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(x \cdot y\right)}\right) \]

      2. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{x} \cdot y\right)\right) \]

      3. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(x \cdot y\right)\right) \]

      4. *-lowering-*.f64 74.3%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right) \]

   10. Simplified 74.3%

       \[\leadsto \color{blue}{0.0625 \cdot \left(t \cdot z\right) + x \cdot y} \]
3. Recombined 2 regimes into one program.

4. Final simplification 72.3%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5:\\ \;\;\;\;c + \frac{a \cdot b}{-4}\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{-32}:\\ \;\;\;\;x \cdot y + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;c + \frac{a \cdot b}{-4}\\ \end{array} \]
5. Add Preprocessing

Alternative 8: 62.7% accurate, 0.8× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_1 := c + \frac{a \cdot b}{-4}\\ \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{-32}:\\ \;\;\;\;c + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;t\_1\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (let* ((t_1 (+ c (/ (* a b) -4.0))))
   (if (<= (* a b) -5e-43)
     t_1
     (if (<= (* a b) 2e-32) (+ c (* 0.0625 (* z t))) t_1))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = c + ((a * b) / -4.0);
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = t_1;
	} else if ((a * b) <= 2e-32) {
		tmp = c + (0.0625 * (z * t));
	} else {
		tmp = t_1;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_1
    real(8) :: tmp
    t_1 = c + ((a * b) / (-4.0d0))
    if ((a * b) <= (-5d-43)) then
        tmp = t_1
    else if ((a * b) <= 2d-32) then
        tmp = c + (0.0625d0 * (z * t))
    else
        tmp = t_1
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = c + ((a * b) / -4.0);
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = t_1;
	} else if ((a * b) <= 2e-32) {
		tmp = c + (0.0625 * (z * t));
	} else {
		tmp = t_1;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	t_1 = c + ((a * b) / -4.0)
	tmp = 0
	if (a * b) <= -5e-43:
		tmp = t_1
	elif (a * b) <= 2e-32:
		tmp = c + (0.0625 * (z * t))
	else:
		tmp = t_1
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	t_1 = Float64(c + Float64(Float64(a * b) / -4.0))
	tmp = 0.0
	if (Float64(a * b) <= -5e-43)
		tmp = t_1;
	elseif (Float64(a * b) <= 2e-32)
		tmp = Float64(c + Float64(0.0625 * Float64(z * t)));
	else
		tmp = t_1;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	t_1 = c + ((a * b) / -4.0);
	tmp = 0.0;
	if ((a * b) <= -5e-43)
		tmp = t_1;
	elseif ((a * b) <= 2e-32)
		tmp = c + (0.0625 * (z * t));
	else
		tmp = t_1;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := Block[{t$95$1 = N[(c + N[(N[(a * b), $MachinePrecision] / -4.0), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(a * b), $MachinePrecision], -5e-43], t$95$1, If[LessEqual[N[(a * b), $MachinePrecision], 2e-32], N[(c + N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 a b) < -5.00000000000000019e-43 or 2.00000000000000011e-32 < (*.f64 a b)

   1. Initial program 97.4%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.4%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.4%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in c around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \color{blue}{c}\right) \]
   6. Step-by-step derivation

   7. Simplified 68.9%

      \[\leadsto \frac{a \cdot b}{-4} + \color{blue}{c} \]

   if -5.00000000000000019e-43 < (*.f64 a b) < 2.00000000000000011e-32

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 100.0%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 100.0%

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

   8. Taylor expanded in c around inf

      \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \color{blue}{c}\right) \]
   9. Step-by-step derivation

   10. Simplified 67.1%

       \[\leadsto 0.0625 \cdot \left(t \cdot z\right) + \color{blue}{c} \]
3. Recombined 2 regimes into one program.

4. Final simplification 68.2%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;c + \frac{a \cdot b}{-4}\\ \mathbf{elif}\;a \cdot b \leq 2 \cdot 10^{-32}:\\ \;\;\;\;c + 0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;c + \frac{a \cdot b}{-4}\\ \end{array} \]
5. Add Preprocessing

Alternative 9: 62.5% accurate, 0.9× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \cdot b \leq -1 \cdot 10^{+238}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{elif}\;a \cdot b \leq 10^{+132}:\\ \;\;\;\;x \cdot y + c\\ \mathbf{else}:\\ \;\;\;\;a \cdot \frac{b}{-4}\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (if (<= (* a b) -1e+238)
   (* (* a b) -0.25)
   (if (<= (* a b) 1e+132) (+ (* x y) c) (* a (/ b -4.0)))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((a * b) <= -1e+238) {
		tmp = (a * b) * -0.25;
	} else if ((a * b) <= 1e+132) {
		tmp = (x * y) + c;
	} else {
		tmp = a * (b / -4.0);
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: tmp
    if ((a * b) <= (-1d+238)) then
        tmp = (a * b) * (-0.25d0)
    else if ((a * b) <= 1d+132) then
        tmp = (x * y) + c
    else
        tmp = a * (b / (-4.0d0))
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((a * b) <= -1e+238) {
		tmp = (a * b) * -0.25;
	} else if ((a * b) <= 1e+132) {
		tmp = (x * y) + c;
	} else {
		tmp = a * (b / -4.0);
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	tmp = 0
	if (a * b) <= -1e+238:
		tmp = (a * b) * -0.25
	elif (a * b) <= 1e+132:
		tmp = (x * y) + c
	else:
		tmp = a * (b / -4.0)
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	tmp = 0.0
	if (Float64(a * b) <= -1e+238)
		tmp = Float64(Float64(a * b) * -0.25);
	elseif (Float64(a * b) <= 1e+132)
		tmp = Float64(Float64(x * y) + c);
	else
		tmp = Float64(a * Float64(b / -4.0));
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	tmp = 0.0;
	if ((a * b) <= -1e+238)
		tmp = (a * b) * -0.25;
	elseif ((a * b) <= 1e+132)
		tmp = (x * y) + c;
	else
		tmp = a * (b / -4.0);
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := If[LessEqual[N[(a * b), $MachinePrecision], -1e+238], N[(N[(a * b), $MachinePrecision] * -0.25), $MachinePrecision], If[LessEqual[N[(a * b), $MachinePrecision], 1e+132], N[(N[(x * y), $MachinePrecision] + c), $MachinePrecision], N[(a * N[(b / -4.0), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if (*.f64 a b) < -1e238

   1. Initial program 90.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 90.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 90.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 90.3%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 90.3%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]

   if -1e238 < (*.f64 a b) < 9.99999999999999991e131

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around 0

      \[\leadsto \color{blue}{c + \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right)} \]
   6. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \left(\frac{1}{16} \cdot \left(t \cdot z\right) + x \cdot y\right) + \color{blue}{c} \]

      2. associate-+l+ N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \color{blue}{\left(x \cdot y + c\right)} \]

      3. +-commutative N/A

         \[\leadsto \frac{1}{16} \cdot \left(t \cdot z\right) + \left(c + \color{blue}{x \cdot y}\right) \]

      4. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{1}{16} \cdot \left(t \cdot z\right)\right), \color{blue}{\left(c + x \cdot y\right)}\right) \]

      5. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \left(t \cdot z\right)\right), \left(\color{blue}{c} + x \cdot y\right)\right) \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \left(c + x \cdot y\right)\right) \]

      7. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right)\right) \]

      8. *-lowering-*.f64 86.6%

         \[\leadsto \mathsf{+.f64}\left(\mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, z\right)\right), \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right)\right) \]

   7. Simplified 86.6%

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

   8. Taylor expanded in t around 0

      \[\leadsto \color{blue}{c + x \cdot y} \]
   9. Step-by-step derivation

      1. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(c, \color{blue}{\left(x \cdot y\right)}\right) \]

      2. *-lowering-*.f64 57.9%

         \[\leadsto \mathsf{+.f64}\left(c, \mathsf{*.f64}\left(x, \color{blue}{y}\right)\right) \]

   10. Simplified 57.9%

       \[\leadsto \color{blue}{c + x \cdot y} \]

   if 9.99999999999999991e131 < (*.f64 a b)

   1. Initial program 95.6%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 95.6%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 95.6%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 79.4%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 79.4%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]
   8. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \frac{-1}{4} \cdot \left(b \cdot \color{blue}{a}\right) \]

      2. associate-*r* N/A

         \[\leadsto \left(\frac{-1}{4} \cdot b\right) \cdot \color{blue}{a} \]

      3. metadata-eval N/A

         \[\leadsto \left(\frac{1}{-4} \cdot b\right) \cdot a \]

      4. associate-/r/ N/A

         \[\leadsto \frac{1}{\frac{-4}{b}} \cdot a \]

      5. clear-num N/A

         \[\leadsto \frac{b}{-4} \cdot a \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\left(\frac{b}{-4}\right), \color{blue}{a}\right) \]

      7. /-lowering-/.f64 81.3%

         \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(b, -4\right), a\right) \]

   9. Applied egg-rr 81.3%

      \[\leadsto \color{blue}{\frac{b}{-4} \cdot a} \]
3. Recombined 3 regimes into one program.

4. Final simplification 64.2%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -1 \cdot 10^{+238}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{elif}\;a \cdot b \leq 10^{+132}:\\ \;\;\;\;x \cdot y + c\\ \mathbf{else}:\\ \;\;\;\;a \cdot \frac{b}{-4}\\ \end{array} \]
5. Add Preprocessing

Alternative 10: 42.5% accurate, 0.9× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{elif}\;a \cdot b \leq 5 \cdot 10^{-31}:\\ \;\;\;\;0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;a \cdot \frac{b}{-4}\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (if (<= (* a b) -5e-43)
   (* (* a b) -0.25)
   (if (<= (* a b) 5e-31) (* 0.0625 (* z t)) (* a (/ b -4.0)))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = (a * b) * -0.25;
	} else if ((a * b) <= 5e-31) {
		tmp = 0.0625 * (z * t);
	} else {
		tmp = a * (b / -4.0);
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: tmp
    if ((a * b) <= (-5d-43)) then
        tmp = (a * b) * (-0.25d0)
    else if ((a * b) <= 5d-31) then
        tmp = 0.0625d0 * (z * t)
    else
        tmp = a * (b / (-4.0d0))
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((a * b) <= -5e-43) {
		tmp = (a * b) * -0.25;
	} else if ((a * b) <= 5e-31) {
		tmp = 0.0625 * (z * t);
	} else {
		tmp = a * (b / -4.0);
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	tmp = 0
	if (a * b) <= -5e-43:
		tmp = (a * b) * -0.25
	elif (a * b) <= 5e-31:
		tmp = 0.0625 * (z * t)
	else:
		tmp = a * (b / -4.0)
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	tmp = 0.0
	if (Float64(a * b) <= -5e-43)
		tmp = Float64(Float64(a * b) * -0.25);
	elseif (Float64(a * b) <= 5e-31)
		tmp = Float64(0.0625 * Float64(z * t));
	else
		tmp = Float64(a * Float64(b / -4.0));
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	tmp = 0.0;
	if ((a * b) <= -5e-43)
		tmp = (a * b) * -0.25;
	elseif ((a * b) <= 5e-31)
		tmp = 0.0625 * (z * t);
	else
		tmp = a * (b / -4.0);
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := If[LessEqual[N[(a * b), $MachinePrecision], -5e-43], N[(N[(a * b), $MachinePrecision] * -0.25), $MachinePrecision], If[LessEqual[N[(a * b), $MachinePrecision], 5e-31], N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision], N[(a * N[(b / -4.0), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if (*.f64 a b) < -5.00000000000000019e-43

   1. Initial program 97.3%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.3%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.3%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 46.3%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 46.3%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]

   if -5.00000000000000019e-43 < (*.f64 a b) < 5e-31

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in z around inf

      \[\leadsto \color{blue}{\frac{1}{16} \cdot \left(t \cdot z\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{1}{16}, \color{blue}{\left(t \cdot z\right)}\right) \]

      2. *-lowering-*.f64 42.3%

         \[\leadsto \mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, \color{blue}{z}\right)\right) \]

   7. Simplified 42.3%

      \[\leadsto \color{blue}{0.0625 \cdot \left(t \cdot z\right)} \]

   if 5e-31 < (*.f64 a b)

   1. Initial program 97.5%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.5%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.5%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 59.5%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 59.5%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]
   8. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \frac{-1}{4} \cdot \left(b \cdot \color{blue}{a}\right) \]

      2. associate-*r* N/A

         \[\leadsto \left(\frac{-1}{4} \cdot b\right) \cdot \color{blue}{a} \]

      3. metadata-eval N/A

         \[\leadsto \left(\frac{1}{-4} \cdot b\right) \cdot a \]

      4. associate-/r/ N/A

         \[\leadsto \frac{1}{\frac{-4}{b}} \cdot a \]

      5. clear-num N/A

         \[\leadsto \frac{b}{-4} \cdot a \]

      6. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\left(\frac{b}{-4}\right), \color{blue}{a}\right) \]

      7. /-lowering-/.f64 60.6%

         \[\leadsto \mathsf{*.f64}\left(\mathsf{/.f64}\left(b, -4\right), a\right) \]

   9. Applied egg-rr 60.6%

      \[\leadsto \color{blue}{\frac{b}{-4} \cdot a} \]
3. Recombined 3 regimes into one program.

4. Final simplification 48.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -5 \cdot 10^{-43}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{elif}\;a \cdot b \leq 5 \cdot 10^{-31}:\\ \;\;\;\;0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;a \cdot \frac{b}{-4}\\ \end{array} \]
5. Add Preprocessing

Alternative 11: 42.7% accurate, 0.9× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(a \cdot b\right) \cdot -0.25\\ \mathbf{if}\;a \cdot b \leq -7.2 \cdot 10^{-43}:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;a \cdot b \leq 8.5 \cdot 10^{-18}:\\ \;\;\;\;0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;t\_1\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (let* ((t_1 (* (* a b) -0.25)))
   (if (<= (* a b) -7.2e-43)
     t_1
     (if (<= (* a b) 8.5e-18) (* 0.0625 (* z t)) t_1))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = (a * b) * -0.25;
	double tmp;
	if ((a * b) <= -7.2e-43) {
		tmp = t_1;
	} else if ((a * b) <= 8.5e-18) {
		tmp = 0.0625 * (z * t);
	} else {
		tmp = t_1;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: t_1
    real(8) :: tmp
    t_1 = (a * b) * (-0.25d0)
    if ((a * b) <= (-7.2d-43)) then
        tmp = t_1
    else if ((a * b) <= 8.5d-18) then
        tmp = 0.0625d0 * (z * t)
    else
        tmp = t_1
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double t_1 = (a * b) * -0.25;
	double tmp;
	if ((a * b) <= -7.2e-43) {
		tmp = t_1;
	} else if ((a * b) <= 8.5e-18) {
		tmp = 0.0625 * (z * t);
	} else {
		tmp = t_1;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	t_1 = (a * b) * -0.25
	tmp = 0
	if (a * b) <= -7.2e-43:
		tmp = t_1
	elif (a * b) <= 8.5e-18:
		tmp = 0.0625 * (z * t)
	else:
		tmp = t_1
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	t_1 = Float64(Float64(a * b) * -0.25)
	tmp = 0.0
	if (Float64(a * b) <= -7.2e-43)
		tmp = t_1;
	elseif (Float64(a * b) <= 8.5e-18)
		tmp = Float64(0.0625 * Float64(z * t));
	else
		tmp = t_1;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	t_1 = (a * b) * -0.25;
	tmp = 0.0;
	if ((a * b) <= -7.2e-43)
		tmp = t_1;
	elseif ((a * b) <= 8.5e-18)
		tmp = 0.0625 * (z * t);
	else
		tmp = t_1;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := Block[{t$95$1 = N[(N[(a * b), $MachinePrecision] * -0.25), $MachinePrecision]}, If[LessEqual[N[(a * b), $MachinePrecision], -7.2e-43], t$95$1, If[LessEqual[N[(a * b), $MachinePrecision], 8.5e-18], N[(0.0625 * N[(z * t), $MachinePrecision]), $MachinePrecision], t$95$1]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 a b) < -7.1999999999999998e-43 or 8.4999999999999995e-18 < (*.f64 a b)

   1. Initial program 97.4%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 97.4%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 97.4%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 52.8%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 52.8%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]

   if -7.1999999999999998e-43 < (*.f64 a b) < 8.4999999999999995e-18

   1. Initial program 100.0%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 100.0%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 100.0%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in z around inf

      \[\leadsto \color{blue}{\frac{1}{16} \cdot \left(t \cdot z\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{1}{16}, \color{blue}{\left(t \cdot z\right)}\right) \]

      2. *-lowering-*.f64 42.3%

         \[\leadsto \mathsf{*.f64}\left(\frac{1}{16}, \mathsf{*.f64}\left(t, \color{blue}{z}\right)\right) \]

   7. Simplified 42.3%

      \[\leadsto \color{blue}{0.0625 \cdot \left(t \cdot z\right)} \]
3. Recombined 2 regimes into one program.

4. Final simplification 48.3%

   \[\leadsto \begin{array}{l} \mathbf{if}\;a \cdot b \leq -7.2 \cdot 10^{-43}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{elif}\;a \cdot b \leq 8.5 \cdot 10^{-18}:\\ \;\;\;\;0.0625 \cdot \left(z \cdot t\right)\\ \mathbf{else}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \end{array} \]
5. Add Preprocessing

Alternative 12: 45.3% accurate, 0.9× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \cdot y \leq -1.3 \cdot 10^{+59}:\\ \;\;\;\;x \cdot y\\ \mathbf{elif}\;x \cdot y \leq 5.8 \cdot 10^{+111}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{else}:\\ \;\;\;\;x \cdot y\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (if (<= (* x y) -1.3e+59)
   (* x y)
   (if (<= (* x y) 5.8e+111) (* (* a b) -0.25) (* x y))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((x * y) <= -1.3e+59) {
		tmp = x * y;
	} else if ((x * y) <= 5.8e+111) {
		tmp = (a * b) * -0.25;
	} else {
		tmp = x * y;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: tmp
    if ((x * y) <= (-1.3d+59)) then
        tmp = x * y
    else if ((x * y) <= 5.8d+111) then
        tmp = (a * b) * (-0.25d0)
    else
        tmp = x * y
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((x * y) <= -1.3e+59) {
		tmp = x * y;
	} else if ((x * y) <= 5.8e+111) {
		tmp = (a * b) * -0.25;
	} else {
		tmp = x * y;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	tmp = 0
	if (x * y) <= -1.3e+59:
		tmp = x * y
	elif (x * y) <= 5.8e+111:
		tmp = (a * b) * -0.25
	else:
		tmp = x * y
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	tmp = 0.0
	if (Float64(x * y) <= -1.3e+59)
		tmp = Float64(x * y);
	elseif (Float64(x * y) <= 5.8e+111)
		tmp = Float64(Float64(a * b) * -0.25);
	else
		tmp = Float64(x * y);
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	tmp = 0.0;
	if ((x * y) <= -1.3e+59)
		tmp = x * y;
	elseif ((x * y) <= 5.8e+111)
		tmp = (a * b) * -0.25;
	else
		tmp = x * y;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := If[LessEqual[N[(x * y), $MachinePrecision], -1.3e+59], N[(x * y), $MachinePrecision], If[LessEqual[N[(x * y), $MachinePrecision], 5.8e+111], N[(N[(a * b), $MachinePrecision] * -0.25), $MachinePrecision], N[(x * y), $MachinePrecision]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 x y) < -1.3e59 or 5.7999999999999999e111 < (*.f64 x y)

   1. Initial program 98.9%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 98.9%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 98.9%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot y} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 63.8%

         \[\leadsto \mathsf{*.f64}\left(x, \color{blue}{y}\right) \]

   7. Simplified 63.8%

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

   if -1.3e59 < (*.f64 x y) < 5.7999999999999999e111

   1. Initial program 98.3%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 98.3%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 98.3%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in a around inf

      \[\leadsto \color{blue}{\frac{-1}{4} \cdot \left(a \cdot b\right)} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \color{blue}{\left(a \cdot b\right)}\right) \]

      2. *-lowering-*.f64 38.2%

         \[\leadsto \mathsf{*.f64}\left(\frac{-1}{4}, \mathsf{*.f64}\left(a, \color{blue}{b}\right)\right) \]

   7. Simplified 38.2%

      \[\leadsto \color{blue}{-0.25 \cdot \left(a \cdot b\right)} \]
3. Recombined 2 regimes into one program.

4. Final simplification 46.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \cdot y \leq -1.3 \cdot 10^{+59}:\\ \;\;\;\;x \cdot y\\ \mathbf{elif}\;x \cdot y \leq 5.8 \cdot 10^{+111}:\\ \;\;\;\;\left(a \cdot b\right) \cdot -0.25\\ \mathbf{else}:\\ \;\;\;\;x \cdot y\\ \end{array} \]
5. Add Preprocessing

Alternative 13: 38.2% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \cdot y \leq -9 \cdot 10^{+178}:\\ \;\;\;\;x \cdot y\\ \mathbf{elif}\;x \cdot y \leq 1.3 \cdot 10^{-137}:\\ \;\;\;\;c\\ \mathbf{else}:\\ \;\;\;\;x \cdot y\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (if (<= (* x y) -9e+178) (* x y) (if (<= (* x y) 1.3e-137) c (* x y))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((x * y) <= -9e+178) {
		tmp = x * y;
	} else if ((x * y) <= 1.3e-137) {
		tmp = c;
	} else {
		tmp = x * y;
	}
	return tmp;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    real(8) :: tmp
    if ((x * y) <= (-9d+178)) then
        tmp = x * y
    else if ((x * y) <= 1.3d-137) then
        tmp = c
    else
        tmp = x * y
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	double tmp;
	if ((x * y) <= -9e+178) {
		tmp = x * y;
	} else if ((x * y) <= 1.3e-137) {
		tmp = c;
	} else {
		tmp = x * y;
	}
	return tmp;
}

Python

def code(x, y, z, t, a, b, c):
	tmp = 0
	if (x * y) <= -9e+178:
		tmp = x * y
	elif (x * y) <= 1.3e-137:
		tmp = c
	else:
		tmp = x * y
	return tmp

Julia

function code(x, y, z, t, a, b, c)
	tmp = 0.0
	if (Float64(x * y) <= -9e+178)
		tmp = Float64(x * y);
	elseif (Float64(x * y) <= 1.3e-137)
		tmp = c;
	else
		tmp = Float64(x * y);
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z, t, a, b, c)
	tmp = 0.0;
	if ((x * y) <= -9e+178)
		tmp = x * y;
	elseif ((x * y) <= 1.3e-137)
		tmp = c;
	else
		tmp = x * y;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := If[LessEqual[N[(x * y), $MachinePrecision], -9e+178], N[(x * y), $MachinePrecision], If[LessEqual[N[(x * y), $MachinePrecision], 1.3e-137], c, N[(x * y), $MachinePrecision]]]

Derivation

1. Split input into 2 regimes

2. if (*.f64 x y) < -8.9999999999999994e178 or 1.3e-137 < (*.f64 x y)

   1. Initial program 98.5%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 98.5%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 98.5%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot y} \]
   6. Step-by-step derivation

      1. *-lowering-*.f64 51.8%

         \[\leadsto \mathsf{*.f64}\left(x, \color{blue}{y}\right) \]

   7. Simplified 51.8%

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

   if -8.9999999999999994e178 < (*.f64 x y) < 1.3e-137

   1. Initial program 98.5%

      \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
   2. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

      2. sub-neg N/A

         \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

      3. associate-+r+ N/A

         \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

      4. +-commutative N/A

         \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

      5. +-lowering-+.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

      6. distribute-neg-frac2 N/A

         \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      7. /-lowering-/.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      8. *-lowering-*.f64 N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      9. metadata-eval N/A

         \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

      10. associate-+r+ N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

      11. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      12. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

      13. /-lowering-/.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

      14. *-lowering-*.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

      15. +-commutative N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

      16. +-lowering-+.f64 N/A

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

      17. *-lowering-*.f64 98.5%

          \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

   3. Simplified 98.5%

      \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
   4. Add Preprocessing

   5. Taylor expanded in c around inf

      \[\leadsto \color{blue}{c} \]
   6. Step-by-step derivation

   7. Simplified 30.9%

      \[\leadsto \color{blue}{c} \]
3. Recombined 2 regimes into one program.
4. Add Preprocessing

Alternative 14: 97.6% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ c + \left(\left(\frac{z \cdot t}{16} + x \cdot y\right) - \frac{a \cdot b}{4}\right) \end{array} \]

FPCore

(FPCore (x y z t a b c)
 :precision binary64
 (+ c (- (+ (/ (* z t) 16.0) (* x y)) (/ (* a b) 4.0))))

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	return c + ((((z * t) / 16.0) + (x * y)) - ((a * b) / 4.0));
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = c + ((((z * t) / 16.0d0) + (x * y)) - ((a * b) / 4.0d0))
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	return c + ((((z * t) / 16.0) + (x * y)) - ((a * b) / 4.0));
}

Python

def code(x, y, z, t, a, b, c):
	return c + ((((z * t) / 16.0) + (x * y)) - ((a * b) / 4.0))

Julia

function code(x, y, z, t, a, b, c)
	return Float64(c + Float64(Float64(Float64(Float64(z * t) / 16.0) + Float64(x * y)) - Float64(Float64(a * b) / 4.0)))
end

MATLAB

function tmp = code(x, y, z, t, a, b, c)
	tmp = c + ((((z * t) / 16.0) + (x * y)) - ((a * b) / 4.0));
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := N[(c + N[(N[(N[(N[(z * t), $MachinePrecision] / 16.0), $MachinePrecision] + N[(x * y), $MachinePrecision]), $MachinePrecision] - N[(N[(a * b), $MachinePrecision] / 4.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 98.5%

   \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
2. Add Preprocessing

3. Final simplification 98.5%

   \[\leadsto c + \left(\left(\frac{z \cdot t}{16} + x \cdot y\right) - \frac{a \cdot b}{4}\right) \]
4. Add Preprocessing

Alternative 15: 22.0% accurate, 17.0× speedup

Math

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

FPCore

(FPCore (x y z t a b c) :precision binary64 c)

C

double code(double x, double y, double z, double t, double a, double b, double c) {
	return c;
}

Fortran

real(8) function code(x, y, z, t, a, b, c)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8), intent (in) :: b
    real(8), intent (in) :: c
    code = c
end function

Java

public static double code(double x, double y, double z, double t, double a, double b, double c) {
	return c;
}

Python

def code(x, y, z, t, a, b, c):
	return c

Julia

function code(x, y, z, t, a, b, c)
	return c
end

MATLAB

function tmp = code(x, y, z, t, a, b, c)
	tmp = c;
end

Wolfram

code[x_, y_, z_, t_, a_, b_, c_] := c

Derivation

1. Initial program 98.5%

   \[\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right) + c \]
2. Step-by-step derivation

   1. +-commutative N/A

      \[\leadsto c + \color{blue}{\left(\left(x \cdot y + \frac{z \cdot t}{16}\right) - \frac{a \cdot b}{4}\right)} \]

   2. sub-neg N/A

      \[\leadsto c + \left(\left(x \cdot y + \frac{z \cdot t}{16}\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)}\right) \]

   3. associate-+r+ N/A

      \[\leadsto \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right) + \color{blue}{\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right)} \]

   4. +-commutative N/A

      \[\leadsto \left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right) + \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)} \]

   5. +-lowering-+.f64 N/A

      \[\leadsto \mathsf{+.f64}\left(\left(\mathsf{neg}\left(\frac{a \cdot b}{4}\right)\right), \color{blue}{\left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)}\right) \]

   6. distribute-neg-frac2 N/A

      \[\leadsto \mathsf{+.f64}\left(\left(\frac{a \cdot b}{\mathsf{neg}\left(4\right)}\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   7. /-lowering-/.f64 N/A

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(a \cdot b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(\color{blue}{c} + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   8. *-lowering-*.f64 N/A

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), \left(\mathsf{neg}\left(4\right)\right)\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   9. metadata-eval N/A

      \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(c + \left(x \cdot y + \frac{z \cdot t}{16}\right)\right)\right) \]

   10. associate-+r+ N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\left(c + x \cdot y\right) + \color{blue}{\frac{z \cdot t}{16}}\right)\right) \]

   11. +-commutative N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \left(\frac{z \cdot t}{16} + \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

   12. +-lowering-+.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\left(\frac{z \cdot t}{16}\right), \color{blue}{\left(c + x \cdot y\right)}\right)\right) \]

   13. /-lowering-/.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\left(z \cdot t\right), 16\right), \left(\color{blue}{c} + x \cdot y\right)\right)\right) \]

   14. *-lowering-*.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(c + x \cdot y\right)\right)\right) \]

   15. +-commutative N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \left(x \cdot y + \color{blue}{c}\right)\right)\right) \]

   16. +-lowering-+.f64 N/A

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\left(x \cdot y\right), \color{blue}{c}\right)\right)\right) \]

   17. *-lowering-*.f64 98.5%

       \[\leadsto \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(a, b\right), -4\right), \mathsf{+.f64}\left(\mathsf{/.f64}\left(\mathsf{*.f64}\left(z, t\right), 16\right), \mathsf{+.f64}\left(\mathsf{*.f64}\left(x, y\right), c\right)\right)\right) \]

3. Simplified 98.5%

   \[\leadsto \color{blue}{\frac{a \cdot b}{-4} + \left(\frac{z \cdot t}{16} + \left(x \cdot y + c\right)\right)} \]
4. Add Preprocessing

5. Taylor expanded in c around inf

   \[\leadsto \color{blue}{c} \]
6. Step-by-step derivation

7. Simplified 21.5%

   \[\leadsto \color{blue}{c} \]
8. Add Preprocessing

Reproduce

herbie shell --seed 2024145 
(FPCore (x y z t a b c)
  :name "Diagrams.Solve.Polynomial:quartForm  from diagrams-solve-0.1, C"
  :precision binary64
  (+ (- (+ (* x y) (/ (* z t) 16.0)) (/ (* a b) 4.0)) c))