Main:z from

Percentage Accurate: 91.9% → 97.5%

Time: 23.9s

Alternatives: 21

Speedup: 0.9×

Specification

Math

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

FPCore

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

C

double code(double x, double y, double z, double t) {
	return (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + (sqrt((z + 1.0)) - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
}

Fortran

real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + (sqrt((z + 1.0d0)) - sqrt(z))) + (sqrt((t + 1.0d0)) - sqrt(t))
end function

Java

public static double code(double x, double y, double z, double t) {
	return (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + (Math.sqrt((y + 1.0)) - Math.sqrt(y))) + (Math.sqrt((z + 1.0)) - Math.sqrt(z))) + (Math.sqrt((t + 1.0)) - Math.sqrt(t));
}

Python

def code(x, y, z, t):
	return (((math.sqrt((x + 1.0)) - math.sqrt(x)) + (math.sqrt((y + 1.0)) - math.sqrt(y))) + (math.sqrt((z + 1.0)) - math.sqrt(z))) + (math.sqrt((t + 1.0)) - math.sqrt(t))

Julia

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

MATLAB

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

Wolfram

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

Initial Program: 91.9% accurate, 1.0× speedup

Math

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

FPCore

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

C

double code(double x, double y, double z, double t) {
	return (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + (sqrt((z + 1.0)) - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
}

Fortran

real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + (sqrt((z + 1.0d0)) - sqrt(z))) + (sqrt((t + 1.0d0)) - sqrt(t))
end function

Java

public static double code(double x, double y, double z, double t) {
	return (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + (Math.sqrt((y + 1.0)) - Math.sqrt(y))) + (Math.sqrt((z + 1.0)) - Math.sqrt(z))) + (Math.sqrt((t + 1.0)) - Math.sqrt(t));
}

Python

def code(x, y, z, t):
	return (((math.sqrt((x + 1.0)) - math.sqrt(x)) + (math.sqrt((y + 1.0)) - math.sqrt(y))) + (math.sqrt((z + 1.0)) - math.sqrt(z))) + (math.sqrt((t + 1.0)) - math.sqrt(t))

Julia

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

MATLAB

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

Wolfram

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

Alternative 1: 97.5% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{t + 1} - \sqrt{t}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{1 + y}\\ t_4 := \left(t\_3 - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\\ t_5 := t\_4 + t\_2\\ \mathbf{if}\;t\_5 \leq 10^{-5}:\\ \;\;\;\;\left(\left(\sqrt{\frac{1}{x}} + \sqrt{\frac{1}{y}}\right) \cdot 0.5 + t\_2\right) + t\_1\\ \mathbf{elif}\;t\_5 \leq 2.01:\\ \;\;\;\;\sqrt{\frac{1}{t}} \cdot 0.5 + \left(\sqrt{\frac{1}{z}} \cdot 0.5 + t\_4\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(\left(\mathsf{fma}\left(0.5, x, 1\right) + t\_3\right) - \sqrt{y}\right) - \sqrt{x}\right) + t\_2\right) + t\_1\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (sqrt (+ 1.0 y)))
        (t_4 (+ (- t_3 (sqrt y)) (- (sqrt (+ x 1.0)) (sqrt x))))
        (t_5 (+ t_4 t_2)))
   (if (<= t_5 1e-5)
     (+ (+ (* (+ (sqrt (/ 1.0 x)) (sqrt (/ 1.0 y))) 0.5) t_2) t_1)
     (if (<= t_5 2.01)
       (+ (* (sqrt (/ 1.0 t)) 0.5) (+ (* (sqrt (/ 1.0 z)) 0.5) t_4))
       (+ (+ (- (- (+ (fma 0.5 x 1.0) t_3) (sqrt y)) (sqrt x)) t_2) t_1)))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((t + 1.0)) - sqrt(t);
	double t_2 = sqrt((z + 1.0)) - sqrt(z);
	double t_3 = sqrt((1.0 + y));
	double t_4 = (t_3 - sqrt(y)) + (sqrt((x + 1.0)) - sqrt(x));
	double t_5 = t_4 + t_2;
	double tmp;
	if (t_5 <= 1e-5) {
		tmp = (((sqrt((1.0 / x)) + sqrt((1.0 / y))) * 0.5) + t_2) + t_1;
	} else if (t_5 <= 2.01) {
		tmp = (sqrt((1.0 / t)) * 0.5) + ((sqrt((1.0 / z)) * 0.5) + t_4);
	} else {
		tmp = ((((fma(0.5, x, 1.0) + t_3) - sqrt(y)) - sqrt(x)) + t_2) + t_1;
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = sqrt(Float64(1.0 + y))
	t_4 = Float64(Float64(t_3 - sqrt(y)) + Float64(sqrt(Float64(x + 1.0)) - sqrt(x)))
	t_5 = Float64(t_4 + t_2)
	tmp = 0.0
	if (t_5 <= 1e-5)
		tmp = Float64(Float64(Float64(Float64(sqrt(Float64(1.0 / x)) + sqrt(Float64(1.0 / y))) * 0.5) + t_2) + t_1);
	elseif (t_5 <= 2.01)
		tmp = Float64(Float64(sqrt(Float64(1.0 / t)) * 0.5) + Float64(Float64(sqrt(Float64(1.0 / z)) * 0.5) + t_4));
	else
		tmp = Float64(Float64(Float64(Float64(Float64(fma(0.5, x, 1.0) + t_3) - sqrt(y)) - sqrt(x)) + t_2) + t_1);
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[(N[(t$95$3 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(t$95$4 + t$95$2), $MachinePrecision]}, If[LessEqual[t$95$5, 1e-5], N[(N[(N[(N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[(1.0 / y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * 0.5), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision], If[LessEqual[t$95$5, 2.01], N[(N[(N[Sqrt[N[(1.0 / t), $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + N[(N[(N[Sqrt[N[(1.0 / z), $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$4), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] + t$95$3), $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision]]]]]]]]

Derivation

1. Split input into 3 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 1.00000000000000008e-5

   1. Initial program 53.4%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

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

      1. +-commutative N/A

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

      2. associate--l+ N/A

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

      3. *-commutative N/A

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

      4. lower-fma.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-/.f64 N/A

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

      7. lower--.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 73.3

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

   5. Applied rewrites 73.3%

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

   6. Taylor expanded in x around inf

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

   8. Applied rewrites 86.2%

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

   if 1.00000000000000008e-5 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 2.0099999999999998

   1. Initial program 96.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. *-commutative N/A

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

      2. lower-*.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-/.f64 49.8

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

   5. Applied rewrites 49.8%

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

   6. Taylor expanded in z around inf

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

      1. *-commutative N/A

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

      2. lower-*.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-/.f64 24.4

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

   8. Applied rewrites 24.4%

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

   if 2.0099999999999998 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 98.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. +-commutative N/A

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

      2. associate--r+ N/A

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

      3. lower--.f64 N/A

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

      4. lower--.f64 N/A

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

      5. +-commutative N/A

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

      6. associate-+r+ N/A

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

      7. lower-+.f64 N/A

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

      8. +-commutative N/A

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

      9. lower-fma.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-+.f64 N/A

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

      12. lower-sqrt.f64 N/A

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

      13. lower-sqrt.f64 95.1

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

   5. Applied rewrites 95.1%

      \[\leadsto \left(\color{blue}{\left(\left(\left(\mathsf{fma}\left(0.5, x, 1\right) + \sqrt{1 + y}\right) - \sqrt{y}\right) - \sqrt{x}\right)} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
3. Recombined 3 regimes into one program.

4. Final simplification 39.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 10^{-5}:\\ \;\;\;\;\left(\left(\sqrt{\frac{1}{x}} + \sqrt{\frac{1}{y}}\right) \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 2.01:\\ \;\;\;\;\sqrt{\frac{1}{t}} \cdot 0.5 + \left(\sqrt{\frac{1}{z}} \cdot 0.5 + \left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(\left(\mathsf{fma}\left(0.5, x, 1\right) + \sqrt{1 + y}\right) - \sqrt{y}\right) - \sqrt{x}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 2: 96.6% accurate, 0.3× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1} - \sqrt{z}\\ t_2 := \sqrt{1 + y}\\ t_3 := \sqrt{x + 1}\\ t_4 := t\_3 - \sqrt{x}\\ t_5 := \left(\left(t\_2 - \sqrt{y}\right) + t\_4\right) + t\_1\\ t_6 := \sqrt{t + 1} - \sqrt{t}\\ \mathbf{if}\;t\_5 \leq 0.05:\\ \;\;\;\;\left(\sqrt{\frac{1}{x}} \cdot 0.5 + t\_1\right) + t\_6\\ \mathbf{elif}\;t\_5 \leq 1:\\ \;\;\;\;\left(t\_4 + t\_1\right) + t\_6\\ \mathbf{elif}\;t\_5 \leq 2.000001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{z}}, 0.5, t\_2\right) + t\_3\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{y}\right) + \left(1 - \sqrt{x}\right)\right) + t\_1\right) + t\_6\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_2 (sqrt (+ 1.0 y)))
        (t_3 (sqrt (+ x 1.0)))
        (t_4 (- t_3 (sqrt x)))
        (t_5 (+ (+ (- t_2 (sqrt y)) t_4) t_1))
        (t_6 (- (sqrt (+ t 1.0)) (sqrt t))))
   (if (<= t_5 0.05)
     (+ (+ (* (sqrt (/ 1.0 x)) 0.5) t_1) t_6)
     (if (<= t_5 1.0)
       (+ (+ t_4 t_1) t_6)
       (if (<= t_5 2.000001)
         (- (+ (fma (sqrt (/ 1.0 z)) 0.5 t_2) t_3) (+ (sqrt y) (sqrt x)))
         (+ (+ (+ (- 1.0 (sqrt y)) (- 1.0 (sqrt x))) t_1) t_6))))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0)) - sqrt(z);
	double t_2 = sqrt((1.0 + y));
	double t_3 = sqrt((x + 1.0));
	double t_4 = t_3 - sqrt(x);
	double t_5 = ((t_2 - sqrt(y)) + t_4) + t_1;
	double t_6 = sqrt((t + 1.0)) - sqrt(t);
	double tmp;
	if (t_5 <= 0.05) {
		tmp = ((sqrt((1.0 / x)) * 0.5) + t_1) + t_6;
	} else if (t_5 <= 1.0) {
		tmp = (t_4 + t_1) + t_6;
	} else if (t_5 <= 2.000001) {
		tmp = (fma(sqrt((1.0 / z)), 0.5, t_2) + t_3) - (sqrt(y) + sqrt(x));
	} else {
		tmp = (((1.0 - sqrt(y)) + (1.0 - sqrt(x))) + t_1) + t_6;
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = sqrt(Float64(1.0 + y))
	t_3 = sqrt(Float64(x + 1.0))
	t_4 = Float64(t_3 - sqrt(x))
	t_5 = Float64(Float64(Float64(t_2 - sqrt(y)) + t_4) + t_1)
	t_6 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	tmp = 0.0
	if (t_5 <= 0.05)
		tmp = Float64(Float64(Float64(sqrt(Float64(1.0 / x)) * 0.5) + t_1) + t_6);
	elseif (t_5 <= 1.0)
		tmp = Float64(Float64(t_4 + t_1) + t_6);
	elseif (t_5 <= 2.000001)
		tmp = Float64(Float64(fma(sqrt(Float64(1.0 / z)), 0.5, t_2) + t_3) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(y)) + Float64(1.0 - sqrt(x))) + t_1) + t_6);
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[(t$95$3 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(t$95$2 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] + t$95$1), $MachinePrecision]}, Block[{t$95$6 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$5, 0.05], N[(N[(N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$6), $MachinePrecision], If[LessEqual[t$95$5, 1.0], N[(N[(t$95$4 + t$95$1), $MachinePrecision] + t$95$6), $MachinePrecision], If[LessEqual[t$95$5, 2.000001], N[(N[(N[(N[Sqrt[N[(1.0 / z), $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$6), $MachinePrecision]]]]]]]]]]

Derivation

1. Split input into 4 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 0.050000000000000003

   1. Initial program 58.5%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

      \[\leadsto \left(\color{blue}{\left(\sqrt{1 + x} - \sqrt{x}\right)} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   4. Step-by-step derivation

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 50.1

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

   5. Applied rewrites 50.1%

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

   6. Taylor expanded in x around inf

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

   8. Applied rewrites 58.2%

      \[\leadsto \left(\sqrt{\frac{1}{x}} \cdot \color{blue}{0.5} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   if 0.050000000000000003 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 1

   1. Initial program 97.9%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

      \[\leadsto \left(\color{blue}{\left(\sqrt{1 + x} - \sqrt{x}\right)} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   4. Step-by-step derivation

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 76.9

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

   5. Applied rewrites 76.9%

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

   if 1 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 2.0000010000000001

   1. Initial program 96.4%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 8.7

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

   5. Applied rewrites 8.7%

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

   6. Taylor expanded in z around inf

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

   8. Applied rewrites 26.5%

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

   if 2.0000010000000001 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 98.6%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 93.1

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

   5. Applied rewrites 93.1%

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

   6. Taylor expanded in y around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 83.4

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

   8. Applied rewrites 83.4%

      \[\leadsto \left(\left(\left(1 - \sqrt{x}\right) + \color{blue}{\left(1 - \sqrt{y}\right)}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
3. Recombined 4 regimes into one program.

4. Final simplification 55.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 0.05:\\ \;\;\;\;\left(\sqrt{\frac{1}{x}} \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 1:\\ \;\;\;\;\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 2.000001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{z}}, 0.5, \sqrt{1 + y}\right) + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{y}\right) + \left(1 - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 3: 84.7% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{x + 1}\\ t_2 := \left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\\ t_3 := \sqrt{z + 1}\\ t_4 := \sqrt{1 + y}\\ t_5 := \left(\left(\left(t\_4 - \sqrt{y}\right) + \left(t\_1 - \sqrt{x}\right)\right) + \left(t\_3 - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{if}\;t\_5 \leq 1:\\ \;\;\;\;\left(\left(t\_3 + t\_4\right) - t\_2\right) + 1\\ \mathbf{elif}\;t\_5 \leq 2:\\ \;\;\;\;\left(t\_4 + t\_1\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_4 + 1\right) + t\_3\right) - t\_2\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (sqrt (+ x 1.0)))
        (t_2 (+ (+ (sqrt z) (sqrt y)) (sqrt x)))
        (t_3 (sqrt (+ z 1.0)))
        (t_4 (sqrt (+ 1.0 y)))
        (t_5
         (+
          (+ (+ (- t_4 (sqrt y)) (- t_1 (sqrt x))) (- t_3 (sqrt z)))
          (- (sqrt (+ t 1.0)) (sqrt t)))))
   (if (<= t_5 1.0)
     (+ (- (+ t_3 t_4) t_2) 1.0)
     (if (<= t_5 2.0)
       (- (+ t_4 t_1) (+ (sqrt y) (sqrt x)))
       (- (+ (+ t_4 1.0) t_3) t_2)))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((x + 1.0));
	double t_2 = (sqrt(z) + sqrt(y)) + sqrt(x);
	double t_3 = sqrt((z + 1.0));
	double t_4 = sqrt((1.0 + y));
	double t_5 = (((t_4 - sqrt(y)) + (t_1 - sqrt(x))) + (t_3 - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
	double tmp;
	if (t_5 <= 1.0) {
		tmp = ((t_3 + t_4) - t_2) + 1.0;
	} else if (t_5 <= 2.0) {
		tmp = (t_4 + t_1) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_4 + 1.0) + t_3) - t_2;
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    real(8) :: t_2
    real(8) :: t_3
    real(8) :: t_4
    real(8) :: t_5
    real(8) :: tmp
    t_1 = sqrt((x + 1.0d0))
    t_2 = (sqrt(z) + sqrt(y)) + sqrt(x)
    t_3 = sqrt((z + 1.0d0))
    t_4 = sqrt((1.0d0 + y))
    t_5 = (((t_4 - sqrt(y)) + (t_1 - sqrt(x))) + (t_3 - sqrt(z))) + (sqrt((t + 1.0d0)) - sqrt(t))
    if (t_5 <= 1.0d0) then
        tmp = ((t_3 + t_4) - t_2) + 1.0d0
    else if (t_5 <= 2.0d0) then
        tmp = (t_4 + t_1) - (sqrt(y) + sqrt(x))
    else
        tmp = ((t_4 + 1.0d0) + t_3) - t_2
    end if
    code = tmp
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	double t_1 = Math.sqrt((x + 1.0));
	double t_2 = (Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x);
	double t_3 = Math.sqrt((z + 1.0));
	double t_4 = Math.sqrt((1.0 + y));
	double t_5 = (((t_4 - Math.sqrt(y)) + (t_1 - Math.sqrt(x))) + (t_3 - Math.sqrt(z))) + (Math.sqrt((t + 1.0)) - Math.sqrt(t));
	double tmp;
	if (t_5 <= 1.0) {
		tmp = ((t_3 + t_4) - t_2) + 1.0;
	} else if (t_5 <= 2.0) {
		tmp = (t_4 + t_1) - (Math.sqrt(y) + Math.sqrt(x));
	} else {
		tmp = ((t_4 + 1.0) + t_3) - t_2;
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt((x + 1.0))
	t_2 = (math.sqrt(z) + math.sqrt(y)) + math.sqrt(x)
	t_3 = math.sqrt((z + 1.0))
	t_4 = math.sqrt((1.0 + y))
	t_5 = (((t_4 - math.sqrt(y)) + (t_1 - math.sqrt(x))) + (t_3 - math.sqrt(z))) + (math.sqrt((t + 1.0)) - math.sqrt(t))
	tmp = 0
	if t_5 <= 1.0:
		tmp = ((t_3 + t_4) - t_2) + 1.0
	elif t_5 <= 2.0:
		tmp = (t_4 + t_1) - (math.sqrt(y) + math.sqrt(x))
	else:
		tmp = ((t_4 + 1.0) + t_3) - t_2
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(x + 1.0))
	t_2 = Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))
	t_3 = sqrt(Float64(z + 1.0))
	t_4 = sqrt(Float64(1.0 + y))
	t_5 = Float64(Float64(Float64(Float64(t_4 - sqrt(y)) + Float64(t_1 - sqrt(x))) + Float64(t_3 - sqrt(z))) + Float64(sqrt(Float64(t + 1.0)) - sqrt(t)))
	tmp = 0.0
	if (t_5 <= 1.0)
		tmp = Float64(Float64(Float64(t_3 + t_4) - t_2) + 1.0);
	elseif (t_5 <= 2.0)
		tmp = Float64(Float64(t_4 + t_1) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_4 + 1.0) + t_3) - t_2);
	end
	return tmp
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp_2 = code(x, y, z, t)
	t_1 = sqrt((x + 1.0));
	t_2 = (sqrt(z) + sqrt(y)) + sqrt(x);
	t_3 = sqrt((z + 1.0));
	t_4 = sqrt((1.0 + y));
	t_5 = (((t_4 - sqrt(y)) + (t_1 - sqrt(x))) + (t_3 - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
	tmp = 0.0;
	if (t_5 <= 1.0)
		tmp = ((t_3 + t_4) - t_2) + 1.0;
	elseif (t_5 <= 2.0)
		tmp = (t_4 + t_1) - (sqrt(y) + sqrt(x));
	else
		tmp = ((t_4 + 1.0) + t_3) - t_2;
	end
	tmp_2 = tmp;
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(N[(t$95$4 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(t$95$1 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(t$95$3 - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$5, 1.0], N[(N[(N[(t$95$3 + t$95$4), $MachinePrecision] - t$95$2), $MachinePrecision] + 1.0), $MachinePrecision], If[LessEqual[t$95$5, 2.0], N[(N[(t$95$4 + t$95$1), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$4 + 1.0), $MachinePrecision] + t$95$3), $MachinePrecision] - t$95$2), $MachinePrecision]]]]]]]]

Derivation

1. Split input into 3 regimes

2. if (+.f64 (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) (-.f64 (sqrt.f64 (+.f64 t #s(literal 1 binary64))) (sqrt.f64 t))) < 1

   1. Initial program 80.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 3.2

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

   5. Applied rewrites 3.2%

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

   6. Taylor expanded in x around 0

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

   8. Applied rewrites 48.0%

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

   if 1 < (+.f64 (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) (-.f64 (sqrt.f64 (+.f64 t #s(literal 1 binary64))) (sqrt.f64 t))) < 2

   1. Initial program 96.7%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 6.8

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

   5. Applied rewrites 6.8%

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

   6. Taylor expanded in z around inf

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

   8. Applied rewrites 21.5%

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

   if 2 < (+.f64 (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) (-.f64 (sqrt.f64 (+.f64 t #s(literal 1 binary64))) (sqrt.f64 t)))

   1. Initial program 97.6%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 25.6

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

   5. Applied rewrites 25.6%

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

   6. Taylor expanded in x around 0

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

   8. Applied rewrites 22.9%

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

4. Final simplification 28.3%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \leq 1:\\ \;\;\;\;\left(\left(\sqrt{z + 1} + \sqrt{1 + y}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right) + 1\\ \mathbf{elif}\;\left(\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \leq 2:\\ \;\;\;\;\left(\sqrt{1 + y} + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{z + 1}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 4: 84.7% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{x + 1}\\ t_2 := \sqrt{z + 1}\\ t_3 := \sqrt{1 + y}\\ t_4 := \left(\left(\left(t\_3 - \sqrt{y}\right) + \left(t\_1 - \sqrt{x}\right)\right) + \left(t\_2 - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ t_5 := \left(\left(t\_2 + t\_3\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right) + 1\\ \mathbf{if}\;t\_4 \leq 1:\\ \;\;\;\;t\_5\\ \mathbf{elif}\;t\_4 \leq 2:\\ \;\;\;\;\left(t\_3 + t\_1\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;t\_5\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (sqrt (+ x 1.0)))
        (t_2 (sqrt (+ z 1.0)))
        (t_3 (sqrt (+ 1.0 y)))
        (t_4
         (+
          (+ (+ (- t_3 (sqrt y)) (- t_1 (sqrt x))) (- t_2 (sqrt z)))
          (- (sqrt (+ t 1.0)) (sqrt t))))
        (t_5 (+ (- (+ t_2 t_3) (+ (+ (sqrt z) (sqrt y)) (sqrt x))) 1.0)))
   (if (<= t_4 1.0)
     t_5
     (if (<= t_4 2.0) (- (+ t_3 t_1) (+ (sqrt y) (sqrt x))) t_5))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((x + 1.0));
	double t_2 = sqrt((z + 1.0));
	double t_3 = sqrt((1.0 + y));
	double t_4 = (((t_3 - sqrt(y)) + (t_1 - sqrt(x))) + (t_2 - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
	double t_5 = ((t_2 + t_3) - ((sqrt(z) + sqrt(y)) + sqrt(x))) + 1.0;
	double tmp;
	if (t_4 <= 1.0) {
		tmp = t_5;
	} else if (t_4 <= 2.0) {
		tmp = (t_3 + t_1) - (sqrt(y) + sqrt(x));
	} else {
		tmp = t_5;
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    real(8) :: t_2
    real(8) :: t_3
    real(8) :: t_4
    real(8) :: t_5
    real(8) :: tmp
    t_1 = sqrt((x + 1.0d0))
    t_2 = sqrt((z + 1.0d0))
    t_3 = sqrt((1.0d0 + y))
    t_4 = (((t_3 - sqrt(y)) + (t_1 - sqrt(x))) + (t_2 - sqrt(z))) + (sqrt((t + 1.0d0)) - sqrt(t))
    t_5 = ((t_2 + t_3) - ((sqrt(z) + sqrt(y)) + sqrt(x))) + 1.0d0
    if (t_4 <= 1.0d0) then
        tmp = t_5
    else if (t_4 <= 2.0d0) then
        tmp = (t_3 + t_1) - (sqrt(y) + sqrt(x))
    else
        tmp = t_5
    end if
    code = tmp
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	double t_1 = Math.sqrt((x + 1.0));
	double t_2 = Math.sqrt((z + 1.0));
	double t_3 = Math.sqrt((1.0 + y));
	double t_4 = (((t_3 - Math.sqrt(y)) + (t_1 - Math.sqrt(x))) + (t_2 - Math.sqrt(z))) + (Math.sqrt((t + 1.0)) - Math.sqrt(t));
	double t_5 = ((t_2 + t_3) - ((Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x))) + 1.0;
	double tmp;
	if (t_4 <= 1.0) {
		tmp = t_5;
	} else if (t_4 <= 2.0) {
		tmp = (t_3 + t_1) - (Math.sqrt(y) + Math.sqrt(x));
	} else {
		tmp = t_5;
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt((x + 1.0))
	t_2 = math.sqrt((z + 1.0))
	t_3 = math.sqrt((1.0 + y))
	t_4 = (((t_3 - math.sqrt(y)) + (t_1 - math.sqrt(x))) + (t_2 - math.sqrt(z))) + (math.sqrt((t + 1.0)) - math.sqrt(t))
	t_5 = ((t_2 + t_3) - ((math.sqrt(z) + math.sqrt(y)) + math.sqrt(x))) + 1.0
	tmp = 0
	if t_4 <= 1.0:
		tmp = t_5
	elif t_4 <= 2.0:
		tmp = (t_3 + t_1) - (math.sqrt(y) + math.sqrt(x))
	else:
		tmp = t_5
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(x + 1.0))
	t_2 = sqrt(Float64(z + 1.0))
	t_3 = sqrt(Float64(1.0 + y))
	t_4 = Float64(Float64(Float64(Float64(t_3 - sqrt(y)) + Float64(t_1 - sqrt(x))) + Float64(t_2 - sqrt(z))) + Float64(sqrt(Float64(t + 1.0)) - sqrt(t)))
	t_5 = Float64(Float64(Float64(t_2 + t_3) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))) + 1.0)
	tmp = 0.0
	if (t_4 <= 1.0)
		tmp = t_5;
	elseif (t_4 <= 2.0)
		tmp = Float64(Float64(t_3 + t_1) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = t_5;
	end
	return tmp
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp_2 = code(x, y, z, t)
	t_1 = sqrt((x + 1.0));
	t_2 = sqrt((z + 1.0));
	t_3 = sqrt((1.0 + y));
	t_4 = (((t_3 - sqrt(y)) + (t_1 - sqrt(x))) + (t_2 - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
	t_5 = ((t_2 + t_3) - ((sqrt(z) + sqrt(y)) + sqrt(x))) + 1.0;
	tmp = 0.0;
	if (t_4 <= 1.0)
		tmp = t_5;
	elseif (t_4 <= 2.0)
		tmp = (t_3 + t_1) - (sqrt(y) + sqrt(x));
	else
		tmp = t_5;
	end
	tmp_2 = tmp;
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[(N[(N[(N[(t$95$3 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(t$95$1 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(t$95$2 - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(t$95$2 + t$95$3), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]}, If[LessEqual[t$95$4, 1.0], t$95$5, If[LessEqual[t$95$4, 2.0], N[(N[(t$95$3 + t$95$1), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$5]]]]]]]

Derivation

1. Split input into 2 regimes

2. if (+.f64 (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) (-.f64 (sqrt.f64 (+.f64 t #s(literal 1 binary64))) (sqrt.f64 t))) < 1 or 2 < (+.f64 (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) (-.f64 (sqrt.f64 (+.f64 t #s(literal 1 binary64))) (sqrt.f64 t)))

   1. Initial program 90.7%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 16.4

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

   5. Applied rewrites 16.4%

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

   6. Taylor expanded in x around 0

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

   8. Applied rewrites 37.0%

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

   if 1 < (+.f64 (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) (-.f64 (sqrt.f64 (+.f64 t #s(literal 1 binary64))) (sqrt.f64 t))) < 2

   1. Initial program 96.7%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 6.8

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

   5. Applied rewrites 6.8%

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

   6. Taylor expanded in z around inf

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

   8. Applied rewrites 21.5%

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

4. Final simplification 30.5%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \leq 1:\\ \;\;\;\;\left(\left(\sqrt{z + 1} + \sqrt{1 + y}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right) + 1\\ \mathbf{elif}\;\left(\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \leq 2:\\ \;\;\;\;\left(\sqrt{1 + y} + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{z + 1} + \sqrt{1 + y}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right) + 1\\ \end{array} \]
5. Add Preprocessing

Alternative 5: 96.7% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1} - \sqrt{z}\\ t_2 := \sqrt{1 + y} - \sqrt{y}\\ t_3 := 1 - \sqrt{x}\\ t_4 := \sqrt{t + 1} - \sqrt{t}\\ t_5 := \sqrt{x + 1}\\ t_6 := \left(t\_2 + \left(t\_5 - \sqrt{x}\right)\right) + t\_1\\ \mathbf{if}\;t\_6 \leq 0.9999998:\\ \;\;\;\;\left(\frac{1}{t\_5 + \sqrt{x}} + t\_1\right) + t\_4\\ \mathbf{elif}\;t\_6 \leq 2.01:\\ \;\;\;\;\left(\sqrt{\frac{1}{z}} \cdot 0.5 + \left(t\_3 + t\_2\right)\right) + t\_4\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{y}\right) + t\_3\right) + t\_1\right) + t\_4\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_2 (- (sqrt (+ 1.0 y)) (sqrt y)))
        (t_3 (- 1.0 (sqrt x)))
        (t_4 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_5 (sqrt (+ x 1.0)))
        (t_6 (+ (+ t_2 (- t_5 (sqrt x))) t_1)))
   (if (<= t_6 0.9999998)
     (+ (+ (/ 1.0 (+ t_5 (sqrt x))) t_1) t_4)
     (if (<= t_6 2.01)
       (+ (+ (* (sqrt (/ 1.0 z)) 0.5) (+ t_3 t_2)) t_4)
       (+ (+ (+ (- 1.0 (sqrt y)) t_3) t_1) t_4)))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0)) - sqrt(z);
	double t_2 = sqrt((1.0 + y)) - sqrt(y);
	double t_3 = 1.0 - sqrt(x);
	double t_4 = sqrt((t + 1.0)) - sqrt(t);
	double t_5 = sqrt((x + 1.0));
	double t_6 = (t_2 + (t_5 - sqrt(x))) + t_1;
	double tmp;
	if (t_6 <= 0.9999998) {
		tmp = ((1.0 / (t_5 + sqrt(x))) + t_1) + t_4;
	} else if (t_6 <= 2.01) {
		tmp = ((sqrt((1.0 / z)) * 0.5) + (t_3 + t_2)) + t_4;
	} else {
		tmp = (((1.0 - sqrt(y)) + t_3) + t_1) + t_4;
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    real(8) :: t_2
    real(8) :: t_3
    real(8) :: t_4
    real(8) :: t_5
    real(8) :: t_6
    real(8) :: tmp
    t_1 = sqrt((z + 1.0d0)) - sqrt(z)
    t_2 = sqrt((1.0d0 + y)) - sqrt(y)
    t_3 = 1.0d0 - sqrt(x)
    t_4 = sqrt((t + 1.0d0)) - sqrt(t)
    t_5 = sqrt((x + 1.0d0))
    t_6 = (t_2 + (t_5 - sqrt(x))) + t_1
    if (t_6 <= 0.9999998d0) then
        tmp = ((1.0d0 / (t_5 + sqrt(x))) + t_1) + t_4
    else if (t_6 <= 2.01d0) then
        tmp = ((sqrt((1.0d0 / z)) * 0.5d0) + (t_3 + t_2)) + t_4
    else
        tmp = (((1.0d0 - sqrt(y)) + t_3) + t_1) + t_4
    end if
    code = tmp
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	double t_1 = Math.sqrt((z + 1.0)) - Math.sqrt(z);
	double t_2 = Math.sqrt((1.0 + y)) - Math.sqrt(y);
	double t_3 = 1.0 - Math.sqrt(x);
	double t_4 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_5 = Math.sqrt((x + 1.0));
	double t_6 = (t_2 + (t_5 - Math.sqrt(x))) + t_1;
	double tmp;
	if (t_6 <= 0.9999998) {
		tmp = ((1.0 / (t_5 + Math.sqrt(x))) + t_1) + t_4;
	} else if (t_6 <= 2.01) {
		tmp = ((Math.sqrt((1.0 / z)) * 0.5) + (t_3 + t_2)) + t_4;
	} else {
		tmp = (((1.0 - Math.sqrt(y)) + t_3) + t_1) + t_4;
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt((z + 1.0)) - math.sqrt(z)
	t_2 = math.sqrt((1.0 + y)) - math.sqrt(y)
	t_3 = 1.0 - math.sqrt(x)
	t_4 = math.sqrt((t + 1.0)) - math.sqrt(t)
	t_5 = math.sqrt((x + 1.0))
	t_6 = (t_2 + (t_5 - math.sqrt(x))) + t_1
	tmp = 0
	if t_6 <= 0.9999998:
		tmp = ((1.0 / (t_5 + math.sqrt(x))) + t_1) + t_4
	elif t_6 <= 2.01:
		tmp = ((math.sqrt((1.0 / z)) * 0.5) + (t_3 + t_2)) + t_4
	else:
		tmp = (((1.0 - math.sqrt(y)) + t_3) + t_1) + t_4
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = Float64(sqrt(Float64(1.0 + y)) - sqrt(y))
	t_3 = Float64(1.0 - sqrt(x))
	t_4 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_5 = sqrt(Float64(x + 1.0))
	t_6 = Float64(Float64(t_2 + Float64(t_5 - sqrt(x))) + t_1)
	tmp = 0.0
	if (t_6 <= 0.9999998)
		tmp = Float64(Float64(Float64(1.0 / Float64(t_5 + sqrt(x))) + t_1) + t_4);
	elseif (t_6 <= 2.01)
		tmp = Float64(Float64(Float64(sqrt(Float64(1.0 / z)) * 0.5) + Float64(t_3 + t_2)) + t_4);
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(y)) + t_3) + t_1) + t_4);
	end
	return tmp
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp_2 = code(x, y, z, t)
	t_1 = sqrt((z + 1.0)) - sqrt(z);
	t_2 = sqrt((1.0 + y)) - sqrt(y);
	t_3 = 1.0 - sqrt(x);
	t_4 = sqrt((t + 1.0)) - sqrt(t);
	t_5 = sqrt((x + 1.0));
	t_6 = (t_2 + (t_5 - sqrt(x))) + t_1;
	tmp = 0.0;
	if (t_6 <= 0.9999998)
		tmp = ((1.0 / (t_5 + sqrt(x))) + t_1) + t_4;
	elseif (t_6 <= 2.01)
		tmp = ((sqrt((1.0 / z)) * 0.5) + (t_3 + t_2)) + t_4;
	else
		tmp = (((1.0 - sqrt(y)) + t_3) + t_1) + t_4;
	end
	tmp_2 = tmp;
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$6 = N[(N[(t$95$2 + N[(t$95$5 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision]}, If[LessEqual[t$95$6, 0.9999998], N[(N[(N[(1.0 / N[(t$95$5 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$4), $MachinePrecision], If[LessEqual[t$95$6, 2.01], N[(N[(N[(N[Sqrt[N[(1.0 / z), $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + N[(t$95$3 + t$95$2), $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$4), $MachinePrecision]]]]]]]]]

Derivation

1. Split input into 3 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 0.999999799999999994

   1. Initial program 66.2%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-+.f64 N/A

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

      2. +-commutative N/A

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

      3. lift--.f64 N/A

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

      4. flip-- N/A

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

      5. lift--.f64 N/A

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

      6. flip-- N/A

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

      7. frac-add N/A

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

      8. lower-/.f64 N/A

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

   4. Applied rewrites 67.7%

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

   5. Taylor expanded in x around 0

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

      1. associate-+r+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 N/A

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

      5. +-commutative N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 61.6

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

   7. Applied rewrites 61.6%

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

   8. Taylor expanded in y around inf

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

      1. lower-/.f64 N/A

         \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x} + \sqrt{1 + x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      2. +-commutative N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      4. lower-sqrt.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      5. +-commutative N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      6. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      7. lower-sqrt.f64 58.7

         \[\leadsto \left(\frac{1}{\sqrt{x + 1} + \color{blue}{\sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   10. Applied rewrites 58.7%

       \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x + 1} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   if 0.999999799999999994 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 2.0099999999999998

   1. Initial program 97.1%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 50.4

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

   5. Applied rewrites 50.4%

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

   6. Taylor expanded in z around inf

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

      1. *-commutative N/A

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

      2. lower-*.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-/.f64 35.1

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

   8. Applied rewrites 35.1%

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

   if 2.0099999999999998 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 98.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 93.1

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

   5. Applied rewrites 93.1%

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

   6. Taylor expanded in y around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 85.8

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

   8. Applied rewrites 85.8%

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

4. Final simplification 45.2%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 0.9999998:\\ \;\;\;\;\left(\frac{1}{\sqrt{x + 1} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 2.01:\\ \;\;\;\;\left(\sqrt{\frac{1}{z}} \cdot 0.5 + \left(\left(1 - \sqrt{x}\right) + \left(\sqrt{1 + y} - \sqrt{y}\right)\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{y}\right) + \left(1 - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 6: 96.9% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1} - \sqrt{z}\\ t_2 := \sqrt{1 + y}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \sqrt{x + 1}\\ t_5 := \left(\left(t\_2 - \sqrt{y}\right) + \left(t\_4 - \sqrt{x}\right)\right) + t\_1\\ \mathbf{if}\;t\_5 \leq 1:\\ \;\;\;\;\left(\frac{1}{t\_4 + \sqrt{x}} + t\_1\right) + t\_3\\ \mathbf{elif}\;t\_5 \leq 2.000001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{z}}, 0.5, t\_2\right) + t\_4\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{y}\right) + \left(1 - \sqrt{x}\right)\right) + t\_1\right) + t\_3\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_2 (sqrt (+ 1.0 y)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4 (sqrt (+ x 1.0)))
        (t_5 (+ (+ (- t_2 (sqrt y)) (- t_4 (sqrt x))) t_1)))
   (if (<= t_5 1.0)
     (+ (+ (/ 1.0 (+ t_4 (sqrt x))) t_1) t_3)
     (if (<= t_5 2.000001)
       (- (+ (fma (sqrt (/ 1.0 z)) 0.5 t_2) t_4) (+ (sqrt y) (sqrt x)))
       (+ (+ (+ (- 1.0 (sqrt y)) (- 1.0 (sqrt x))) t_1) t_3)))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0)) - sqrt(z);
	double t_2 = sqrt((1.0 + y));
	double t_3 = sqrt((t + 1.0)) - sqrt(t);
	double t_4 = sqrt((x + 1.0));
	double t_5 = ((t_2 - sqrt(y)) + (t_4 - sqrt(x))) + t_1;
	double tmp;
	if (t_5 <= 1.0) {
		tmp = ((1.0 / (t_4 + sqrt(x))) + t_1) + t_3;
	} else if (t_5 <= 2.000001) {
		tmp = (fma(sqrt((1.0 / z)), 0.5, t_2) + t_4) - (sqrt(y) + sqrt(x));
	} else {
		tmp = (((1.0 - sqrt(y)) + (1.0 - sqrt(x))) + t_1) + t_3;
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = sqrt(Float64(1.0 + y))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_4 = sqrt(Float64(x + 1.0))
	t_5 = Float64(Float64(Float64(t_2 - sqrt(y)) + Float64(t_4 - sqrt(x))) + t_1)
	tmp = 0.0
	if (t_5 <= 1.0)
		tmp = Float64(Float64(Float64(1.0 / Float64(t_4 + sqrt(x))) + t_1) + t_3);
	elseif (t_5 <= 2.000001)
		tmp = Float64(Float64(fma(sqrt(Float64(1.0 / z)), 0.5, t_2) + t_4) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(y)) + Float64(1.0 - sqrt(x))) + t_1) + t_3);
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(t$95$2 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(t$95$4 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision]}, If[LessEqual[t$95$5, 1.0], N[(N[(N[(1.0 / N[(t$95$4 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$5, 2.000001], N[(N[(N[(N[Sqrt[N[(1.0 / z), $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$2), $MachinePrecision] + t$95$4), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$3), $MachinePrecision]]]]]]]]

Derivation

1. Split input into 3 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 1

   1. Initial program 88.6%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-+.f64 N/A

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

      2. +-commutative N/A

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

      3. lift--.f64 N/A

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

      4. flip-- N/A

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

      5. lift--.f64 N/A

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

      6. flip-- N/A

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

      7. frac-add N/A

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

      8. lower-/.f64 N/A

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

   4. Applied rewrites 89.1%

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

   5. Taylor expanded in x around 0

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

      1. associate-+r+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 N/A

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

      5. +-commutative N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 74.5

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

   7. Applied rewrites 74.5%

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

   8. Taylor expanded in y around inf

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

      1. lower-/.f64 N/A

         \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x} + \sqrt{1 + x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      2. +-commutative N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      4. lower-sqrt.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      5. +-commutative N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      6. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      7. lower-sqrt.f64 72.8

         \[\leadsto \left(\frac{1}{\sqrt{x + 1} + \color{blue}{\sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   10. Applied rewrites 72.8%

       \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x + 1} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   if 1 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 2.0000010000000001

   1. Initial program 96.4%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 8.7

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

   5. Applied rewrites 8.7%

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

   6. Taylor expanded in z around inf

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

   8. Applied rewrites 26.5%

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

   if 2.0000010000000001 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 98.6%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 93.1

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

   5. Applied rewrites 93.1%

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

   6. Taylor expanded in y around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 83.4

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

   8. Applied rewrites 83.4%

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

4. Final simplification 55.3%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 1:\\ \;\;\;\;\left(\frac{1}{\sqrt{x + 1} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 2.000001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{z}}, 0.5, \sqrt{1 + y}\right) + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{y}\right) + \left(1 - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 7: 86.1% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1}\\ t_2 := t\_1 - \sqrt{z}\\ t_3 := \sqrt{1 + y}\\ t_4 := \sqrt{x + 1}\\ t_5 := \left(\left(t\_3 - \sqrt{y}\right) + \left(t\_4 - \sqrt{x}\right)\right) + t\_2\\ \mathbf{if}\;t\_5 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_2\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;t\_5 \leq 2.01:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{z}}, 0.5, t\_3\right) + t\_4\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_3 + 1\right) + t\_1\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (sqrt (+ z 1.0)))
        (t_2 (- t_1 (sqrt z)))
        (t_3 (sqrt (+ 1.0 y)))
        (t_4 (sqrt (+ x 1.0)))
        (t_5 (+ (+ (- t_3 (sqrt y)) (- t_4 (sqrt x))) t_2)))
   (if (<= t_5 1.0)
     (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_2) (- (sqrt (+ t 1.0)) (sqrt t)))
     (if (<= t_5 2.01)
       (- (+ (fma (sqrt (/ 1.0 z)) 0.5 t_3) t_4) (+ (sqrt y) (sqrt x)))
       (- (+ (+ t_3 1.0) t_1) (+ (+ (sqrt z) (sqrt y)) (sqrt x)))))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0));
	double t_2 = t_1 - sqrt(z);
	double t_3 = sqrt((1.0 + y));
	double t_4 = sqrt((x + 1.0));
	double t_5 = ((t_3 - sqrt(y)) + (t_4 - sqrt(x))) + t_2;
	double tmp;
	if (t_5 <= 1.0) {
		tmp = ((fma(0.5, x, 1.0) - sqrt(x)) + t_2) + (sqrt((t + 1.0)) - sqrt(t));
	} else if (t_5 <= 2.01) {
		tmp = (fma(sqrt((1.0 / z)), 0.5, t_3) + t_4) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_3 + 1.0) + t_1) - ((sqrt(z) + sqrt(y)) + sqrt(x));
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(z + 1.0))
	t_2 = Float64(t_1 - sqrt(z))
	t_3 = sqrt(Float64(1.0 + y))
	t_4 = sqrt(Float64(x + 1.0))
	t_5 = Float64(Float64(Float64(t_3 - sqrt(y)) + Float64(t_4 - sqrt(x))) + t_2)
	tmp = 0.0
	if (t_5 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_2) + Float64(sqrt(Float64(t + 1.0)) - sqrt(t)));
	elseif (t_5 <= 2.01)
		tmp = Float64(Float64(fma(sqrt(Float64(1.0 / z)), 0.5, t_3) + t_4) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_3 + 1.0) + t_1) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x)));
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[(t$95$1 - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(t$95$3 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(t$95$4 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision]}, If[LessEqual[t$95$5, 1.0], N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$5, 2.01], N[(N[(N[(N[Sqrt[N[(1.0 / z), $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$3), $MachinePrecision] + t$95$4), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$3 + 1.0), $MachinePrecision] + t$95$1), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]

Derivation

1. Split input into 3 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 1

   1. Initial program 88.6%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

      \[\leadsto \left(\color{blue}{\left(\sqrt{1 + x} - \sqrt{x}\right)} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   4. Step-by-step derivation

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 70.6

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

   5. Applied rewrites 70.6%

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

   6. Taylor expanded in x around 0

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

   8. Applied rewrites 25.4%

      \[\leadsto \left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \color{blue}{\sqrt{x}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   if 1 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 2.0099999999999998

   1. Initial program 96.3%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 8.8

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

   5. Applied rewrites 8.8%

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

   6. Taylor expanded in z around inf

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

   8. Applied rewrites 26.3%

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

   if 2.0099999999999998 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 98.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 52.7

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

   5. Applied rewrites 52.7%

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

   6. Taylor expanded in x around 0

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

   8. Applied rewrites 48.1%

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

4. Final simplification 28.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 2.01:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{z}}, 0.5, \sqrt{1 + y}\right) + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{z + 1}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 8: 85.2% accurate, 0.5× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1}\\ t_2 := t\_1 - \sqrt{z}\\ t_3 := \sqrt{1 + y}\\ t_4 := \sqrt{x + 1}\\ t_5 := \left(\left(t\_3 - \sqrt{y}\right) + \left(t\_4 - \sqrt{x}\right)\right) + t\_2\\ \mathbf{if}\;t\_5 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_2\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;t\_5 \leq 2:\\ \;\;\;\;\left(t\_3 + t\_4\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_3 + 1\right) + t\_1\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (sqrt (+ z 1.0)))
        (t_2 (- t_1 (sqrt z)))
        (t_3 (sqrt (+ 1.0 y)))
        (t_4 (sqrt (+ x 1.0)))
        (t_5 (+ (+ (- t_3 (sqrt y)) (- t_4 (sqrt x))) t_2)))
   (if (<= t_5 1.0)
     (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_2) (- (sqrt (+ t 1.0)) (sqrt t)))
     (if (<= t_5 2.0)
       (- (+ t_3 t_4) (+ (sqrt y) (sqrt x)))
       (- (+ (+ t_3 1.0) t_1) (+ (+ (sqrt z) (sqrt y)) (sqrt x)))))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0));
	double t_2 = t_1 - sqrt(z);
	double t_3 = sqrt((1.0 + y));
	double t_4 = sqrt((x + 1.0));
	double t_5 = ((t_3 - sqrt(y)) + (t_4 - sqrt(x))) + t_2;
	double tmp;
	if (t_5 <= 1.0) {
		tmp = ((fma(0.5, x, 1.0) - sqrt(x)) + t_2) + (sqrt((t + 1.0)) - sqrt(t));
	} else if (t_5 <= 2.0) {
		tmp = (t_3 + t_4) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_3 + 1.0) + t_1) - ((sqrt(z) + sqrt(y)) + sqrt(x));
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(z + 1.0))
	t_2 = Float64(t_1 - sqrt(z))
	t_3 = sqrt(Float64(1.0 + y))
	t_4 = sqrt(Float64(x + 1.0))
	t_5 = Float64(Float64(Float64(t_3 - sqrt(y)) + Float64(t_4 - sqrt(x))) + t_2)
	tmp = 0.0
	if (t_5 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_2) + Float64(sqrt(Float64(t + 1.0)) - sqrt(t)));
	elseif (t_5 <= 2.0)
		tmp = Float64(Float64(t_3 + t_4) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_3 + 1.0) + t_1) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x)));
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[(t$95$1 - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(t$95$3 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(t$95$4 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision]}, If[LessEqual[t$95$5, 1.0], N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$5, 2.0], N[(N[(t$95$3 + t$95$4), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$3 + 1.0), $MachinePrecision] + t$95$1), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]

Derivation

1. Split input into 3 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 1

   1. Initial program 88.6%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

      \[\leadsto \left(\color{blue}{\left(\sqrt{1 + x} - \sqrt{x}\right)} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   4. Step-by-step derivation

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 70.6

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

   5. Applied rewrites 70.6%

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

   6. Taylor expanded in x around 0

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

   8. Applied rewrites 25.4%

      \[\leadsto \left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \color{blue}{\sqrt{x}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   if 1 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 2

   1. Initial program 96.6%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 8.1

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

   5. Applied rewrites 8.1%

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

   6. Taylor expanded in z around inf

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

   8. Applied rewrites 26.0%

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

   if 2 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 97.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 52.3

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

   5. Applied rewrites 52.3%

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

   6. Taylor expanded in x around 0

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

   8. Applied rewrites 48.0%

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

4. Final simplification 28.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 2:\\ \;\;\;\;\left(\sqrt{1 + y} + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{z + 1}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 9: 96.2% accurate, 0.6× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{t + 1} - \sqrt{t}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{1 + y} - \sqrt{y}\\ \mathbf{if}\;\left(t\_3 + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + t\_2 \leq 0.1:\\ \;\;\;\;\left(\left(\sqrt{\frac{1}{x}} + \sqrt{\frac{1}{y}}\right) \cdot 0.5 + t\_2\right) + t\_1\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right) + t\_3\right) + t\_2\right) + t\_1\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (- (sqrt (+ 1.0 y)) (sqrt y))))
   (if (<= (+ (+ t_3 (- (sqrt (+ x 1.0)) (sqrt x))) t_2) 0.1)
     (+ (+ (* (+ (sqrt (/ 1.0 x)) (sqrt (/ 1.0 y))) 0.5) t_2) t_1)
     (+ (+ (+ (fma 0.5 x (- 1.0 (sqrt x))) t_3) t_2) t_1))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((t + 1.0)) - sqrt(t);
	double t_2 = sqrt((z + 1.0)) - sqrt(z);
	double t_3 = sqrt((1.0 + y)) - sqrt(y);
	double tmp;
	if (((t_3 + (sqrt((x + 1.0)) - sqrt(x))) + t_2) <= 0.1) {
		tmp = (((sqrt((1.0 / x)) + sqrt((1.0 / y))) * 0.5) + t_2) + t_1;
	} else {
		tmp = ((fma(0.5, x, (1.0 - sqrt(x))) + t_3) + t_2) + t_1;
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = Float64(sqrt(Float64(1.0 + y)) - sqrt(y))
	tmp = 0.0
	if (Float64(Float64(t_3 + Float64(sqrt(Float64(x + 1.0)) - sqrt(x))) + t_2) <= 0.1)
		tmp = Float64(Float64(Float64(Float64(sqrt(Float64(1.0 / x)) + sqrt(Float64(1.0 / y))) * 0.5) + t_2) + t_1);
	else
		tmp = Float64(Float64(Float64(fma(0.5, x, Float64(1.0 - sqrt(x))) + t_3) + t_2) + t_1);
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[(N[(t$95$3 + N[(N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision], 0.1], N[(N[(N[(N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[(1.0 / y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * 0.5), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision], N[(N[(N[(N[(0.5 * x + N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision]]]]]

Derivation

1. Split input into 2 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 0.10000000000000001

   1. Initial program 59.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

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

      1. +-commutative N/A

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

      2. associate--l+ N/A

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

      3. *-commutative N/A

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

      4. lower-fma.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-/.f64 N/A

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

      7. lower--.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 70.1

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

   5. Applied rewrites 70.1%

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

   6. Taylor expanded in x around inf

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

   8. Applied rewrites 80.5%

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

   if 0.10000000000000001 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 97.3%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. +-commutative N/A

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

      2. associate--l+ N/A

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

      3. lower-fma.f64 N/A

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

      4. lower--.f64 N/A

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

      5. lower-sqrt.f64 57.7

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

   5. Applied rewrites 57.7%

      \[\leadsto \left(\left(\color{blue}{\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right)} + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
3. Recombined 2 regimes into one program.

4. Final simplification 60.2%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 0.1:\\ \;\;\;\;\left(\left(\sqrt{\frac{1}{x}} + \sqrt{\frac{1}{y}}\right) \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right) + \left(\sqrt{1 + y} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 10: 96.0% accurate, 0.6× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1} - \sqrt{z}\\ t_2 := \sqrt{1 + y} - \sqrt{y}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \sqrt{x + 1}\\ \mathbf{if}\;\left(t\_2 + \left(t\_4 - \sqrt{x}\right)\right) + t\_1 \leq 0.998:\\ \;\;\;\;\left(\frac{1}{t\_4 + \sqrt{x}} + t\_1\right) + t\_3\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right) + t\_2\right) + t\_1\right) + t\_3\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_2 (- (sqrt (+ 1.0 y)) (sqrt y)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4 (sqrt (+ x 1.0))))
   (if (<= (+ (+ t_2 (- t_4 (sqrt x))) t_1) 0.998)
     (+ (+ (/ 1.0 (+ t_4 (sqrt x))) t_1) t_3)
     (+ (+ (+ (fma 0.5 x (- 1.0 (sqrt x))) t_2) t_1) t_3))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0)) - sqrt(z);
	double t_2 = sqrt((1.0 + y)) - sqrt(y);
	double t_3 = sqrt((t + 1.0)) - sqrt(t);
	double t_4 = sqrt((x + 1.0));
	double tmp;
	if (((t_2 + (t_4 - sqrt(x))) + t_1) <= 0.998) {
		tmp = ((1.0 / (t_4 + sqrt(x))) + t_1) + t_3;
	} else {
		tmp = ((fma(0.5, x, (1.0 - sqrt(x))) + t_2) + t_1) + t_3;
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = Float64(sqrt(Float64(1.0 + y)) - sqrt(y))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_4 = sqrt(Float64(x + 1.0))
	tmp = 0.0
	if (Float64(Float64(t_2 + Float64(t_4 - sqrt(x))) + t_1) <= 0.998)
		tmp = Float64(Float64(Float64(1.0 / Float64(t_4 + sqrt(x))) + t_1) + t_3);
	else
		tmp = Float64(Float64(Float64(fma(0.5, x, Float64(1.0 - sqrt(x))) + t_2) + t_1) + t_3);
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[N[(N[(t$95$2 + N[(t$95$4 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision], 0.998], N[(N[(N[(1.0 / N[(t$95$4 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$3), $MachinePrecision], N[(N[(N[(N[(0.5 * x + N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$3), $MachinePrecision]]]]]]

Derivation

1. Split input into 2 regimes

2. if (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z))) < 0.998

   1. Initial program 63.4%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-+.f64 N/A

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

      2. +-commutative N/A

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

      3. lift--.f64 N/A

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

      4. flip-- N/A

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

      5. lift--.f64 N/A

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

      6. flip-- N/A

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

      7. frac-add N/A

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

      8. lower-/.f64 N/A

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

   4. Applied rewrites 65.0%

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

   5. Taylor expanded in x around 0

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

      1. associate-+r+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 N/A

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

      5. +-commutative N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 63.2

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

   7. Applied rewrites 63.2%

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

   8. Taylor expanded in y around inf

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

      1. lower-/.f64 N/A

         \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x} + \sqrt{1 + x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      2. +-commutative N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      4. lower-sqrt.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      5. +-commutative N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      6. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      7. lower-sqrt.f64 60.5

         \[\leadsto \left(\frac{1}{\sqrt{x + 1} + \color{blue}{\sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   10. Applied rewrites 60.5%

       \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x + 1} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   if 0.998 < (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) (-.f64 (sqrt.f64 (+.f64 z #s(literal 1 binary64))) (sqrt.f64 z)))

   1. Initial program 97.3%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. +-commutative N/A

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

      2. associate--l+ N/A

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

      3. lower-fma.f64 N/A

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

      4. lower--.f64 N/A

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

      5. lower-sqrt.f64 58.3

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

   5. Applied rewrites 58.3%

      \[\leadsto \left(\left(\color{blue}{\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right)} + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
3. Recombined 2 regimes into one program.

4. Final simplification 58.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right) \leq 0.998:\\ \;\;\;\;\left(\frac{1}{\sqrt{x + 1} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right) + \left(\sqrt{1 + y} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 11: 98.0% accurate, 0.6× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{x + 1} + \sqrt{x}\\ t_2 := \sqrt{y} + \sqrt{1 + y}\\ \left(\sqrt{t + 1} - \sqrt{t}\right) + \left(\left(\sqrt{z + 1} - \sqrt{z}\right) + \frac{\mathsf{fma}\left(1, t\_1, t\_2\right)}{t\_2 \cdot t\_1}\right) \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (+ (sqrt (+ x 1.0)) (sqrt x)))
        (t_2 (+ (sqrt y) (sqrt (+ 1.0 y)))))
   (+
    (- (sqrt (+ t 1.0)) (sqrt t))
    (+ (- (sqrt (+ z 1.0)) (sqrt z)) (/ (fma 1.0 t_1 t_2) (* t_2 t_1))))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((x + 1.0)) + sqrt(x);
	double t_2 = sqrt(y) + sqrt((1.0 + y));
	return (sqrt((t + 1.0)) - sqrt(t)) + ((sqrt((z + 1.0)) - sqrt(z)) + (fma(1.0, t_1, t_2) / (t_2 * t_1)));
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(x + 1.0)) + sqrt(x))
	t_2 = Float64(sqrt(y) + sqrt(Float64(1.0 + y)))
	return Float64(Float64(sqrt(Float64(t + 1.0)) - sqrt(t)) + Float64(Float64(sqrt(Float64(z + 1.0)) - sqrt(z)) + Float64(fma(1.0, t_1, t_2) / Float64(t_2 * t_1))))
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, N[(N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision] + N[(N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision] + N[(N[(1.0 * t$95$1 + t$95$2), $MachinePrecision] / N[(t$95$2 * t$95$1), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Initial program 93.2%

   \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
2. Add Preprocessing
3. Step-by-step derivation

   1. lift-+.f64 N/A

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

   2. +-commutative N/A

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

   3. lift--.f64 N/A

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

   4. flip-- N/A

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

   5. lift--.f64 N/A

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

   6. flip-- N/A

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

   7. frac-add N/A

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

   8. lower-/.f64 N/A

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

4. Applied rewrites 94.0%

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

5. Taylor expanded in x around 0

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

   1. +-commutative N/A

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

   2. lower-+.f64 N/A

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

   3. lower-sqrt.f64 N/A

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

   4. lower-+.f64 N/A

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

   5. lower-sqrt.f64 95.0

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

7. Applied rewrites 95.0%

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

8. Taylor expanded in y around 0

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

10. Applied rewrites 97.5%

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

11. Final simplification 97.5%

    \[\leadsto \left(\sqrt{t + 1} - \sqrt{t}\right) + \left(\left(\sqrt{z + 1} - \sqrt{z}\right) + \frac{\mathsf{fma}\left(1, \sqrt{x + 1} + \sqrt{x}, \sqrt{y} + \sqrt{1 + y}\right)}{\left(\sqrt{y} + \sqrt{1 + y}\right) \cdot \left(\sqrt{x + 1} + \sqrt{x}\right)}\right) \]
12. Add Preprocessing

Alternative 12: 98.4% accurate, 0.6× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{t + 1} - \sqrt{t}\\ t_2 := \sqrt{1 + y} - \sqrt{y}\\ t_3 := \sqrt{z + 1}\\ t_4 := \sqrt{x + 1}\\ \mathbf{if}\;t\_2 + \left(t\_4 - \sqrt{x}\right) \leq 1.0002:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{y}}, 0.5, \frac{1}{t\_4 + \sqrt{x}}\right) + \left(t\_3 - \sqrt{z}\right)\right) + t\_1\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + t\_2\right) + \frac{\left(z + 1\right) - z}{\sqrt{z} + t\_3}\right) + t\_1\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_2 (- (sqrt (+ 1.0 y)) (sqrt y)))
        (t_3 (sqrt (+ z 1.0)))
        (t_4 (sqrt (+ x 1.0))))
   (if (<= (+ t_2 (- t_4 (sqrt x))) 1.0002)
     (+
      (+ (fma (sqrt (/ 1.0 y)) 0.5 (/ 1.0 (+ t_4 (sqrt x)))) (- t_3 (sqrt z)))
      t_1)
     (+
      (+ (+ (- 1.0 (sqrt x)) t_2) (/ (- (+ z 1.0) z) (+ (sqrt z) t_3)))
      t_1))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((t + 1.0)) - sqrt(t);
	double t_2 = sqrt((1.0 + y)) - sqrt(y);
	double t_3 = sqrt((z + 1.0));
	double t_4 = sqrt((x + 1.0));
	double tmp;
	if ((t_2 + (t_4 - sqrt(x))) <= 1.0002) {
		tmp = (fma(sqrt((1.0 / y)), 0.5, (1.0 / (t_4 + sqrt(x)))) + (t_3 - sqrt(z))) + t_1;
	} else {
		tmp = (((1.0 - sqrt(x)) + t_2) + (((z + 1.0) - z) / (sqrt(z) + t_3))) + t_1;
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_2 = Float64(sqrt(Float64(1.0 + y)) - sqrt(y))
	t_3 = sqrt(Float64(z + 1.0))
	t_4 = sqrt(Float64(x + 1.0))
	tmp = 0.0
	if (Float64(t_2 + Float64(t_4 - sqrt(x))) <= 1.0002)
		tmp = Float64(Float64(fma(sqrt(Float64(1.0 / y)), 0.5, Float64(1.0 / Float64(t_4 + sqrt(x)))) + Float64(t_3 - sqrt(z))) + t_1);
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(x)) + t_2) + Float64(Float64(Float64(z + 1.0) - z) / Float64(sqrt(z) + t_3))) + t_1);
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[N[(t$95$2 + N[(t$95$4 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 1.0002], N[(N[(N[(N[Sqrt[N[(1.0 / y), $MachinePrecision]], $MachinePrecision] * 0.5 + N[(1.0 / N[(t$95$4 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(t$95$3 - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + N[(N[(N[(z + 1.0), $MachinePrecision] - z), $MachinePrecision] / N[(N[Sqrt[z], $MachinePrecision] + t$95$3), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision]]]]]]

Derivation

1. Split input into 2 regimes

2. if (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) < 1.0002

   1. Initial program 91.3%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-+.f64 N/A

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

      2. +-commutative N/A

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

      3. lift--.f64 N/A

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

      4. flip-- N/A

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

      5. lift--.f64 N/A

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

      6. flip-- N/A

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

      7. frac-add N/A

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

      8. lower-/.f64 N/A

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

   4. Applied rewrites 92.4%

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

   5. Taylor expanded in x around 0

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

      1. associate-+r+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 N/A

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

      5. +-commutative N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 70.0

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

   7. Applied rewrites 70.0%

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

   8. Taylor expanded in y around inf

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

      1. *-commutative N/A

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

      2. lower-fma.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-/.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. +-commutative N/A

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

      10. lower-+.f64 N/A

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

      11. lower-sqrt.f64 69.8

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

   10. Applied rewrites 69.8%

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

   if 1.0002 < (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y)))

   1. Initial program 98.1%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 94.0

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

   5. Applied rewrites 94.0%

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

      1. lift--.f64 N/A

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

      2. flip-- N/A

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

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lift-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 94.3

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lift-+.f64 94.3

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

   7. Applied rewrites 94.3%

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

4. Final simplification 76.7%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right) \leq 1.0002:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{y}}, 0.5, \frac{1}{\sqrt{x + 1} + \sqrt{x}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + \left(\sqrt{1 + y} - \sqrt{y}\right)\right) + \frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 13: 96.7% accurate, 0.7× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{t + 1} - \sqrt{t}\\ t_2 := \left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\\ t_3 := \sqrt{z + 1} - \sqrt{z}\\ \mathbf{if}\;t\_2 \leq 10^{-5}:\\ \;\;\;\;\left(\left(\sqrt{\frac{1}{x}} + \sqrt{\frac{1}{y}}\right) \cdot 0.5 + t\_3\right) + t\_1\\ \mathbf{else}:\\ \;\;\;\;\left(t\_2 + t\_3\right) + t\_1\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_2 (+ (- (sqrt (+ 1.0 y)) (sqrt y)) (- (sqrt (+ x 1.0)) (sqrt x))))
        (t_3 (- (sqrt (+ z 1.0)) (sqrt z))))
   (if (<= t_2 1e-5)
     (+ (+ (* (+ (sqrt (/ 1.0 x)) (sqrt (/ 1.0 y))) 0.5) t_3) t_1)
     (+ (+ t_2 t_3) t_1))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((t + 1.0)) - sqrt(t);
	double t_2 = (sqrt((1.0 + y)) - sqrt(y)) + (sqrt((x + 1.0)) - sqrt(x));
	double t_3 = sqrt((z + 1.0)) - sqrt(z);
	double tmp;
	if (t_2 <= 1e-5) {
		tmp = (((sqrt((1.0 / x)) + sqrt((1.0 / y))) * 0.5) + t_3) + t_1;
	} else {
		tmp = (t_2 + t_3) + t_1;
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    real(8) :: t_2
    real(8) :: t_3
    real(8) :: tmp
    t_1 = sqrt((t + 1.0d0)) - sqrt(t)
    t_2 = (sqrt((1.0d0 + y)) - sqrt(y)) + (sqrt((x + 1.0d0)) - sqrt(x))
    t_3 = sqrt((z + 1.0d0)) - sqrt(z)
    if (t_2 <= 1d-5) then
        tmp = (((sqrt((1.0d0 / x)) + sqrt((1.0d0 / y))) * 0.5d0) + t_3) + t_1
    else
        tmp = (t_2 + t_3) + t_1
    end if
    code = tmp
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	double t_1 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_2 = (Math.sqrt((1.0 + y)) - Math.sqrt(y)) + (Math.sqrt((x + 1.0)) - Math.sqrt(x));
	double t_3 = Math.sqrt((z + 1.0)) - Math.sqrt(z);
	double tmp;
	if (t_2 <= 1e-5) {
		tmp = (((Math.sqrt((1.0 / x)) + Math.sqrt((1.0 / y))) * 0.5) + t_3) + t_1;
	} else {
		tmp = (t_2 + t_3) + t_1;
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt((t + 1.0)) - math.sqrt(t)
	t_2 = (math.sqrt((1.0 + y)) - math.sqrt(y)) + (math.sqrt((x + 1.0)) - math.sqrt(x))
	t_3 = math.sqrt((z + 1.0)) - math.sqrt(z)
	tmp = 0
	if t_2 <= 1e-5:
		tmp = (((math.sqrt((1.0 / x)) + math.sqrt((1.0 / y))) * 0.5) + t_3) + t_1
	else:
		tmp = (t_2 + t_3) + t_1
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_2 = Float64(Float64(sqrt(Float64(1.0 + y)) - sqrt(y)) + Float64(sqrt(Float64(x + 1.0)) - sqrt(x)))
	t_3 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	tmp = 0.0
	if (t_2 <= 1e-5)
		tmp = Float64(Float64(Float64(Float64(sqrt(Float64(1.0 / x)) + sqrt(Float64(1.0 / y))) * 0.5) + t_3) + t_1);
	else
		tmp = Float64(Float64(t_2 + t_3) + t_1);
	end
	return tmp
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp_2 = code(x, y, z, t)
	t_1 = sqrt((t + 1.0)) - sqrt(t);
	t_2 = (sqrt((1.0 + y)) - sqrt(y)) + (sqrt((x + 1.0)) - sqrt(x));
	t_3 = sqrt((z + 1.0)) - sqrt(z);
	tmp = 0.0;
	if (t_2 <= 1e-5)
		tmp = (((sqrt((1.0 / x)) + sqrt((1.0 / y))) * 0.5) + t_3) + t_1;
	else
		tmp = (t_2 + t_3) + t_1;
	end
	tmp_2 = tmp;
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t$95$2, 1e-5], N[(N[(N[(N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[(1.0 / y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * 0.5), $MachinePrecision] + t$95$3), $MachinePrecision] + t$95$1), $MachinePrecision], N[(N[(t$95$2 + t$95$3), $MachinePrecision] + t$95$1), $MachinePrecision]]]]]

Derivation

1. Split input into 2 regimes

2. if (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y))) < 1.00000000000000008e-5

   1. Initial program 82.1%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

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

      1. +-commutative N/A

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

      2. associate--l+ N/A

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

      3. *-commutative N/A

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

      4. lower-fma.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-/.f64 N/A

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

      7. lower--.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 89.8

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

   5. Applied rewrites 89.8%

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

   6. Taylor expanded in x around inf

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

   8. Applied rewrites 94.7%

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

   if 1.00000000000000008e-5 < (+.f64 (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) (-.f64 (sqrt.f64 (+.f64 y #s(literal 1 binary64))) (sqrt.f64 y)))

   1. Initial program 96.8%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
3. Recombined 2 regimes into one program.

4. Final simplification 96.3%

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

Alternative 14: 97.1% accurate, 0.7× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{y} + \sqrt{1 + y}\\ \left(\frac{\left(\sqrt{x} + 1\right) + t\_1}{t\_1 \cdot \left(\sqrt{x + 1} + \sqrt{x}\right)} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (+ (sqrt y) (sqrt (+ 1.0 y)))))
   (+
    (+
     (/ (+ (+ (sqrt x) 1.0) t_1) (* t_1 (+ (sqrt (+ x 1.0)) (sqrt x))))
     (- (sqrt (+ z 1.0)) (sqrt z)))
    (- (sqrt (+ t 1.0)) (sqrt t)))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt(y) + sqrt((1.0 + y));
	return ((((sqrt(x) + 1.0) + t_1) / (t_1 * (sqrt((x + 1.0)) + sqrt(x)))) + (sqrt((z + 1.0)) - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    t_1 = sqrt(y) + sqrt((1.0d0 + y))
    code = ((((sqrt(x) + 1.0d0) + t_1) / (t_1 * (sqrt((x + 1.0d0)) + sqrt(x)))) + (sqrt((z + 1.0d0)) - sqrt(z))) + (sqrt((t + 1.0d0)) - sqrt(t))
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	double t_1 = Math.sqrt(y) + Math.sqrt((1.0 + y));
	return ((((Math.sqrt(x) + 1.0) + t_1) / (t_1 * (Math.sqrt((x + 1.0)) + Math.sqrt(x)))) + (Math.sqrt((z + 1.0)) - Math.sqrt(z))) + (Math.sqrt((t + 1.0)) - Math.sqrt(t));
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt(y) + math.sqrt((1.0 + y))
	return ((((math.sqrt(x) + 1.0) + t_1) / (t_1 * (math.sqrt((x + 1.0)) + math.sqrt(x)))) + (math.sqrt((z + 1.0)) - math.sqrt(z))) + (math.sqrt((t + 1.0)) - math.sqrt(t))

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(y) + sqrt(Float64(1.0 + y)))
	return Float64(Float64(Float64(Float64(Float64(sqrt(x) + 1.0) + t_1) / Float64(t_1 * Float64(sqrt(Float64(x + 1.0)) + sqrt(x)))) + Float64(sqrt(Float64(z + 1.0)) - sqrt(z))) + Float64(sqrt(Float64(t + 1.0)) - sqrt(t)))
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp = code(x, y, z, t)
	t_1 = sqrt(y) + sqrt((1.0 + y));
	tmp = ((((sqrt(x) + 1.0) + t_1) / (t_1 * (sqrt((x + 1.0)) + sqrt(x)))) + (sqrt((z + 1.0)) - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]}, N[(N[(N[(N[(N[(N[Sqrt[x], $MachinePrecision] + 1.0), $MachinePrecision] + t$95$1), $MachinePrecision] / N[(t$95$1 * N[(N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Initial program 93.2%

   \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
2. Add Preprocessing
3. Step-by-step derivation

   1. lift-+.f64 N/A

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

   2. +-commutative N/A

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

   3. lift--.f64 N/A

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

   4. flip-- N/A

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

   5. lift--.f64 N/A

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

   6. flip-- N/A

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

   7. frac-add N/A

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

   8. lower-/.f64 N/A

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

4. Applied rewrites 94.0%

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

5. Taylor expanded in x around 0

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

   1. associate-+r+ N/A

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

   2. lower-+.f64 N/A

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

   3. lower-+.f64 N/A

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

   4. lower-sqrt.f64 N/A

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

   5. +-commutative N/A

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

   6. lower-+.f64 N/A

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

   7. lower-sqrt.f64 N/A

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

   8. lower-+.f64 N/A

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

   9. lower-sqrt.f64 76.9

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

7. Applied rewrites 76.9%

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

8. Final simplification 76.9%

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

Alternative 15: 98.5% accurate, 0.8× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1}\\ t_2 := \sqrt{x + 1}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ \mathbf{if}\;y \leq 72000000:\\ \;\;\;\;\left(\frac{\left(z + 1\right) - z}{\sqrt{z} + t\_1} + \left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(t\_2 - \sqrt{x}\right)\right)\right) + t\_3\\ \mathbf{else}:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{y}}, 0.5, \frac{1}{t\_2 + \sqrt{x}}\right) + \left(t\_1 - \sqrt{z}\right)\right) + t\_3\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (sqrt (+ z 1.0)))
        (t_2 (sqrt (+ x 1.0)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t))))
   (if (<= y 72000000.0)
     (+
      (+
       (/ (- (+ z 1.0) z) (+ (sqrt z) t_1))
       (+ (- (sqrt (+ 1.0 y)) (sqrt y)) (- t_2 (sqrt x))))
      t_3)
     (+
      (+ (fma (sqrt (/ 1.0 y)) 0.5 (/ 1.0 (+ t_2 (sqrt x)))) (- t_1 (sqrt z)))
      t_3))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0));
	double t_2 = sqrt((x + 1.0));
	double t_3 = sqrt((t + 1.0)) - sqrt(t);
	double tmp;
	if (y <= 72000000.0) {
		tmp = ((((z + 1.0) - z) / (sqrt(z) + t_1)) + ((sqrt((1.0 + y)) - sqrt(y)) + (t_2 - sqrt(x)))) + t_3;
	} else {
		tmp = (fma(sqrt((1.0 / y)), 0.5, (1.0 / (t_2 + sqrt(x)))) + (t_1 - sqrt(z))) + t_3;
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(z + 1.0))
	t_2 = sqrt(Float64(x + 1.0))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	tmp = 0.0
	if (y <= 72000000.0)
		tmp = Float64(Float64(Float64(Float64(Float64(z + 1.0) - z) / Float64(sqrt(z) + t_1)) + Float64(Float64(sqrt(Float64(1.0 + y)) - sqrt(y)) + Float64(t_2 - sqrt(x)))) + t_3);
	else
		tmp = Float64(Float64(fma(sqrt(Float64(1.0 / y)), 0.5, Float64(1.0 / Float64(t_2 + sqrt(x)))) + Float64(t_1 - sqrt(z))) + t_3);
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[y, 72000000.0], N[(N[(N[(N[(N[(z + 1.0), $MachinePrecision] - z), $MachinePrecision] / N[(N[Sqrt[z], $MachinePrecision] + t$95$1), $MachinePrecision]), $MachinePrecision] + N[(N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(t$95$2 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision], N[(N[(N[(N[Sqrt[N[(1.0 / y), $MachinePrecision]], $MachinePrecision] * 0.5 + N[(1.0 / N[(t$95$2 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(t$95$1 - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision]]]]]

Derivation

1. Split input into 2 regimes

2. if y < 7.2e7

   1. Initial program 97.2%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift--.f64 N/A

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

      2. flip-- N/A

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

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 97.4

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

   4. Applied rewrites 97.4%

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

   if 7.2e7 < y

   1. Initial program 89.0%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-+.f64 N/A

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

      2. +-commutative N/A

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

      3. lift--.f64 N/A

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

      4. flip-- N/A

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

      5. lift--.f64 N/A

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

      6. flip-- N/A

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

      7. frac-add N/A

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

      8. lower-/.f64 N/A

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

   4. Applied rewrites 89.9%

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

   5. Taylor expanded in x around 0

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

      1. associate-+r+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 N/A

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

      5. +-commutative N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 91.9

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

   7. Applied rewrites 91.9%

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

   8. Taylor expanded in y around inf

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

      1. *-commutative N/A

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

      2. lower-fma.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-/.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. +-commutative N/A

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

      10. lower-+.f64 N/A

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

      11. lower-sqrt.f64 96.7

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

   10. Applied rewrites 96.7%

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

4. Final simplification 97.0%

   \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq 72000000:\\ \;\;\;\;\left(\frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}} + \left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{y}}, 0.5, \frac{1}{\sqrt{x + 1} + \sqrt{x}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 16: 98.1% accurate, 0.8× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{t + 1}\\ t_2 := \sqrt{x + 1}\\ t_3 := \sqrt{z + 1} - \sqrt{z}\\ \mathbf{if}\;y \leq 72000000:\\ \;\;\;\;\frac{\left(t + 1\right) - t}{\sqrt{t} + t\_1} + \left(\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(t\_2 - \sqrt{x}\right)\right) + t\_3\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{y}}, 0.5, \frac{1}{t\_2 + \sqrt{x}}\right) + t\_3\right) + \left(t\_1 - \sqrt{t}\right)\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (sqrt (+ t 1.0)))
        (t_2 (sqrt (+ x 1.0)))
        (t_3 (- (sqrt (+ z 1.0)) (sqrt z))))
   (if (<= y 72000000.0)
     (+
      (/ (- (+ t 1.0) t) (+ (sqrt t) t_1))
      (+ (+ (- (sqrt (+ 1.0 y)) (sqrt y)) (- t_2 (sqrt x))) t_3))
     (+
      (+ (fma (sqrt (/ 1.0 y)) 0.5 (/ 1.0 (+ t_2 (sqrt x)))) t_3)
      (- t_1 (sqrt t))))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((t + 1.0));
	double t_2 = sqrt((x + 1.0));
	double t_3 = sqrt((z + 1.0)) - sqrt(z);
	double tmp;
	if (y <= 72000000.0) {
		tmp = (((t + 1.0) - t) / (sqrt(t) + t_1)) + (((sqrt((1.0 + y)) - sqrt(y)) + (t_2 - sqrt(x))) + t_3);
	} else {
		tmp = (fma(sqrt((1.0 / y)), 0.5, (1.0 / (t_2 + sqrt(x)))) + t_3) + (t_1 - sqrt(t));
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(t + 1.0))
	t_2 = sqrt(Float64(x + 1.0))
	t_3 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	tmp = 0.0
	if (y <= 72000000.0)
		tmp = Float64(Float64(Float64(Float64(t + 1.0) - t) / Float64(sqrt(t) + t_1)) + Float64(Float64(Float64(sqrt(Float64(1.0 + y)) - sqrt(y)) + Float64(t_2 - sqrt(x))) + t_3));
	else
		tmp = Float64(Float64(fma(sqrt(Float64(1.0 / y)), 0.5, Float64(1.0 / Float64(t_2 + sqrt(x)))) + t_3) + Float64(t_1 - sqrt(t)));
	end
	return tmp
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[y, 72000000.0], N[(N[(N[(N[(t + 1.0), $MachinePrecision] - t), $MachinePrecision] / N[(N[Sqrt[t], $MachinePrecision] + t$95$1), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[(t$95$2 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[Sqrt[N[(1.0 / y), $MachinePrecision]], $MachinePrecision] * 0.5 + N[(1.0 / N[(t$95$2 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision] + N[(t$95$1 - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]

Derivation

1. Split input into 2 regimes

2. if y < 7.2e7

   1. Initial program 97.2%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift--.f64 N/A

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

      2. flip-- N/A

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

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 97.6

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

   4. Applied rewrites 97.6%

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

   if 7.2e7 < y

   1. Initial program 89.0%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-+.f64 N/A

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

      2. +-commutative N/A

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

      3. lift--.f64 N/A

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

      4. flip-- N/A

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

      5. lift--.f64 N/A

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

      6. flip-- N/A

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

      7. frac-add N/A

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

      8. lower-/.f64 N/A

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

   4. Applied rewrites 89.9%

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

   5. Taylor expanded in x around 0

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

      1. associate-+r+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 N/A

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

      5. +-commutative N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 91.9

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

   7. Applied rewrites 91.9%

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

   8. Taylor expanded in y around inf

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

      1. *-commutative N/A

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

      2. lower-fma.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-/.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. +-commutative N/A

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

      10. lower-+.f64 N/A

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

      11. lower-sqrt.f64 96.7

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

   10. Applied rewrites 96.7%

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

4. Final simplification 97.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;y \leq 72000000:\\ \;\;\;\;\frac{\left(t + 1\right) - t}{\sqrt{t} + \sqrt{t + 1}} + \left(\left(\left(\sqrt{1 + y} - \sqrt{y}\right) + \left(\sqrt{x + 1} - \sqrt{x}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{\frac{1}{y}}, 0.5, \frac{1}{\sqrt{x + 1} + \sqrt{x}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 17: 95.9% accurate, 0.9× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1} - \sqrt{z}\\ t_2 := \sqrt{t + 1} - \sqrt{t}\\ t_3 := \sqrt{x + 1}\\ \mathbf{if}\;t\_3 - \sqrt{x} \leq 0.9999998:\\ \;\;\;\;\left(\frac{1}{t\_3 + \sqrt{x}} + t\_1\right) + t\_2\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + \left(\sqrt{1 + y} - \sqrt{y}\right)\right) + t\_1\right) + t\_2\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_2 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_3 (sqrt (+ x 1.0))))
   (if (<= (- t_3 (sqrt x)) 0.9999998)
     (+ (+ (/ 1.0 (+ t_3 (sqrt x))) t_1) t_2)
     (+ (+ (+ (- 1.0 (sqrt x)) (- (sqrt (+ 1.0 y)) (sqrt y))) t_1) t_2))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0)) - sqrt(z);
	double t_2 = sqrt((t + 1.0)) - sqrt(t);
	double t_3 = sqrt((x + 1.0));
	double tmp;
	if ((t_3 - sqrt(x)) <= 0.9999998) {
		tmp = ((1.0 / (t_3 + sqrt(x))) + t_1) + t_2;
	} else {
		tmp = (((1.0 - sqrt(x)) + (sqrt((1.0 + y)) - sqrt(y))) + t_1) + t_2;
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    real(8) :: t_2
    real(8) :: t_3
    real(8) :: tmp
    t_1 = sqrt((z + 1.0d0)) - sqrt(z)
    t_2 = sqrt((t + 1.0d0)) - sqrt(t)
    t_3 = sqrt((x + 1.0d0))
    if ((t_3 - sqrt(x)) <= 0.9999998d0) then
        tmp = ((1.0d0 / (t_3 + sqrt(x))) + t_1) + t_2
    else
        tmp = (((1.0d0 - sqrt(x)) + (sqrt((1.0d0 + y)) - sqrt(y))) + t_1) + t_2
    end if
    code = tmp
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	double t_1 = Math.sqrt((z + 1.0)) - Math.sqrt(z);
	double t_2 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_3 = Math.sqrt((x + 1.0));
	double tmp;
	if ((t_3 - Math.sqrt(x)) <= 0.9999998) {
		tmp = ((1.0 / (t_3 + Math.sqrt(x))) + t_1) + t_2;
	} else {
		tmp = (((1.0 - Math.sqrt(x)) + (Math.sqrt((1.0 + y)) - Math.sqrt(y))) + t_1) + t_2;
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt((z + 1.0)) - math.sqrt(z)
	t_2 = math.sqrt((t + 1.0)) - math.sqrt(t)
	t_3 = math.sqrt((x + 1.0))
	tmp = 0
	if (t_3 - math.sqrt(x)) <= 0.9999998:
		tmp = ((1.0 / (t_3 + math.sqrt(x))) + t_1) + t_2
	else:
		tmp = (((1.0 - math.sqrt(x)) + (math.sqrt((1.0 + y)) - math.sqrt(y))) + t_1) + t_2
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_3 = sqrt(Float64(x + 1.0))
	tmp = 0.0
	if (Float64(t_3 - sqrt(x)) <= 0.9999998)
		tmp = Float64(Float64(Float64(1.0 / Float64(t_3 + sqrt(x))) + t_1) + t_2);
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(x)) + Float64(sqrt(Float64(1.0 + y)) - sqrt(y))) + t_1) + t_2);
	end
	return tmp
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp_2 = code(x, y, z, t)
	t_1 = sqrt((z + 1.0)) - sqrt(z);
	t_2 = sqrt((t + 1.0)) - sqrt(t);
	t_3 = sqrt((x + 1.0));
	tmp = 0.0;
	if ((t_3 - sqrt(x)) <= 0.9999998)
		tmp = ((1.0 / (t_3 + sqrt(x))) + t_1) + t_2;
	else
		tmp = (((1.0 - sqrt(x)) + (sqrt((1.0 + y)) - sqrt(y))) + t_1) + t_2;
	end
	tmp_2 = tmp;
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[N[(t$95$3 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision], 0.9999998], N[(N[(N[(1.0 / N[(t$95$3 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision]]]]]

Derivation

1. Split input into 2 regimes

2. if (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x)) < 0.999999799999999994

   1. Initial program 89.1%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-+.f64 N/A

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

      2. +-commutative N/A

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

      3. lift--.f64 N/A

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

      4. flip-- N/A

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

      5. lift--.f64 N/A

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

      6. flip-- N/A

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

      7. frac-add N/A

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

      8. lower-/.f64 N/A

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

   4. Applied rewrites 90.1%

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

   5. Taylor expanded in x around 0

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

      1. associate-+r+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 N/A

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

      5. +-commutative N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 55.4

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

   7. Applied rewrites 55.4%

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

   8. Taylor expanded in y around inf

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

      1. lower-/.f64 N/A

         \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x} + \sqrt{1 + x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      2. +-commutative N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      4. lower-sqrt.f64 N/A

         \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{1 + x}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      5. +-commutative N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      6. lower-+.f64 N/A

         \[\leadsto \left(\frac{1}{\sqrt{\color{blue}{x + 1}} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      7. lower-sqrt.f64 52.9

         \[\leadsto \left(\frac{1}{\sqrt{x + 1} + \color{blue}{\sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   10. Applied rewrites 52.9%

       \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{x + 1} + \sqrt{x}}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

   if 0.999999799999999994 < (-.f64 (sqrt.f64 (+.f64 x #s(literal 1 binary64))) (sqrt.f64 x))

   1. Initial program 97.3%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

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

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 97.3

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

   5. Applied rewrites 97.3%

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

4. Final simplification 75.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\sqrt{x + 1} - \sqrt{x} \leq 0.9999998:\\ \;\;\;\;\left(\frac{1}{\sqrt{x + 1} + \sqrt{x}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + \left(\sqrt{1 + y} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 18: 88.9% accurate, 1.3× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{z + 1} - \sqrt{z}\\ \mathbf{if}\;x \leq 5200000000:\\ \;\;\;\;\left(\left(t\_1 - \left(\sqrt{y} + \sqrt{x}\right)\right) + \sqrt{1 + y}\right) + \sqrt{x + 1}\\ \mathbf{else}:\\ \;\;\;\;\left(\sqrt{\frac{1}{x}} \cdot 0.5 + t\_1\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (let* ((t_1 (- (sqrt (+ z 1.0)) (sqrt z))))
   (if (<= x 5200000000.0)
     (+ (+ (- t_1 (+ (sqrt y) (sqrt x))) (sqrt (+ 1.0 y))) (sqrt (+ x 1.0)))
     (+ (+ (* (sqrt (/ 1.0 x)) 0.5) t_1) (- (sqrt (+ t 1.0)) (sqrt t))))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double t_1 = sqrt((z + 1.0)) - sqrt(z);
	double tmp;
	if (x <= 5200000000.0) {
		tmp = ((t_1 - (sqrt(y) + sqrt(x))) + sqrt((1.0 + y))) + sqrt((x + 1.0));
	} else {
		tmp = ((sqrt((1.0 / x)) * 0.5) + t_1) + (sqrt((t + 1.0)) - sqrt(t));
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: t_1
    real(8) :: tmp
    t_1 = sqrt((z + 1.0d0)) - sqrt(z)
    if (x <= 5200000000.0d0) then
        tmp = ((t_1 - (sqrt(y) + sqrt(x))) + sqrt((1.0d0 + y))) + sqrt((x + 1.0d0))
    else
        tmp = ((sqrt((1.0d0 / x)) * 0.5d0) + t_1) + (sqrt((t + 1.0d0)) - sqrt(t))
    end if
    code = tmp
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	double t_1 = Math.sqrt((z + 1.0)) - Math.sqrt(z);
	double tmp;
	if (x <= 5200000000.0) {
		tmp = ((t_1 - (Math.sqrt(y) + Math.sqrt(x))) + Math.sqrt((1.0 + y))) + Math.sqrt((x + 1.0));
	} else {
		tmp = ((Math.sqrt((1.0 / x)) * 0.5) + t_1) + (Math.sqrt((t + 1.0)) - Math.sqrt(t));
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt((z + 1.0)) - math.sqrt(z)
	tmp = 0
	if x <= 5200000000.0:
		tmp = ((t_1 - (math.sqrt(y) + math.sqrt(x))) + math.sqrt((1.0 + y))) + math.sqrt((x + 1.0))
	else:
		tmp = ((math.sqrt((1.0 / x)) * 0.5) + t_1) + (math.sqrt((t + 1.0)) - math.sqrt(t))
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	tmp = 0.0
	if (x <= 5200000000.0)
		tmp = Float64(Float64(Float64(t_1 - Float64(sqrt(y) + sqrt(x))) + sqrt(Float64(1.0 + y))) + sqrt(Float64(x + 1.0)));
	else
		tmp = Float64(Float64(Float64(sqrt(Float64(1.0 / x)) * 0.5) + t_1) + Float64(sqrt(Float64(t + 1.0)) - sqrt(t)));
	end
	return tmp
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp_2 = code(x, y, z, t)
	t_1 = sqrt((z + 1.0)) - sqrt(z);
	tmp = 0.0;
	if (x <= 5200000000.0)
		tmp = ((t_1 - (sqrt(y) + sqrt(x))) + sqrt((1.0 + y))) + sqrt((x + 1.0));
	else
		tmp = ((sqrt((1.0 / x)) * 0.5) + t_1) + (sqrt((t + 1.0)) - sqrt(t));
	end
	tmp_2 = tmp;
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := Block[{t$95$1 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x, 5200000000.0], N[(N[(N[(t$95$1 - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[Sqrt[N[(1.0 / x), $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$1), $MachinePrecision] + N[(N[Sqrt[N[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Split input into 2 regimes

2. if x < 5.2e9

   1. Initial program 97.2%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. lower-+.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-sqrt.f64 N/A

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

      6. lower-+.f64 N/A

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

      7. lower-sqrt.f64 N/A

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

      8. lower-+.f64 N/A

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

      9. lower-sqrt.f64 N/A

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

      10. lower-+.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 N/A

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

      13. +-commutative N/A

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

      14. lower-+.f64 N/A

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

      15. lower-sqrt.f64 N/A

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

      16. lower-sqrt.f64 N/A

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

      17. lower-sqrt.f64 20.2

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

   5. Applied rewrites 20.2%

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

   7. Applied rewrites 46.6%

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

   if 5.2e9 < x

   1. Initial program 88.7%

      \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   2. Add Preprocessing

   3. Taylor expanded in y around inf

      \[\leadsto \left(\color{blue}{\left(\sqrt{1 + x} - \sqrt{x}\right)} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   4. Step-by-step derivation

      1. lower--.f64 N/A

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

      2. lower-sqrt.f64 N/A

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

      3. lower-+.f64 N/A

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

      4. lower-sqrt.f64 51.4

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

   5. Applied rewrites 51.4%

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

   6. Taylor expanded in x around inf

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

   8. Applied rewrites 53.5%

      \[\leadsto \left(\sqrt{\frac{1}{x}} \cdot \color{blue}{0.5} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
3. Recombined 2 regimes into one program.

4. Final simplification 49.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 5200000000:\\ \;\;\;\;\left(\left(\left(\sqrt{z + 1} - \sqrt{z}\right) - \left(\sqrt{y} + \sqrt{x}\right)\right) + \sqrt{1 + y}\right) + \sqrt{x + 1}\\ \mathbf{else}:\\ \;\;\;\;\left(\sqrt{\frac{1}{x}} \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 19: 84.8% accurate, 1.3× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \left(\left(\left(\sqrt{z + 1} - \sqrt{z}\right) - \left(\sqrt{y} + \sqrt{x}\right)\right) + \sqrt{1 + y}\right) + \sqrt{x + 1} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (+
  (+ (- (- (sqrt (+ z 1.0)) (sqrt z)) (+ (sqrt y) (sqrt x))) (sqrt (+ 1.0 y)))
  (sqrt (+ x 1.0))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	return (((sqrt((z + 1.0)) - sqrt(z)) - (sqrt(y) + sqrt(x))) + sqrt((1.0 + y))) + sqrt((x + 1.0));
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = (((sqrt((z + 1.0d0)) - sqrt(z)) - (sqrt(y) + sqrt(x))) + sqrt((1.0d0 + y))) + sqrt((x + 1.0d0))
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	return (((Math.sqrt((z + 1.0)) - Math.sqrt(z)) - (Math.sqrt(y) + Math.sqrt(x))) + Math.sqrt((1.0 + y))) + Math.sqrt((x + 1.0));
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	return (((math.sqrt((z + 1.0)) - math.sqrt(z)) - (math.sqrt(y) + math.sqrt(x))) + math.sqrt((1.0 + y))) + math.sqrt((x + 1.0))

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	return Float64(Float64(Float64(Float64(sqrt(Float64(z + 1.0)) - sqrt(z)) - Float64(sqrt(y) + sqrt(x))) + sqrt(Float64(1.0 + y))) + sqrt(Float64(x + 1.0)))
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp = code(x, y, z, t)
	tmp = (((sqrt((z + 1.0)) - sqrt(z)) - (sqrt(y) + sqrt(x))) + sqrt((1.0 + y))) + sqrt((x + 1.0));
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := N[(N[(N[(N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 93.2%

   \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
2. Add Preprocessing

3. Taylor expanded in t around inf

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

   1. lower--.f64 N/A

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

   2. associate-+r+ N/A

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

   3. lower-+.f64 N/A

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

   4. lower-+.f64 N/A

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

   5. lower-sqrt.f64 N/A

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

   6. lower-+.f64 N/A

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

   7. lower-sqrt.f64 N/A

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

   8. lower-+.f64 N/A

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

   9. lower-sqrt.f64 N/A

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

   10. lower-+.f64 N/A

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

   11. +-commutative N/A

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

   12. lower-+.f64 N/A

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

   13. +-commutative N/A

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

   14. lower-+.f64 N/A

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

   15. lower-sqrt.f64 N/A

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

   16. lower-sqrt.f64 N/A

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

   17. lower-sqrt.f64 12.3

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

5. Applied rewrites 12.3%

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

7. Applied rewrites 27.3%

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

8. Final simplification 27.3%

   \[\leadsto \left(\left(\left(\sqrt{z + 1} - \sqrt{z}\right) - \left(\sqrt{y} + \sqrt{x}\right)\right) + \sqrt{1 + y}\right) + \sqrt{x + 1} \]
9. Add Preprocessing

Alternative 20: 47.6% accurate, 2.0× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \left(\sqrt{1 + y} + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right) \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t)
 :precision binary64
 (- (+ (sqrt (+ 1.0 y)) (sqrt (+ x 1.0))) (+ (sqrt y) (sqrt x))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	return (sqrt((1.0 + y)) + sqrt((x + 1.0))) - (sqrt(y) + sqrt(x));
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = (sqrt((1.0d0 + y)) + sqrt((x + 1.0d0))) - (sqrt(y) + sqrt(x))
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	return (Math.sqrt((1.0 + y)) + Math.sqrt((x + 1.0))) - (Math.sqrt(y) + Math.sqrt(x));
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	return (math.sqrt((1.0 + y)) + math.sqrt((x + 1.0))) - (math.sqrt(y) + math.sqrt(x))

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	return Float64(Float64(sqrt(Float64(1.0 + y)) + sqrt(Float64(x + 1.0))) - Float64(sqrt(y) + sqrt(x)))
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp = code(x, y, z, t)
	tmp = (sqrt((1.0 + y)) + sqrt((x + 1.0))) - (sqrt(y) + sqrt(x));
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := N[(N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 93.2%

   \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
2. Add Preprocessing

3. Taylor expanded in t around inf

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

   1. lower--.f64 N/A

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

   2. associate-+r+ N/A

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

   3. lower-+.f64 N/A

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

   4. lower-+.f64 N/A

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

   5. lower-sqrt.f64 N/A

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

   6. lower-+.f64 N/A

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

   7. lower-sqrt.f64 N/A

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

   8. lower-+.f64 N/A

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

   9. lower-sqrt.f64 N/A

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

   10. lower-+.f64 N/A

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

   11. +-commutative N/A

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

   12. lower-+.f64 N/A

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

   13. +-commutative N/A

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

   14. lower-+.f64 N/A

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

   15. lower-sqrt.f64 N/A

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

   16. lower-sqrt.f64 N/A

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

   17. lower-sqrt.f64 12.3

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

5. Applied rewrites 12.3%

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

6. Taylor expanded in z around inf

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

8. Applied rewrites 15.5%

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

9. Final simplification 15.5%

   \[\leadsto \left(\sqrt{1 + y} + \sqrt{x + 1}\right) - \left(\sqrt{y} + \sqrt{x}\right) \]
10. Add Preprocessing

Alternative 21: 6.2% accurate, 5.2× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \frac{0.5}{\sqrt{t}} \end{array} \]

FPCore

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
(FPCore (x y z t) :precision binary64 (/ 0.5 (sqrt t)))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	return 0.5 / sqrt(t);
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = 0.5d0 / sqrt(t)
end function

Java

assert x < y && y < z && z < t;
public static double code(double x, double y, double z, double t) {
	return 0.5 / Math.sqrt(t);
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	return 0.5 / math.sqrt(t)

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	return Float64(0.5 / sqrt(t))
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp = code(x, y, z, t)
	tmp = 0.5 / sqrt(t);
end

Wolfram

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
code[x_, y_, z_, t_] := N[(0.5 / N[Sqrt[t], $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 93.2%

   \[\left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
2. Add Preprocessing

3. Taylor expanded in t around inf

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

   1. lower--.f64 N/A

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

5. Applied rewrites 11.7%

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

6. Taylor expanded in t around 0

   \[\leadsto \frac{1}{2} \cdot \color{blue}{\sqrt{\frac{1}{t}}} \]
7. Step-by-step derivation

8. Applied rewrites 7.4%

   \[\leadsto \sqrt{\frac{1}{t}} \cdot \color{blue}{0.5} \]
9. Step-by-step derivation

10. Applied rewrites 7.4%

    \[\leadsto \color{blue}{\frac{0.5}{\sqrt{t}}} \]
11. Add Preprocessing

Developer Target 1: 99.4% accurate, 0.8× speedup

Math

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

FPCore

(FPCore (x y z t)
 :precision binary64
 (+
  (+
   (+
    (/ 1.0 (+ (sqrt (+ x 1.0)) (sqrt x)))
    (/ 1.0 (+ (sqrt (+ y 1.0)) (sqrt y))))
   (/ 1.0 (+ (sqrt (+ z 1.0)) (sqrt z))))
  (- (sqrt (+ t 1.0)) (sqrt t))))

C

double code(double x, double y, double z, double t) {
	return (((1.0 / (sqrt((x + 1.0)) + sqrt(x))) + (1.0 / (sqrt((y + 1.0)) + sqrt(y)))) + (1.0 / (sqrt((z + 1.0)) + sqrt(z)))) + (sqrt((t + 1.0)) - sqrt(t));
}

Fortran

real(8) function code(x, y, z, t)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = (((1.0d0 / (sqrt((x + 1.0d0)) + sqrt(x))) + (1.0d0 / (sqrt((y + 1.0d0)) + sqrt(y)))) + (1.0d0 / (sqrt((z + 1.0d0)) + sqrt(z)))) + (sqrt((t + 1.0d0)) - sqrt(t))
end function

Java

public static double code(double x, double y, double z, double t) {
	return (((1.0 / (Math.sqrt((x + 1.0)) + Math.sqrt(x))) + (1.0 / (Math.sqrt((y + 1.0)) + Math.sqrt(y)))) + (1.0 / (Math.sqrt((z + 1.0)) + Math.sqrt(z)))) + (Math.sqrt((t + 1.0)) - Math.sqrt(t));
}

Python

def code(x, y, z, t):
	return (((1.0 / (math.sqrt((x + 1.0)) + math.sqrt(x))) + (1.0 / (math.sqrt((y + 1.0)) + math.sqrt(y)))) + (1.0 / (math.sqrt((z + 1.0)) + math.sqrt(z)))) + (math.sqrt((t + 1.0)) - math.sqrt(t))

Julia

function code(x, y, z, t)
	return Float64(Float64(Float64(Float64(1.0 / Float64(sqrt(Float64(x + 1.0)) + sqrt(x))) + Float64(1.0 / Float64(sqrt(Float64(y + 1.0)) + sqrt(y)))) + Float64(1.0 / Float64(sqrt(Float64(z + 1.0)) + sqrt(z)))) + Float64(sqrt(Float64(t + 1.0)) - sqrt(t)))
end

MATLAB

function tmp = code(x, y, z, t)
	tmp = (((1.0 / (sqrt((x + 1.0)) + sqrt(x))) + (1.0 / (sqrt((y + 1.0)) + sqrt(y)))) + (1.0 / (sqrt((z + 1.0)) + sqrt(z)))) + (sqrt((t + 1.0)) - sqrt(t));
end

Wolfram

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

Reproduce

herbie shell --seed 2024332 
(FPCore (x y z t)
  :name "Main:z from "
  :precision binary64

  :alt
  (! :herbie-platform default (+ (+ (+ (/ 1 (+ (sqrt (+ x 1)) (sqrt x))) (/ 1 (+ (sqrt (+ y 1)) (sqrt y)))) (/ 1 (+ (sqrt (+ z 1)) (sqrt z)))) (- (sqrt (+ t 1)) (sqrt t))))

  (+ (+ (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y))) (- (sqrt (+ z 1.0)) (sqrt z))) (- (sqrt (+ t 1.0)) (sqrt t))))