Main:z from

Percentage Accurate: 91.4% → 99.4%

Time: 25.0s

Alternatives: 26

Speedup: 0.6×

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

module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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.4% 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

module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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: 99.4% accurate, 0.2× 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 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_2\right) + t\_1\\ t_4 := \sqrt{1 + y}\\ \mathbf{if}\;t\_3 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\right) + t\_2\right) + t\_1\\ \mathbf{elif}\;t\_3 \leq 2.00005:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, {\left(t\_4 + \sqrt{y}\right)}^{-1}\right) + \sqrt{1 + x}\right) - \sqrt{x}\right) + t\_1\\ \mathbf{else}:\\ \;\;\;\;1 + \left(\left(\left({\left(\sqrt{1 + t} + \sqrt{t}\right)}^{-1} + \sqrt{1 + z}\right) + t\_4\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\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)) (sqrt t)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_2)
          t_1))
        (t_4 (sqrt (+ 1.0 y))))
   (if (<= t_3 5e-6)
     (+ (+ (* 0.5 (+ (sqrt (pow x -1.0)) (sqrt (pow y -1.0)))) t_2) t_1)
     (if (<= t_3 2.00005)
       (+
        (-
         (+
          (fma (sqrt (pow z -1.0)) 0.5 (pow (+ t_4 (sqrt y)) -1.0))
          (sqrt (+ 1.0 x)))
         (sqrt x))
        t_1)
       (+
        1.0
        (-
         (+ (+ (pow (+ (sqrt (+ 1.0 t)) (sqrt t)) -1.0) (sqrt (+ 1.0 z))) t_4)
         (+ (+ (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((t + 1.0)) - sqrt(t);
	double t_2 = sqrt((z + 1.0)) - sqrt(z);
	double t_3 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_2) + t_1;
	double t_4 = sqrt((1.0 + y));
	double tmp;
	if (t_3 <= 5e-6) {
		tmp = ((0.5 * (sqrt(pow(x, -1.0)) + sqrt(pow(y, -1.0)))) + t_2) + t_1;
	} else if (t_3 <= 2.00005) {
		tmp = ((fma(sqrt(pow(z, -1.0)), 0.5, pow((t_4 + sqrt(y)), -1.0)) + sqrt((1.0 + x))) - sqrt(x)) + t_1;
	} else {
		tmp = 1.0 + (((pow((sqrt((1.0 + t)) + sqrt(t)), -1.0) + sqrt((1.0 + z))) + t_4) - ((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 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_2) + t_1)
	t_4 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_3 <= 5e-6)
		tmp = Float64(Float64(Float64(0.5 * Float64(sqrt((x ^ -1.0)) + sqrt((y ^ -1.0)))) + t_2) + t_1);
	elseif (t_3 <= 2.00005)
		tmp = Float64(Float64(Float64(fma(sqrt((z ^ -1.0)), 0.5, (Float64(t_4 + sqrt(y)) ^ -1.0)) + sqrt(Float64(1.0 + x))) - sqrt(x)) + t_1);
	else
		tmp = Float64(1.0 + Float64(Float64(Float64((Float64(sqrt(Float64(1.0 + t)) + sqrt(t)) ^ -1.0) + sqrt(Float64(1.0 + z))) + t_4) - 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[(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[(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] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$3, 5e-6], N[(N[(N[(0.5 * N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[Power[y, -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision], If[LessEqual[t$95$3, 2.00005], N[(N[(N[(N[(N[Sqrt[N[Power[z, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5 + N[Power[N[(t$95$4 + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] + N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision], N[(1.0 + N[(N[(N[(N[Power[N[(N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision] + N[Sqrt[t], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

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

   6. Taylor expanded in y 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 50.4%

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

   if 5.00000000000000041e-6 < (+.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.0000499999999999

   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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 96.6

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

   4. Applied rewrites 96.6%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

   7. Applied rewrites 48.3%

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

   if 2.0000499999999999 < (+.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.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(\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}}} \]

   5. Taylor expanded in x around 0

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

      1. associate--l+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower--.f64 N/A

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

   7. Applied rewrites 50.4%

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

4. Final simplification 49.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 2.00005:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) + \sqrt{1 + x}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;1 + \left(\left(\left({\left(\sqrt{1 + t} + \sqrt{t}\right)}^{-1} + \sqrt{1 + z}\right) + \sqrt{1 + y}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 2: 95.9% accurate, 0.2× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\\ t_2 := \sqrt{t + 1} - \sqrt{t}\\ t_3 := \sqrt{1 + z}\\ t_4 := \sqrt{z + 1} - \sqrt{z}\\ t_5 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_4\right) + t\_2\\ t_6 := \sqrt{1 + y}\\ \mathbf{if}\;t\_5 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + t\_4\right) + t\_2\\ \mathbf{elif}\;t\_5 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_4\right) + t\_2\\ \mathbf{elif}\;t\_5 \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, t\_6\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{elif}\;t\_5 \leq 3:\\ \;\;\;\;\left(\left(t\_6 + 1\right) + t\_3\right) - t\_1\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, t\_3\right)\right) - \left(t\_1 + \sqrt{t}\right)\right) + 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 z) (sqrt y)) (sqrt x)))
        (t_2 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_3 (sqrt (+ 1.0 z)))
        (t_4 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_5
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_4)
          t_2))
        (t_6 (sqrt (+ 1.0 y))))
   (if (<= t_5 5e-6)
     (+ (+ (* (sqrt (pow x -1.0)) 0.5) t_4) t_2)
     (if (<= t_5 1.0)
       (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_4) t_2)
       (if (<= t_5 2.0001)
         (-
          (+ (fma (sqrt (pow z -1.0)) 0.5 t_6) (sqrt (+ 1.0 x)))
          (+ (sqrt y) (sqrt x)))
         (if (<= t_5 3.0)
           (- (+ (+ t_6 1.0) t_3) t_1)
           (+
            (- (+ (+ 1.0 (sqrt (+ 1.0 t))) (fma 0.5 x t_3)) (+ t_1 (sqrt t)))
            1.0)))))))

C

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))
	t_2 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_3 = sqrt(Float64(1.0 + z))
	t_4 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_5 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_4) + t_2)
	t_6 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_5 <= 5e-6)
		tmp = Float64(Float64(Float64(sqrt((x ^ -1.0)) * 0.5) + t_4) + t_2);
	elseif (t_5 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_4) + t_2);
	elseif (t_5 <= 2.0001)
		tmp = Float64(Float64(fma(sqrt((z ^ -1.0)), 0.5, t_6) + sqrt(Float64(1.0 + x))) - Float64(sqrt(y) + sqrt(x)));
	elseif (t_5 <= 3.0)
		tmp = Float64(Float64(Float64(t_6 + 1.0) + t_3) - t_1);
	else
		tmp = Float64(Float64(Float64(Float64(1.0 + sqrt(Float64(1.0 + t))) + fma(0.5, x, t_3)) - Float64(t_1 + sqrt(t))) + 1.0);
	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[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $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[(1.0 + z), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = 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] + t$95$4), $MachinePrecision] + t$95$2), $MachinePrecision]}, Block[{t$95$6 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$5, 5e-6], N[(N[(N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$4), $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$4), $MachinePrecision] + t$95$2), $MachinePrecision], If[LessEqual[t$95$5, 2.0001], N[(N[(N[(N[Sqrt[N[Power[z, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$6), $MachinePrecision] + N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$5, 3.0], N[(N[(N[(t$95$6 + 1.0), $MachinePrecision] + t$95$3), $MachinePrecision] - t$95$1), $MachinePrecision], N[(N[(N[(N[(1.0 + N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[(0.5 * x + t$95$3), $MachinePrecision]), $MachinePrecision] - N[(t$95$1 + N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]]]]]]]]]]]

Derivation

1. Split input into 5 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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

      \[\leadsto \left(\color{blue}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 0.5, \sqrt{1 + y} - \sqrt{y}\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(\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 17.4%

      \[\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 5.00000000000000041e-6 < (+.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 97.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 97.5

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

   4. Applied rewrites 97.5%

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

   5. 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) \]
   6. 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 75.0

         \[\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) \]

   7. Applied rewrites 75.0%

      \[\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) \]

   8. 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) \]
   9. Step-by-step derivation

   10. Applied rewrites 35.1%

       \[\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 (-.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.00010000000000021

   1. Initial program 95.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 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 5.0

          \[\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 5.0%

      \[\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 20.7%

      \[\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.00010000000000021 < (+.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))) < 3

   1. Initial program 98.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 29.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 29.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 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 25.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) \]

   if 3 < (+.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 96.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 \color{blue}{\left(1 + \left(\sqrt{1 + t} + \left(\sqrt{1 + y} + \left(\sqrt{1 + z} + \frac{1}{2} \cdot x\right)\right)\right)\right) - \left(\sqrt{t} + \left(\sqrt{x} + \left(\sqrt{y} + \sqrt{z}\right)\right)\right)} \]
   4. Step-by-step derivation

      1. associate--l+ N/A

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

      2. +-commutative N/A

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

      3. lower-+.f64 N/A

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

   5. Applied rewrites 95.7%

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

   6. Taylor expanded in y around 0

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

   8. Applied rewrites 92.2%

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

4. Final simplification 30.8%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \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(\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) \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, \sqrt{1 + y}\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{elif}\;\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) \leq 3:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, \sqrt{1 + z}\right)\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 1\\ \end{array} \]
5. Add Preprocessing

Alternative 3: 95.9% accurate, 0.2× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\\ t_2 := \sqrt{t + 1} - \sqrt{t}\\ t_3 := \sqrt{1 + z}\\ t_4 := \sqrt{z + 1} - \sqrt{z}\\ t_5 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_4\right) + t\_2\\ t_6 := \sqrt{1 + y}\\ \mathbf{if}\;t\_5 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + t\_4\right) + t\_2\\ \mathbf{elif}\;t\_5 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_4\right) + t\_2\\ \mathbf{elif}\;t\_5 \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, t\_6\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{elif}\;t\_5 \leq 3:\\ \;\;\;\;\left(\left(t\_6 + 1\right) + t\_3\right) - t\_1\\ \mathbf{else}:\\ \;\;\;\;2 + \left(\left(\mathsf{fma}\left(0.5, x, t\_3\right) + \sqrt{1 + t}\right) - \left(t\_1 + \sqrt{t}\right)\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) (sqrt y)) (sqrt x)))
        (t_2 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_3 (sqrt (+ 1.0 z)))
        (t_4 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_5
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_4)
          t_2))
        (t_6 (sqrt (+ 1.0 y))))
   (if (<= t_5 5e-6)
     (+ (+ (* (sqrt (pow x -1.0)) 0.5) t_4) t_2)
     (if (<= t_5 1.0)
       (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_4) t_2)
       (if (<= t_5 2.0001)
         (-
          (+ (fma (sqrt (pow z -1.0)) 0.5 t_6) (sqrt (+ 1.0 x)))
          (+ (sqrt y) (sqrt x)))
         (if (<= t_5 3.0)
           (- (+ (+ t_6 1.0) t_3) t_1)
           (+
            2.0
            (- (+ (fma 0.5 x t_3) (sqrt (+ 1.0 t))) (+ 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(z) + sqrt(y)) + sqrt(x);
	double t_2 = sqrt((t + 1.0)) - sqrt(t);
	double t_3 = sqrt((1.0 + z));
	double t_4 = sqrt((z + 1.0)) - sqrt(z);
	double t_5 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_4) + t_2;
	double t_6 = sqrt((1.0 + y));
	double tmp;
	if (t_5 <= 5e-6) {
		tmp = ((sqrt(pow(x, -1.0)) * 0.5) + t_4) + t_2;
	} else if (t_5 <= 1.0) {
		tmp = ((fma(0.5, x, 1.0) - sqrt(x)) + t_4) + t_2;
	} else if (t_5 <= 2.0001) {
		tmp = (fma(sqrt(pow(z, -1.0)), 0.5, t_6) + sqrt((1.0 + x))) - (sqrt(y) + sqrt(x));
	} else if (t_5 <= 3.0) {
		tmp = ((t_6 + 1.0) + t_3) - t_1;
	} else {
		tmp = 2.0 + ((fma(0.5, x, t_3) + sqrt((1.0 + t))) - (t_1 + sqrt(t)));
	}
	return tmp;
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))
	t_2 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_3 = sqrt(Float64(1.0 + z))
	t_4 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_5 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_4) + t_2)
	t_6 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_5 <= 5e-6)
		tmp = Float64(Float64(Float64(sqrt((x ^ -1.0)) * 0.5) + t_4) + t_2);
	elseif (t_5 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_4) + t_2);
	elseif (t_5 <= 2.0001)
		tmp = Float64(Float64(fma(sqrt((z ^ -1.0)), 0.5, t_6) + sqrt(Float64(1.0 + x))) - Float64(sqrt(y) + sqrt(x)));
	elseif (t_5 <= 3.0)
		tmp = Float64(Float64(Float64(t_6 + 1.0) + t_3) - t_1);
	else
		tmp = Float64(2.0 + Float64(Float64(fma(0.5, x, t_3) + sqrt(Float64(1.0 + t))) - 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[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $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[(1.0 + z), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$4 = N[(N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = 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] + t$95$4), $MachinePrecision] + t$95$2), $MachinePrecision]}, Block[{t$95$6 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$5, 5e-6], N[(N[(N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$4), $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$4), $MachinePrecision] + t$95$2), $MachinePrecision], If[LessEqual[t$95$5, 2.0001], N[(N[(N[(N[Sqrt[N[Power[z, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$6), $MachinePrecision] + N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$5, 3.0], N[(N[(N[(t$95$6 + 1.0), $MachinePrecision] + t$95$3), $MachinePrecision] - t$95$1), $MachinePrecision], N[(2.0 + N[(N[(N[(0.5 * x + t$95$3), $MachinePrecision] + N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(t$95$1 + N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]]]]

Derivation

1. Split input into 5 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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

      \[\leadsto \left(\color{blue}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 0.5, \sqrt{1 + y} - \sqrt{y}\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(\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 17.4%

      \[\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 5.00000000000000041e-6 < (+.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 97.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 97.5

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

   4. Applied rewrites 97.5%

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

   5. 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) \]
   6. 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 75.0

         \[\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) \]

   7. Applied rewrites 75.0%

      \[\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) \]

   8. 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) \]
   9. Step-by-step derivation

   10. Applied rewrites 35.1%

       \[\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 (-.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.00010000000000021

   1. Initial program 95.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 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 5.0

          \[\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 5.0%

      \[\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 20.7%

      \[\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.00010000000000021 < (+.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))) < 3

   1. Initial program 98.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 29.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 29.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 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 25.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) \]

   if 3 < (+.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 96.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 \color{blue}{\left(1 + \left(\sqrt{1 + t} + \left(\sqrt{1 + y} + \left(\sqrt{1 + z} + \frac{1}{2} \cdot x\right)\right)\right)\right) - \left(\sqrt{t} + \left(\sqrt{x} + \left(\sqrt{y} + \sqrt{z}\right)\right)\right)} \]
   4. Step-by-step derivation

      1. associate--l+ N/A

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

      2. +-commutative N/A

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

      3. lower-+.f64 N/A

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

   5. Applied rewrites 95.7%

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

   6. Taylor expanded in y around 0

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

   8. Applied rewrites 92.2%

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

4. Final simplification 30.8%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \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(\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) \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, \sqrt{1 + y}\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{elif}\;\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) \leq 3:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;2 + \left(\left(\mathsf{fma}\left(0.5, x, \sqrt{1 + z}\right) + \sqrt{1 + t}\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 4: 98.1% accurate, 0.2× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + x}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{1 + z}\\ t_4 := \sqrt{t + 1} - \sqrt{t}\\ t_5 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_2\right) + t\_4\\ t_6 := \sqrt{1 + y}\\ \mathbf{if}\;t\_5 \leq 0.9999:\\ \;\;\;\;\left({\left(t\_1 + \sqrt{x}\right)}^{-1} + t\_2\right) + t\_4\\ \mathbf{elif}\;t\_5 \leq 1.05:\\ \;\;\;\;\left(\left(t\_1 + {\left(t\_6 + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_4\\ \mathbf{elif}\;t\_5 \leq 3:\\ \;\;\;\;\left(t\_1 + \left({\left(t\_3 + \sqrt{z}\right)}^{-1} + t\_6\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(t\_6 + \sqrt{1 + t}\right) + \left(t\_3 - \sqrt{t}\right)\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right) + 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 (+ 1.0 x)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (sqrt (+ 1.0 z)))
        (t_4 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_5
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_2)
          t_4))
        (t_6 (sqrt (+ 1.0 y))))
   (if (<= t_5 0.9999)
     (+ (+ (pow (+ t_1 (sqrt x)) -1.0) t_2) t_4)
     (if (<= t_5 1.05)
       (+ (- (+ t_1 (pow (+ t_6 (sqrt y)) -1.0)) (sqrt x)) t_4)
       (if (<= t_5 3.0)
         (- (+ t_1 (+ (pow (+ t_3 (sqrt z)) -1.0) t_6)) (+ (sqrt y) (sqrt x)))
         (+
          (-
           (+ (+ t_6 (sqrt (+ 1.0 t))) (- t_3 (sqrt t)))
           (+ (+ (sqrt z) (sqrt y)) (sqrt x)))
          1.0))))))

C

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

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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((1.0d0 + x))
    t_2 = sqrt((z + 1.0d0)) - sqrt(z)
    t_3 = sqrt((1.0d0 + z))
    t_4 = sqrt((t + 1.0d0)) - sqrt(t)
    t_5 = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + t_2) + t_4
    t_6 = sqrt((1.0d0 + y))
    if (t_5 <= 0.9999d0) then
        tmp = (((t_1 + sqrt(x)) ** (-1.0d0)) + t_2) + t_4
    else if (t_5 <= 1.05d0) then
        tmp = ((t_1 + ((t_6 + sqrt(y)) ** (-1.0d0))) - sqrt(x)) + t_4
    else if (t_5 <= 3.0d0) then
        tmp = (t_1 + (((t_3 + sqrt(z)) ** (-1.0d0)) + t_6)) - (sqrt(y) + sqrt(x))
    else
        tmp = (((t_6 + sqrt((1.0d0 + t))) + (t_3 - sqrt(t))) - ((sqrt(z) + sqrt(y)) + sqrt(x))) + 1.0d0
    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((1.0 + x));
	double t_2 = Math.sqrt((z + 1.0)) - Math.sqrt(z);
	double t_3 = Math.sqrt((1.0 + z));
	double t_4 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_5 = (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + (Math.sqrt((y + 1.0)) - Math.sqrt(y))) + t_2) + t_4;
	double t_6 = Math.sqrt((1.0 + y));
	double tmp;
	if (t_5 <= 0.9999) {
		tmp = (Math.pow((t_1 + Math.sqrt(x)), -1.0) + t_2) + t_4;
	} else if (t_5 <= 1.05) {
		tmp = ((t_1 + Math.pow((t_6 + Math.sqrt(y)), -1.0)) - Math.sqrt(x)) + t_4;
	} else if (t_5 <= 3.0) {
		tmp = (t_1 + (Math.pow((t_3 + Math.sqrt(z)), -1.0) + t_6)) - (Math.sqrt(y) + Math.sqrt(x));
	} else {
		tmp = (((t_6 + Math.sqrt((1.0 + t))) + (t_3 - Math.sqrt(t))) - ((Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x))) + 1.0;
	}
	return tmp;
}

Python

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + x))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = sqrt(Float64(1.0 + z))
	t_4 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_5 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_2) + t_4)
	t_6 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_5 <= 0.9999)
		tmp = Float64(Float64((Float64(t_1 + sqrt(x)) ^ -1.0) + t_2) + t_4);
	elseif (t_5 <= 1.05)
		tmp = Float64(Float64(Float64(t_1 + (Float64(t_6 + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_4);
	elseif (t_5 <= 3.0)
		tmp = Float64(Float64(t_1 + Float64((Float64(t_3 + sqrt(z)) ^ -1.0) + t_6)) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(Float64(t_6 + sqrt(Float64(1.0 + t))) + Float64(t_3 - sqrt(t))) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))) + 1.0);
	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((1.0 + x));
	t_2 = sqrt((z + 1.0)) - sqrt(z);
	t_3 = sqrt((1.0 + z));
	t_4 = sqrt((t + 1.0)) - sqrt(t);
	t_5 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_2) + t_4;
	t_6 = sqrt((1.0 + y));
	tmp = 0.0;
	if (t_5 <= 0.9999)
		tmp = (((t_1 + sqrt(x)) ^ -1.0) + t_2) + t_4;
	elseif (t_5 <= 1.05)
		tmp = ((t_1 + ((t_6 + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_4;
	elseif (t_5 <= 3.0)
		tmp = (t_1 + (((t_3 + sqrt(z)) ^ -1.0) + t_6)) - (sqrt(y) + sqrt(x));
	else
		tmp = (((t_6 + sqrt((1.0 + t))) + (t_3 - sqrt(t))) - ((sqrt(z) + sqrt(y)) + sqrt(x))) + 1.0;
	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[(1.0 + x), $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 + z), $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[(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] + t$95$2), $MachinePrecision] + t$95$4), $MachinePrecision]}, Block[{t$95$6 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$5, 0.9999], N[(N[(N[Power[N[(t$95$1 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$4), $MachinePrecision], If[LessEqual[t$95$5, 1.05], N[(N[(N[(t$95$1 + N[Power[N[(t$95$6 + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision], If[LessEqual[t$95$5, 3.0], N[(N[(t$95$1 + N[(N[Power[N[(t$95$3 + N[Sqrt[z], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$6), $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(t$95$6 + N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[(t$95$3 - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]]]]]]]]]]

Derivation

1. Split input into 4 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))) < 0.99990000000000001

   1. Initial program 13.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\color{blue}{\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. flip-- N/A

         \[\leadsto \left(\left(\color{blue}{\frac{\sqrt{x + 1} \cdot \sqrt{x + 1} - \sqrt{x} \cdot \sqrt{x}}{\sqrt{x + 1} + \sqrt{x}}} + \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-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lower-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 13.8

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lower-+.f64 13.8

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

   4. Applied rewrites 13.8%

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

   5. 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) \]
   6. 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. lower-+.f64 N/A

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

      6. lower-sqrt.f64 22.1

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

   7. Applied rewrites 22.1%

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

   if 0.99990000000000001 < (+.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.05000000000000004

   1. Initial program 94.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(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 95.1

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

   4. Applied rewrites 95.1%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 54.4

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

   7. Applied rewrites 54.4%

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

   if 1.05000000000000004 < (+.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))) < 3

   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. 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 98.3

          \[\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 98.3%

      \[\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) \]

   5. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

   7. Applied rewrites 28.0%

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

   if 3 < (+.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 96.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 \color{blue}{\left(1 + \left(\sqrt{1 + t} + \left(\sqrt{1 + y} + \sqrt{1 + z}\right)\right)\right) - \left(\sqrt{t} + \left(\sqrt{x} + \left(\sqrt{y} + \sqrt{z}\right)\right)\right)} \]
   4. Step-by-step derivation

      1. associate--l+ N/A

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

      2. +-commutative N/A

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

      3. lower-+.f64 N/A

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

   5. Applied rewrites 95.8%

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

4. Final simplification 40.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 0.9999:\\ \;\;\;\;\left({\left(\sqrt{1 + x} + \sqrt{x}\right)}^{-1} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 1.05:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 3:\\ \;\;\;\;\left(\sqrt{1 + x} + \left({\left(\sqrt{1 + z} + \sqrt{z}\right)}^{-1} + \sqrt{1 + y}\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(\sqrt{1 + y} + \sqrt{1 + t}\right) + \left(\sqrt{1 + z} - \sqrt{t}\right)\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right) + 1\\ \end{array} \]
5. Add Preprocessing

Alternative 5: 98.0% accurate, 0.2× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + x}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{1 + z}\\ t_4 := \sqrt{t + 1} - \sqrt{t}\\ t_5 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_2\right) + t\_4\\ t_6 := \sqrt{1 + y}\\ \mathbf{if}\;t\_5 \leq 0.9999:\\ \;\;\;\;\left({\left(t\_1 + \sqrt{x}\right)}^{-1} + t\_2\right) + t\_4\\ \mathbf{elif}\;t\_5 \leq 1.05:\\ \;\;\;\;\left(\left(t\_1 + {\left(t\_6 + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_4\\ \mathbf{elif}\;t\_5 \leq 3:\\ \;\;\;\;\left(t\_1 + \left({\left(t\_3 + \sqrt{z}\right)}^{-1} + t\_6\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, t\_3\right)\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 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 (+ 1.0 x)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (sqrt (+ 1.0 z)))
        (t_4 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_5
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_2)
          t_4))
        (t_6 (sqrt (+ 1.0 y))))
   (if (<= t_5 0.9999)
     (+ (+ (pow (+ t_1 (sqrt x)) -1.0) t_2) t_4)
     (if (<= t_5 1.05)
       (+ (- (+ t_1 (pow (+ t_6 (sqrt y)) -1.0)) (sqrt x)) t_4)
       (if (<= t_5 3.0)
         (- (+ t_1 (+ (pow (+ t_3 (sqrt z)) -1.0) t_6)) (+ (sqrt y) (sqrt x)))
         (+
          (-
           (+ (+ 1.0 (sqrt (+ 1.0 t))) (fma 0.5 x t_3))
           (+ (+ (+ (sqrt z) (sqrt y)) (sqrt x)) (sqrt t)))
          1.0))))))

C

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + x))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = sqrt(Float64(1.0 + z))
	t_4 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_5 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_2) + t_4)
	t_6 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_5 <= 0.9999)
		tmp = Float64(Float64((Float64(t_1 + sqrt(x)) ^ -1.0) + t_2) + t_4);
	elseif (t_5 <= 1.05)
		tmp = Float64(Float64(Float64(t_1 + (Float64(t_6 + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_4);
	elseif (t_5 <= 3.0)
		tmp = Float64(Float64(t_1 + Float64((Float64(t_3 + sqrt(z)) ^ -1.0) + t_6)) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(Float64(1.0 + sqrt(Float64(1.0 + t))) + fma(0.5, x, t_3)) - Float64(Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0);
	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[(1.0 + x), $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 + z), $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[(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] + t$95$2), $MachinePrecision] + t$95$4), $MachinePrecision]}, Block[{t$95$6 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$5, 0.9999], N[(N[(N[Power[N[(t$95$1 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$4), $MachinePrecision], If[LessEqual[t$95$5, 1.05], N[(N[(N[(t$95$1 + N[Power[N[(t$95$6 + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision], If[LessEqual[t$95$5, 3.0], N[(N[(t$95$1 + N[(N[Power[N[(t$95$3 + N[Sqrt[z], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$6), $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(1.0 + N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[(0.5 * x + t$95$3), $MachinePrecision]), $MachinePrecision] - N[(N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]]]]]]]]]]

Derivation

1. Split input into 4 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))) < 0.99990000000000001

   1. Initial program 13.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\color{blue}{\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. flip-- N/A

         \[\leadsto \left(\left(\color{blue}{\frac{\sqrt{x + 1} \cdot \sqrt{x + 1} - \sqrt{x} \cdot \sqrt{x}}{\sqrt{x + 1} + \sqrt{x}}} + \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-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lower-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 13.8

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lower-+.f64 13.8

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

   4. Applied rewrites 13.8%

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

   5. 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) \]
   6. 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. lower-+.f64 N/A

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

      6. lower-sqrt.f64 22.1

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

   7. Applied rewrites 22.1%

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

   if 0.99990000000000001 < (+.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.05000000000000004

   1. Initial program 94.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(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 95.1

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

   4. Applied rewrites 95.1%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 54.4

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

   7. Applied rewrites 54.4%

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

   if 1.05000000000000004 < (+.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))) < 3

   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. 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 98.3

          \[\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 98.3%

      \[\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) \]

   5. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

   7. Applied rewrites 28.0%

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

   if 3 < (+.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 96.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 \color{blue}{\left(1 + \left(\sqrt{1 + t} + \left(\sqrt{1 + y} + \left(\sqrt{1 + z} + \frac{1}{2} \cdot x\right)\right)\right)\right) - \left(\sqrt{t} + \left(\sqrt{x} + \left(\sqrt{y} + \sqrt{z}\right)\right)\right)} \]
   4. Step-by-step derivation

      1. associate--l+ N/A

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

      2. +-commutative N/A

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

      3. lower-+.f64 N/A

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

   5. Applied rewrites 95.7%

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

   6. Taylor expanded in y around 0

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

   8. Applied rewrites 92.2%

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

4. Final simplification 40.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 0.9999:\\ \;\;\;\;\left({\left(\sqrt{1 + x} + \sqrt{x}\right)}^{-1} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 1.05:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 3:\\ \;\;\;\;\left(\sqrt{1 + x} + \left({\left(\sqrt{1 + z} + \sqrt{z}\right)}^{-1} + \sqrt{1 + y}\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, \sqrt{1 + z}\right)\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 1\\ \end{array} \]
5. Add Preprocessing

Alternative 6: 98.0% accurate, 0.2× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + y}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_2\right) + t\_3\\ t_5 := \sqrt{1 + z}\\ t_6 := \sqrt{1 + x}\\ \mathbf{if}\;t\_4 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + t\_2\right) + t\_3\\ \mathbf{elif}\;t\_4 \leq 1.05:\\ \;\;\;\;\left(\left(t\_6 + {\left(t\_1 + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_3\\ \mathbf{elif}\;t\_4 \leq 3:\\ \;\;\;\;\left(t\_6 + \left({\left(t\_5 + \sqrt{z}\right)}^{-1} + t\_1\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, t\_5\right)\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 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 (+ 1.0 y)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_2)
          t_3))
        (t_5 (sqrt (+ 1.0 z)))
        (t_6 (sqrt (+ 1.0 x))))
   (if (<= t_4 5e-6)
     (+ (+ (* (sqrt (pow x -1.0)) 0.5) t_2) t_3)
     (if (<= t_4 1.05)
       (+ (- (+ t_6 (pow (+ t_1 (sqrt y)) -1.0)) (sqrt x)) t_3)
       (if (<= t_4 3.0)
         (- (+ t_6 (+ (pow (+ t_5 (sqrt z)) -1.0) t_1)) (+ (sqrt y) (sqrt x)))
         (+
          (-
           (+ (+ 1.0 (sqrt (+ 1.0 t))) (fma 0.5 x t_5))
           (+ (+ (+ (sqrt z) (sqrt y)) (sqrt x)) (sqrt t)))
          1.0))))))

C

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + y))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_4 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_2) + t_3)
	t_5 = sqrt(Float64(1.0 + z))
	t_6 = sqrt(Float64(1.0 + x))
	tmp = 0.0
	if (t_4 <= 5e-6)
		tmp = Float64(Float64(Float64(sqrt((x ^ -1.0)) * 0.5) + t_2) + t_3);
	elseif (t_4 <= 1.05)
		tmp = Float64(Float64(Float64(t_6 + (Float64(t_1 + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3);
	elseif (t_4 <= 3.0)
		tmp = Float64(Float64(t_6 + Float64((Float64(t_5 + sqrt(z)) ^ -1.0) + t_1)) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(Float64(1.0 + sqrt(Float64(1.0 + t))) + fma(0.5, x, t_5)) - Float64(Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0);
	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[(1.0 + y), $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[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = 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] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision]}, Block[{t$95$5 = N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$6 = N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$4, 5e-6], N[(N[(N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$4, 1.05], N[(N[(N[(t$95$6 + N[Power[N[(t$95$1 + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$4, 3.0], N[(N[(t$95$6 + N[(N[Power[N[(t$95$5 + N[Sqrt[z], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$1), $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(1.0 + N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[(0.5 * x + t$95$5), $MachinePrecision]), $MachinePrecision] - N[(N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]]]]]]]]]]

Derivation

1. Split input into 4 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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

      \[\leadsto \left(\color{blue}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 0.5, \sqrt{1 + y} - \sqrt{y}\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(\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 17.4%

      \[\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 5.00000000000000041e-6 < (+.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.05000000000000004

   1. Initial program 94.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(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 95.1

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

   4. Applied rewrites 95.1%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 53.7

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

   7. Applied rewrites 53.7%

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

   if 1.05000000000000004 < (+.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))) < 3

   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. 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 98.3

          \[\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 98.3%

      \[\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) \]

   5. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

   7. Applied rewrites 28.0%

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

   if 3 < (+.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 96.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 \color{blue}{\left(1 + \left(\sqrt{1 + t} + \left(\sqrt{1 + y} + \left(\sqrt{1 + z} + \frac{1}{2} \cdot x\right)\right)\right)\right) - \left(\sqrt{t} + \left(\sqrt{x} + \left(\sqrt{y} + \sqrt{z}\right)\right)\right)} \]
   4. Step-by-step derivation

      1. associate--l+ N/A

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

      2. +-commutative N/A

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

      3. lower-+.f64 N/A

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

   5. Applied rewrites 95.7%

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

   6. Taylor expanded in y around 0

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

   8. Applied rewrites 92.2%

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

4. Final simplification 39.7%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 1.05:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 3:\\ \;\;\;\;\left(\sqrt{1 + x} + \left({\left(\sqrt{1 + z} + \sqrt{z}\right)}^{-1} + \sqrt{1 + y}\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, \sqrt{1 + z}\right)\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 1\\ \end{array} \]
5. Add Preprocessing

Alternative 7: 96.0% accurate, 0.2× 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 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_1\right) + t\_2\\ t_4 := \sqrt{1 + z}\\ \mathbf{if}\;t\_3 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + t\_1\right) + t\_2\\ \mathbf{elif}\;t\_3 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_1\right) + t\_2\\ \mathbf{elif}\;t\_3 \leq 3:\\ \;\;\;\;\left(\sqrt{1 + x} + \left({\left(t\_4 + \sqrt{z}\right)}^{-1} + \sqrt{1 + y}\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, t\_4\right)\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 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 (+ z 1.0)) (sqrt z)))
        (t_2 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_3
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_1)
          t_2))
        (t_4 (sqrt (+ 1.0 z))))
   (if (<= t_3 5e-6)
     (+ (+ (* (sqrt (pow x -1.0)) 0.5) t_1) t_2)
     (if (<= t_3 1.0)
       (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_1) t_2)
       (if (<= t_3 3.0)
         (-
          (+ (sqrt (+ 1.0 x)) (+ (pow (+ t_4 (sqrt z)) -1.0) (sqrt (+ 1.0 y))))
          (+ (sqrt y) (sqrt x)))
         (+
          (-
           (+ (+ 1.0 (sqrt (+ 1.0 t))) (fma 0.5 x t_4))
           (+ (+ (+ (sqrt z) (sqrt y)) (sqrt x)) (sqrt t)))
          1.0))))))

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)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_2;
	double t_4 = sqrt((1.0 + z));
	double tmp;
	if (t_3 <= 5e-6) {
		tmp = ((sqrt(pow(x, -1.0)) * 0.5) + t_1) + t_2;
	} else if (t_3 <= 1.0) {
		tmp = ((fma(0.5, x, 1.0) - sqrt(x)) + t_1) + t_2;
	} else if (t_3 <= 3.0) {
		tmp = (sqrt((1.0 + x)) + (pow((t_4 + sqrt(z)), -1.0) + sqrt((1.0 + y)))) - (sqrt(y) + sqrt(x));
	} else {
		tmp = (((1.0 + sqrt((1.0 + t))) + fma(0.5, x, t_4)) - (((sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0;
	}
	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 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_1) + t_2)
	t_4 = sqrt(Float64(1.0 + z))
	tmp = 0.0
	if (t_3 <= 5e-6)
		tmp = Float64(Float64(Float64(sqrt((x ^ -1.0)) * 0.5) + t_1) + t_2);
	elseif (t_3 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_1) + t_2);
	elseif (t_3 <= 3.0)
		tmp = Float64(Float64(sqrt(Float64(1.0 + x)) + Float64((Float64(t_4 + sqrt(z)) ^ -1.0) + sqrt(Float64(1.0 + y)))) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(Float64(1.0 + sqrt(Float64(1.0 + t))) + fma(0.5, x, t_4)) - Float64(Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0);
	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[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$3 = 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] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$3, 5e-6], N[(N[(N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], If[LessEqual[t$95$3, 1.0], N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], If[LessEqual[t$95$3, 3.0], N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + N[(N[Power[N[(t$95$4 + N[Sqrt[z], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(1.0 + N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + N[(0.5 * x + t$95$4), $MachinePrecision]), $MachinePrecision] - N[(N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]]]]]]]]

Derivation

1. Split input into 4 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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

      \[\leadsto \left(\color{blue}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 0.5, \sqrt{1 + y} - \sqrt{y}\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(\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 17.4%

      \[\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 5.00000000000000041e-6 < (+.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 97.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 97.5

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

   4. Applied rewrites 97.5%

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

   5. 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) \]
   6. 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 75.0

         \[\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) \]

   7. Applied rewrites 75.0%

      \[\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) \]

   8. 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) \]
   9. Step-by-step derivation

   10. Applied rewrites 35.1%

       \[\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 (-.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))) < 3

   1. Initial program 96.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. 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.3

          \[\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.3%

      \[\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) \]

   5. Taylor expanded in t around inf

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

      1. lower--.f64 N/A

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

   7. Applied rewrites 26.3%

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

   if 3 < (+.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 96.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 \color{blue}{\left(1 + \left(\sqrt{1 + t} + \left(\sqrt{1 + y} + \left(\sqrt{1 + z} + \frac{1}{2} \cdot x\right)\right)\right)\right) - \left(\sqrt{t} + \left(\sqrt{x} + \left(\sqrt{y} + \sqrt{z}\right)\right)\right)} \]
   4. Step-by-step derivation

      1. associate--l+ N/A

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

      2. +-commutative N/A

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

      3. lower-+.f64 N/A

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

   5. Applied rewrites 95.7%

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

   6. Taylor expanded in y around 0

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

   8. Applied rewrites 92.2%

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

4. Final simplification 33.2%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \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(\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) \leq 3:\\ \;\;\;\;\left(\sqrt{1 + x} + \left({\left(\sqrt{1 + z} + \sqrt{z}\right)}^{-1} + \sqrt{1 + y}\right)\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 + \sqrt{1 + t}\right) + \mathsf{fma}\left(0.5, x, \sqrt{1 + z}\right)\right) - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 1\\ \end{array} \]
5. Add Preprocessing

Alternative 8: 90.6% accurate, 0.2× 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 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_2\right) + t\_1\\ t_4 := \sqrt{1 + y}\\ \mathbf{if}\;t\_3 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + t\_2\right) + t\_1\\ \mathbf{elif}\;t\_3 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_2\right) + t\_1\\ \mathbf{elif}\;t\_3 \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, t\_4\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_4 + 1\right) + \sqrt{1 + z}\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 (+ t 1.0)) (sqrt t)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_2)
          t_1))
        (t_4 (sqrt (+ 1.0 y))))
   (if (<= t_3 5e-6)
     (+ (+ (* (sqrt (pow x -1.0)) 0.5) t_2) t_1)
     (if (<= t_3 1.0)
       (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_2) t_1)
       (if (<= t_3 2.0001)
         (-
          (+ (fma (sqrt (pow z -1.0)) 0.5 t_4) (sqrt (+ 1.0 x)))
          (+ (sqrt y) (sqrt x)))
         (-
          (+ (+ t_4 1.0) (sqrt (+ 1.0 z)))
          (+ (+ (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((t + 1.0)) - sqrt(t);
	double t_2 = sqrt((z + 1.0)) - sqrt(z);
	double t_3 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_2) + t_1;
	double t_4 = sqrt((1.0 + y));
	double tmp;
	if (t_3 <= 5e-6) {
		tmp = ((sqrt(pow(x, -1.0)) * 0.5) + t_2) + t_1;
	} else if (t_3 <= 1.0) {
		tmp = ((fma(0.5, x, 1.0) - sqrt(x)) + t_2) + t_1;
	} else if (t_3 <= 2.0001) {
		tmp = (fma(sqrt(pow(z, -1.0)), 0.5, t_4) + sqrt((1.0 + x))) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_4 + 1.0) + sqrt((1.0 + z))) - ((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 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_2) + t_1)
	t_4 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_3 <= 5e-6)
		tmp = Float64(Float64(Float64(sqrt((x ^ -1.0)) * 0.5) + t_2) + t_1);
	elseif (t_3 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_2) + t_1);
	elseif (t_3 <= 2.0001)
		tmp = Float64(Float64(fma(sqrt((z ^ -1.0)), 0.5, t_4) + sqrt(Float64(1.0 + x))) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_4 + 1.0) + sqrt(Float64(1.0 + z))) - 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[(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[(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] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$3, 5e-6], N[(N[(N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision], If[LessEqual[t$95$3, 1.0], N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$1), $MachinePrecision], If[LessEqual[t$95$3, 2.0001], N[(N[(N[(N[Sqrt[N[Power[z, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$4), $MachinePrecision] + N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$4 + 1.0), $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]

Derivation

1. Split input into 4 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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

      \[\leadsto \left(\color{blue}{\mathsf{fma}\left(\sqrt{\frac{1}{x}}, 0.5, \sqrt{1 + y} - \sqrt{y}\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(\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 17.4%

      \[\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 5.00000000000000041e-6 < (+.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 97.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 97.5

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

   4. Applied rewrites 97.5%

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

   5. 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) \]
   6. 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 75.0

         \[\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) \]

   7. Applied rewrites 75.0%

      \[\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) \]

   8. 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) \]
   9. Step-by-step derivation

   10. Applied rewrites 35.1%

       \[\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 (-.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.00010000000000021

   1. Initial program 95.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 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 5.0

          \[\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 5.0%

      \[\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 20.7%

      \[\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.00010000000000021 < (+.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.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 26.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 26.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 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 23.8%

      \[\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 4 regimes into one program.

4. Final simplification 24.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(\sqrt{{x}^{-1}} \cdot 0.5 + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \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(\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) \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, \sqrt{1 + y}\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 9: 98.1% accurate, 0.3× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + y}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_2\right) + t\_3\\ \mathbf{if}\;t\_4 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\right) + t\_2\right) + t\_3\\ \mathbf{elif}\;t\_4 \leq 2:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(t\_1 + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_3\\ \mathbf{else}:\\ \;\;\;\;1 + \left(\left(\left({\left(\sqrt{1 + t} + \sqrt{t}\right)}^{-1} + \sqrt{1 + z}\right) + t\_1\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\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 (+ 1.0 y)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_2)
          t_3)))
   (if (<= t_4 5e-6)
     (+ (+ (* 0.5 (+ (sqrt (pow x -1.0)) (sqrt (pow y -1.0)))) t_2) t_3)
     (if (<= t_4 2.0)
       (+ (- (+ (sqrt (+ 1.0 x)) (pow (+ t_1 (sqrt y)) -1.0)) (sqrt x)) t_3)
       (+
        1.0
        (-
         (+ (+ (pow (+ (sqrt (+ 1.0 t)) (sqrt t)) -1.0) (sqrt (+ 1.0 z))) 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((1.0 + y));
	double t_2 = sqrt((z + 1.0)) - sqrt(z);
	double t_3 = sqrt((t + 1.0)) - sqrt(t);
	double t_4 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_2) + t_3;
	double tmp;
	if (t_4 <= 5e-6) {
		tmp = ((0.5 * (sqrt(pow(x, -1.0)) + sqrt(pow(y, -1.0)))) + t_2) + t_3;
	} else if (t_4 <= 2.0) {
		tmp = ((sqrt((1.0 + x)) + pow((t_1 + sqrt(y)), -1.0)) - sqrt(x)) + t_3;
	} else {
		tmp = 1.0 + (((pow((sqrt((1.0 + t)) + sqrt(t)), -1.0) + sqrt((1.0 + z))) + t_1) - ((sqrt(z) + sqrt(y)) + sqrt(x)));
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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) :: tmp
    t_1 = sqrt((1.0d0 + y))
    t_2 = sqrt((z + 1.0d0)) - sqrt(z)
    t_3 = sqrt((t + 1.0d0)) - sqrt(t)
    t_4 = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + t_2) + t_3
    if (t_4 <= 5d-6) then
        tmp = ((0.5d0 * (sqrt((x ** (-1.0d0))) + sqrt((y ** (-1.0d0))))) + t_2) + t_3
    else if (t_4 <= 2.0d0) then
        tmp = ((sqrt((1.0d0 + x)) + ((t_1 + sqrt(y)) ** (-1.0d0))) - sqrt(x)) + t_3
    else
        tmp = 1.0d0 + (((((sqrt((1.0d0 + t)) + sqrt(t)) ** (-1.0d0)) + sqrt((1.0d0 + z))) + t_1) - ((sqrt(z) + sqrt(y)) + sqrt(x)))
    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((1.0 + y));
	double t_2 = Math.sqrt((z + 1.0)) - Math.sqrt(z);
	double t_3 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_4 = (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + (Math.sqrt((y + 1.0)) - Math.sqrt(y))) + t_2) + t_3;
	double tmp;
	if (t_4 <= 5e-6) {
		tmp = ((0.5 * (Math.sqrt(Math.pow(x, -1.0)) + Math.sqrt(Math.pow(y, -1.0)))) + t_2) + t_3;
	} else if (t_4 <= 2.0) {
		tmp = ((Math.sqrt((1.0 + x)) + Math.pow((t_1 + Math.sqrt(y)), -1.0)) - Math.sqrt(x)) + t_3;
	} else {
		tmp = 1.0 + (((Math.pow((Math.sqrt((1.0 + t)) + Math.sqrt(t)), -1.0) + Math.sqrt((1.0 + z))) + t_1) - ((Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x)));
	}
	return tmp;
}

Python

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + y))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_4 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_2) + t_3)
	tmp = 0.0
	if (t_4 <= 5e-6)
		tmp = Float64(Float64(Float64(0.5 * Float64(sqrt((x ^ -1.0)) + sqrt((y ^ -1.0)))) + t_2) + t_3);
	elseif (t_4 <= 2.0)
		tmp = Float64(Float64(Float64(sqrt(Float64(1.0 + x)) + (Float64(t_1 + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3);
	else
		tmp = Float64(1.0 + Float64(Float64(Float64((Float64(sqrt(Float64(1.0 + t)) + sqrt(t)) ^ -1.0) + sqrt(Float64(1.0 + z))) + t_1) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))));
	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((1.0 + y));
	t_2 = sqrt((z + 1.0)) - sqrt(z);
	t_3 = sqrt((t + 1.0)) - sqrt(t);
	t_4 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_2) + t_3;
	tmp = 0.0;
	if (t_4 <= 5e-6)
		tmp = ((0.5 * (sqrt((x ^ -1.0)) + sqrt((y ^ -1.0)))) + t_2) + t_3;
	elseif (t_4 <= 2.0)
		tmp = ((sqrt((1.0 + x)) + ((t_1 + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3;
	else
		tmp = 1.0 + (((((sqrt((1.0 + t)) + sqrt(t)) ^ -1.0) + sqrt((1.0 + z))) + t_1) - ((sqrt(z) + sqrt(y)) + sqrt(x)));
	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[(1.0 + y), $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[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = 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] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision]}, If[LessEqual[t$95$4, 5e-6], N[(N[(N[(0.5 * N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[Power[y, -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$4, 2.0], N[(N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + N[Power[N[(t$95$1 + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision], N[(1.0 + N[(N[(N[(N[Power[N[(N[Sqrt[N[(1.0 + t), $MachinePrecision]], $MachinePrecision] + N[Sqrt[t], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

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

   6. Taylor expanded in y 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 50.4%

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

   if 5.00000000000000041e-6 < (+.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 96.9

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

   4. Applied rewrites 96.9%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 49.8

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

   7. Applied rewrites 49.8%

      \[\leadsto \color{blue}{\left(\left(\sqrt{1 + x} + \frac{1}{\sqrt{1 + y} + \sqrt{y}}\right) - \sqrt{x}\right)} + \left(\sqrt{t + 1} - \sqrt{t}\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 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. 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.0

          \[\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.0%

      \[\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}}} \]

   5. Taylor expanded in x around 0

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

      1. associate--l+ N/A

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

      2. lower-+.f64 N/A

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

      3. lower--.f64 N/A

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

   7. Applied rewrites 49.2%

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

4. Final simplification 49.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 2:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;1 + \left(\left(\left({\left(\sqrt{1 + t} + \sqrt{t}\right)}^{-1} + \sqrt{1 + z}\right) + \sqrt{1 + y}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 10: 98.7% 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}\\ t_2 := t\_1 - \sqrt{z}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \sqrt{y + 1} - \sqrt{y}\\ t_5 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + t\_4\right) + t\_2\right) + t\_3\\ \mathbf{if}\;t\_5 \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\right) + t\_2\right) + t\_3\\ \mathbf{elif}\;t\_5 \leq 1.9999999999999996:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_3\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + t\_4\right) + \frac{1}{\sqrt{z} + 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)))
        (t_2 (- t_1 (sqrt z)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4 (- (sqrt (+ y 1.0)) (sqrt y)))
        (t_5 (+ (+ (+ (- (sqrt (+ x 1.0)) (sqrt x)) t_4) t_2) t_3)))
   (if (<= t_5 5e-6)
     (+ (+ (* 0.5 (+ (sqrt (pow x -1.0)) (sqrt (pow y -1.0)))) t_2) t_3)
     (if (<= t_5 1.9999999999999996)
       (+
        (-
         (+ (sqrt (+ 1.0 x)) (pow (+ (sqrt (+ 1.0 y)) (sqrt y)) -1.0))
         (sqrt x))
        t_3)
       (+ (+ (+ (- 1.0 (sqrt x)) t_4) (/ 1.0 (+ (sqrt z) 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));
	double t_2 = t_1 - sqrt(z);
	double t_3 = sqrt((t + 1.0)) - sqrt(t);
	double t_4 = sqrt((y + 1.0)) - sqrt(y);
	double t_5 = (((sqrt((x + 1.0)) - sqrt(x)) + t_4) + t_2) + t_3;
	double tmp;
	if (t_5 <= 5e-6) {
		tmp = ((0.5 * (sqrt(pow(x, -1.0)) + sqrt(pow(y, -1.0)))) + t_2) + t_3;
	} else if (t_5 <= 1.9999999999999996) {
		tmp = ((sqrt((1.0 + x)) + pow((sqrt((1.0 + y)) + sqrt(y)), -1.0)) - sqrt(x)) + t_3;
	} else {
		tmp = (((1.0 - sqrt(x)) + t_4) + (1.0 / (sqrt(z) + t_1))) + t_3;
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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((z + 1.0d0))
    t_2 = t_1 - sqrt(z)
    t_3 = sqrt((t + 1.0d0)) - sqrt(t)
    t_4 = sqrt((y + 1.0d0)) - sqrt(y)
    t_5 = (((sqrt((x + 1.0d0)) - sqrt(x)) + t_4) + t_2) + t_3
    if (t_5 <= 5d-6) then
        tmp = ((0.5d0 * (sqrt((x ** (-1.0d0))) + sqrt((y ** (-1.0d0))))) + t_2) + t_3
    else if (t_5 <= 1.9999999999999996d0) then
        tmp = ((sqrt((1.0d0 + x)) + ((sqrt((1.0d0 + y)) + sqrt(y)) ** (-1.0d0))) - sqrt(x)) + t_3
    else
        tmp = (((1.0d0 - sqrt(x)) + t_4) + (1.0d0 / (sqrt(z) + t_1))) + t_3
    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));
	double t_2 = t_1 - Math.sqrt(z);
	double t_3 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_4 = Math.sqrt((y + 1.0)) - Math.sqrt(y);
	double t_5 = (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + t_4) + t_2) + t_3;
	double tmp;
	if (t_5 <= 5e-6) {
		tmp = ((0.5 * (Math.sqrt(Math.pow(x, -1.0)) + Math.sqrt(Math.pow(y, -1.0)))) + t_2) + t_3;
	} else if (t_5 <= 1.9999999999999996) {
		tmp = ((Math.sqrt((1.0 + x)) + Math.pow((Math.sqrt((1.0 + y)) + Math.sqrt(y)), -1.0)) - Math.sqrt(x)) + t_3;
	} else {
		tmp = (((1.0 - Math.sqrt(x)) + t_4) + (1.0 / (Math.sqrt(z) + t_1))) + t_3;
	}
	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))
	t_2 = t_1 - math.sqrt(z)
	t_3 = math.sqrt((t + 1.0)) - math.sqrt(t)
	t_4 = math.sqrt((y + 1.0)) - math.sqrt(y)
	t_5 = (((math.sqrt((x + 1.0)) - math.sqrt(x)) + t_4) + t_2) + t_3
	tmp = 0
	if t_5 <= 5e-6:
		tmp = ((0.5 * (math.sqrt(math.pow(x, -1.0)) + math.sqrt(math.pow(y, -1.0)))) + t_2) + t_3
	elif t_5 <= 1.9999999999999996:
		tmp = ((math.sqrt((1.0 + x)) + math.pow((math.sqrt((1.0 + y)) + math.sqrt(y)), -1.0)) - math.sqrt(x)) + t_3
	else:
		tmp = (((1.0 - math.sqrt(x)) + t_4) + (1.0 / (math.sqrt(z) + t_1))) + 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 = Float64(t_1 - sqrt(z))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_4 = Float64(sqrt(Float64(y + 1.0)) - sqrt(y))
	t_5 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + t_4) + t_2) + t_3)
	tmp = 0.0
	if (t_5 <= 5e-6)
		tmp = Float64(Float64(Float64(0.5 * Float64(sqrt((x ^ -1.0)) + sqrt((y ^ -1.0)))) + t_2) + t_3);
	elseif (t_5 <= 1.9999999999999996)
		tmp = Float64(Float64(Float64(sqrt(Float64(1.0 + x)) + (Float64(sqrt(Float64(1.0 + y)) + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3);
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(x)) + t_4) + Float64(1.0 / Float64(sqrt(z) + t_1))) + t_3);
	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));
	t_2 = t_1 - sqrt(z);
	t_3 = sqrt((t + 1.0)) - sqrt(t);
	t_4 = sqrt((y + 1.0)) - sqrt(y);
	t_5 = (((sqrt((x + 1.0)) - sqrt(x)) + t_4) + t_2) + t_3;
	tmp = 0.0;
	if (t_5 <= 5e-6)
		tmp = ((0.5 * (sqrt((x ^ -1.0)) + sqrt((y ^ -1.0)))) + t_2) + t_3;
	elseif (t_5 <= 1.9999999999999996)
		tmp = ((sqrt((1.0 + x)) + ((sqrt((1.0 + y)) + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3;
	else
		tmp = (((1.0 - sqrt(x)) + t_4) + (1.0 / (sqrt(z) + t_1))) + t_3;
	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[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[(t$95$1 - N[Sqrt[z], $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[(N[Sqrt[N[(y + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(N[(N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision]}, If[LessEqual[t$95$5, 5e-6], N[(N[(N[(0.5 * N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[Power[y, -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$5, 1.9999999999999996], N[(N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + N[Power[N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] + N[(1.0 / N[(N[Sqrt[z], $MachinePrecision] + t$95$1), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$3), $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))) < 5.00000000000000041e-6

   1. Initial program 8.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 x around inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 19.5

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

   5. Applied rewrites 19.5%

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

   6. Taylor expanded in y 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 50.4%

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

   if 5.00000000000000041e-6 < (+.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.9999999999999996

   1. Initial program 95.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(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 96.0

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

   4. Applied rewrites 96.0%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 50.0

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

   7. Applied rewrites 50.0%

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

   if 1.9999999999999996 < (+.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.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. 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 98.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 98.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) \]

   5. Taylor expanded in x around 0

      \[\leadsto \left(\left(\color{blue}{\left(1 - \sqrt{x}\right)} + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   6. 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) + \frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      2. lower-sqrt.f64 65.9

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

   7. Applied rewrites 65.9%

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

   8. Taylor expanded in z around 0

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

   10. Applied rewrites 65.9%

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

4. Final simplification 58.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 5 \cdot 10^{-6}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 1.9999999999999996:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \frac{1}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 11: 96.9% accurate, 0.3× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + x}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_2\right) + t\_3\\ t_5 := \sqrt{1 + y}\\ \mathbf{if}\;t\_4 \leq 0.9999:\\ \;\;\;\;\left({\left(t\_1 + \sqrt{x}\right)}^{-1} + t\_2\right) + t\_3\\ \mathbf{elif}\;t\_4 \leq 2:\\ \;\;\;\;\left(\left(t\_1 + {\left(t\_5 + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_3\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(\mathsf{fma}\left(0.5, x, 1\right) + t\_5\right) + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\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 (+ 1.0 x)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_2)
          t_3))
        (t_5 (sqrt (+ 1.0 y))))
   (if (<= t_4 0.9999)
     (+ (+ (pow (+ t_1 (sqrt x)) -1.0) t_2) t_3)
     (if (<= t_4 2.0)
       (+ (- (+ t_1 (pow (+ t_5 (sqrt y)) -1.0)) (sqrt x)) t_3)
       (+
        (-
         (+ (+ (fma 0.5 x 1.0) t_5) (sqrt (+ 1.0 z)))
         (+ (+ (sqrt z) (sqrt y)) (sqrt x)))
        t_3)))))

C

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + x))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_4 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_2) + t_3)
	t_5 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_4 <= 0.9999)
		tmp = Float64(Float64((Float64(t_1 + sqrt(x)) ^ -1.0) + t_2) + t_3);
	elseif (t_4 <= 2.0)
		tmp = Float64(Float64(Float64(t_1 + (Float64(t_5 + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3);
	else
		tmp = Float64(Float64(Float64(Float64(fma(0.5, x, 1.0) + t_5) + sqrt(Float64(1.0 + z))) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))) + 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[(1.0 + x), $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[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = 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] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision]}, Block[{t$95$5 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$4, 0.9999], N[(N[(N[Power[N[(t$95$1 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$4, 2.0], N[(N[(N[(t$95$1 + N[Power[N[(t$95$5 + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision], N[(N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] + t$95$5), $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$3), $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))) < 0.99990000000000001

   1. Initial program 13.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\color{blue}{\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. flip-- N/A

         \[\leadsto \left(\left(\color{blue}{\frac{\sqrt{x + 1} \cdot \sqrt{x + 1} - \sqrt{x} \cdot \sqrt{x}}{\sqrt{x + 1} + \sqrt{x}}} + \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-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lower-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 13.8

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lower-+.f64 13.8

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

   4. Applied rewrites 13.8%

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

   5. 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) \]
   6. 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. lower-+.f64 N/A

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

      6. lower-sqrt.f64 22.1

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

   7. Applied rewrites 22.1%

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

   if 0.99990000000000001 < (+.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 96.9

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

   4. Applied rewrites 96.9%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 50.1

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

   7. Applied rewrites 50.1%

      \[\leadsto \color{blue}{\left(\left(\sqrt{1 + x} + \frac{1}{\sqrt{1 + y} + \sqrt{y}}\right) - \sqrt{x}\right)} + \left(\sqrt{t + 1} - \sqrt{t}\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 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 x around 0

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

      1. lower--.f64 N/A

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

      2. associate-+r+ N/A

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

      3. +-commutative N/A

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

      4. associate-+r+ N/A

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

      5. associate-+r+ N/A

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

      6. lower-+.f64 N/A

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

      7. +-commutative N/A

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

      8. associate-+r+ N/A

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

      9. lower-+.f64 N/A

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

      10. +-commutative N/A

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

      11. lower-fma.f64 N/A

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

      12. lower-sqrt.f64 N/A

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

      13. lower-+.f64 N/A

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

      14. lower-sqrt.f64 N/A

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

      15. lower-+.f64 N/A

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

   5. Applied rewrites 50.3%

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

4. Final simplification 48.3%

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

Alternative 12: 97.4% accurate, 0.3× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + x}\\ t_2 := \sqrt{z + 1}\\ t_3 := t\_2 - \sqrt{z}\\ t_4 := \sqrt{t + 1} - \sqrt{t}\\ t_5 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_3\right) + t\_4\\ \mathbf{if}\;t\_5 \leq 0.9999:\\ \;\;\;\;\left({\left(t\_1 + \sqrt{x}\right)}^{-1} + t\_3\right) + t\_4\\ \mathbf{elif}\;t\_5 \leq 2:\\ \;\;\;\;\left(\left(t\_1 + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_4\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + \left(1 - \sqrt{y}\right)\right) + \frac{\left(z + 1\right) - z}{\sqrt{z} + t\_2}\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 (+ 1.0 x)))
        (t_2 (sqrt (+ z 1.0)))
        (t_3 (- t_2 (sqrt z)))
        (t_4 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_5
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_3)
          t_4)))
   (if (<= t_5 0.9999)
     (+ (+ (pow (+ t_1 (sqrt x)) -1.0) t_3) t_4)
     (if (<= t_5 2.0)
       (+ (- (+ t_1 (pow (+ (sqrt (+ 1.0 y)) (sqrt y)) -1.0)) (sqrt x)) t_4)
       (+
        (+
         (+ (- 1.0 (sqrt x)) (- 1.0 (sqrt y)))
         (/ (- (+ z 1.0) z) (+ (sqrt z) t_2)))
        t_4)))))

C

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

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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((1.0d0 + x))
    t_2 = sqrt((z + 1.0d0))
    t_3 = t_2 - sqrt(z)
    t_4 = sqrt((t + 1.0d0)) - sqrt(t)
    t_5 = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + t_3) + t_4
    if (t_5 <= 0.9999d0) then
        tmp = (((t_1 + sqrt(x)) ** (-1.0d0)) + t_3) + t_4
    else if (t_5 <= 2.0d0) then
        tmp = ((t_1 + ((sqrt((1.0d0 + y)) + sqrt(y)) ** (-1.0d0))) - sqrt(x)) + t_4
    else
        tmp = (((1.0d0 - sqrt(x)) + (1.0d0 - sqrt(y))) + (((z + 1.0d0) - z) / (sqrt(z) + t_2))) + 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((1.0 + x));
	double t_2 = Math.sqrt((z + 1.0));
	double t_3 = t_2 - Math.sqrt(z);
	double t_4 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_5 = (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + (Math.sqrt((y + 1.0)) - Math.sqrt(y))) + t_3) + t_4;
	double tmp;
	if (t_5 <= 0.9999) {
		tmp = (Math.pow((t_1 + Math.sqrt(x)), -1.0) + t_3) + t_4;
	} else if (t_5 <= 2.0) {
		tmp = ((t_1 + Math.pow((Math.sqrt((1.0 + y)) + Math.sqrt(y)), -1.0)) - Math.sqrt(x)) + t_4;
	} else {
		tmp = (((1.0 - Math.sqrt(x)) + (1.0 - Math.sqrt(y))) + (((z + 1.0) - z) / (Math.sqrt(z) + t_2))) + t_4;
	}
	return tmp;
}

Python

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + x))
	t_2 = sqrt(Float64(z + 1.0))
	t_3 = Float64(t_2 - sqrt(z))
	t_4 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_5 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_3) + t_4)
	tmp = 0.0
	if (t_5 <= 0.9999)
		tmp = Float64(Float64((Float64(t_1 + sqrt(x)) ^ -1.0) + t_3) + t_4);
	elseif (t_5 <= 2.0)
		tmp = Float64(Float64(Float64(t_1 + (Float64(sqrt(Float64(1.0 + y)) + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_4);
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(x)) + Float64(1.0 - sqrt(y))) + Float64(Float64(Float64(z + 1.0) - z) / Float64(sqrt(z) + t_2))) + 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((1.0 + x));
	t_2 = sqrt((z + 1.0));
	t_3 = t_2 - sqrt(z);
	t_4 = sqrt((t + 1.0)) - sqrt(t);
	t_5 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_3) + t_4;
	tmp = 0.0;
	if (t_5 <= 0.9999)
		tmp = (((t_1 + sqrt(x)) ^ -1.0) + t_3) + t_4;
	elseif (t_5 <= 2.0)
		tmp = ((t_1 + ((sqrt((1.0 + y)) + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_4;
	else
		tmp = (((1.0 - sqrt(x)) + (1.0 - sqrt(y))) + (((z + 1.0) - z) / (sqrt(z) + t_2))) + 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[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(z + 1.0), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[(t$95$2 - N[Sqrt[z], $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[(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] + t$95$3), $MachinePrecision] + t$95$4), $MachinePrecision]}, If[LessEqual[t$95$5, 0.9999], N[(N[(N[Power[N[(t$95$1 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$3), $MachinePrecision] + t$95$4), $MachinePrecision], If[LessEqual[t$95$5, 2.0], N[(N[(N[(t$95$1 + N[Power[N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[(1.0 - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[(N[(z + 1.0), $MachinePrecision] - z), $MachinePrecision] / N[(N[Sqrt[z], $MachinePrecision] + t$95$2), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$4), $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))) < 0.99990000000000001

   1. Initial program 13.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\color{blue}{\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. flip-- N/A

         \[\leadsto \left(\left(\color{blue}{\frac{\sqrt{x + 1} \cdot \sqrt{x + 1} - \sqrt{x} \cdot \sqrt{x}}{\sqrt{x + 1} + \sqrt{x}}} + \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-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lower-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 13.8

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lower-+.f64 13.8

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

   4. Applied rewrites 13.8%

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

   5. 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) \]
   6. 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. lower-+.f64 N/A

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

      6. lower-sqrt.f64 22.1

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

   7. Applied rewrites 22.1%

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

   if 0.99990000000000001 < (+.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 96.9

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

   4. Applied rewrites 96.9%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 50.1

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

   7. Applied rewrites 50.1%

      \[\leadsto \color{blue}{\left(\left(\sqrt{1 + x} + \frac{1}{\sqrt{1 + y} + \sqrt{y}}\right) - \sqrt{x}\right)} + \left(\sqrt{t + 1} - \sqrt{t}\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 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. 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 98.3

          \[\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 98.3%

      \[\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) \]

   5. Taylor expanded in x around 0

      \[\leadsto \left(\left(\color{blue}{\left(1 - \sqrt{x}\right)} + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + \frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   6. 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) + \frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      2. lower-sqrt.f64 72.9

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

   7. Applied rewrites 72.9%

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

   8. Taylor expanded in y around 0

      \[\leadsto \left(\left(\left(1 - \sqrt{x}\right) + \color{blue}{\left(1 - \sqrt{y}\right)}\right) + \frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]
   9. 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) + \frac{\left(z + 1\right) - z}{\sqrt{z} + \sqrt{z + 1}}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      2. lower-sqrt.f64 54.8

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

   10. Applied rewrites 54.8%

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

4. Final simplification 49.8%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 0.9999:\\ \;\;\;\;\left({\left(\sqrt{1 + x} + \sqrt{x}\right)}^{-1} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 2:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + \left(1 - \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.9% accurate, 0.3× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + x}\\ t_2 := \sqrt{z + 1} - \sqrt{z}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \sqrt{y + 1} - \sqrt{y}\\ t_5 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + t\_4\right) + t\_2\right) + t\_3\\ \mathbf{if}\;t\_5 \leq 0.9999:\\ \;\;\;\;\left({\left(t\_1 + \sqrt{x}\right)}^{-1} + t\_2\right) + t\_3\\ \mathbf{elif}\;t\_5 \leq 2:\\ \;\;\;\;\left(\left(t\_1 + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + t\_3\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\left(1 - \sqrt{x}\right) + t\_4\right) + t\_2\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 (+ 1.0 x)))
        (t_2 (- (sqrt (+ z 1.0)) (sqrt z)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4 (- (sqrt (+ y 1.0)) (sqrt y)))
        (t_5 (+ (+ (+ (- (sqrt (+ x 1.0)) (sqrt x)) t_4) t_2) t_3)))
   (if (<= t_5 0.9999)
     (+ (+ (pow (+ t_1 (sqrt x)) -1.0) t_2) t_3)
     (if (<= t_5 2.0)
       (+ (- (+ t_1 (pow (+ (sqrt (+ 1.0 y)) (sqrt y)) -1.0)) (sqrt x)) t_3)
       (+ (+ (+ (- 1.0 (sqrt x)) t_4) t_2) t_3)))))

C

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

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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((1.0d0 + x))
    t_2 = sqrt((z + 1.0d0)) - sqrt(z)
    t_3 = sqrt((t + 1.0d0)) - sqrt(t)
    t_4 = sqrt((y + 1.0d0)) - sqrt(y)
    t_5 = (((sqrt((x + 1.0d0)) - sqrt(x)) + t_4) + t_2) + t_3
    if (t_5 <= 0.9999d0) then
        tmp = (((t_1 + sqrt(x)) ** (-1.0d0)) + t_2) + t_3
    else if (t_5 <= 2.0d0) then
        tmp = ((t_1 + ((sqrt((1.0d0 + y)) + sqrt(y)) ** (-1.0d0))) - sqrt(x)) + t_3
    else
        tmp = (((1.0d0 - sqrt(x)) + t_4) + t_2) + t_3
    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((1.0 + x));
	double t_2 = Math.sqrt((z + 1.0)) - Math.sqrt(z);
	double t_3 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_4 = Math.sqrt((y + 1.0)) - Math.sqrt(y);
	double t_5 = (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + t_4) + t_2) + t_3;
	double tmp;
	if (t_5 <= 0.9999) {
		tmp = (Math.pow((t_1 + Math.sqrt(x)), -1.0) + t_2) + t_3;
	} else if (t_5 <= 2.0) {
		tmp = ((t_1 + Math.pow((Math.sqrt((1.0 + y)) + Math.sqrt(y)), -1.0)) - Math.sqrt(x)) + t_3;
	} else {
		tmp = (((1.0 - Math.sqrt(x)) + t_4) + t_2) + t_3;
	}
	return tmp;
}

Python

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + x))
	t_2 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_3 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_4 = Float64(sqrt(Float64(y + 1.0)) - sqrt(y))
	t_5 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + t_4) + t_2) + t_3)
	tmp = 0.0
	if (t_5 <= 0.9999)
		tmp = Float64(Float64((Float64(t_1 + sqrt(x)) ^ -1.0) + t_2) + t_3);
	elseif (t_5 <= 2.0)
		tmp = Float64(Float64(Float64(t_1 + (Float64(sqrt(Float64(1.0 + y)) + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3);
	else
		tmp = Float64(Float64(Float64(Float64(1.0 - sqrt(x)) + t_4) + t_2) + t_3);
	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((1.0 + x));
	t_2 = sqrt((z + 1.0)) - sqrt(z);
	t_3 = sqrt((t + 1.0)) - sqrt(t);
	t_4 = sqrt((y + 1.0)) - sqrt(y);
	t_5 = (((sqrt((x + 1.0)) - sqrt(x)) + t_4) + t_2) + t_3;
	tmp = 0.0;
	if (t_5 <= 0.9999)
		tmp = (((t_1 + sqrt(x)) ^ -1.0) + t_2) + t_3;
	elseif (t_5 <= 2.0)
		tmp = ((t_1 + ((sqrt((1.0 + y)) + sqrt(y)) ^ -1.0)) - sqrt(x)) + t_3;
	else
		tmp = (((1.0 - sqrt(x)) + t_4) + t_2) + t_3;
	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[(1.0 + x), $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[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = N[(N[Sqrt[N[(y + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(N[(N[(N[(N[Sqrt[N[(x + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision]}, If[LessEqual[t$95$5, 0.9999], N[(N[(N[Power[N[(t$95$1 + N[Sqrt[x], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$5, 2.0], N[(N[(N[(t$95$1 + N[Power[N[(N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$3), $MachinePrecision], N[(N[(N[(N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$4), $MachinePrecision] + t$95$2), $MachinePrecision] + t$95$3), $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))) < 0.99990000000000001

   1. Initial program 13.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\color{blue}{\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. flip-- N/A

         \[\leadsto \left(\left(\color{blue}{\frac{\sqrt{x + 1} \cdot \sqrt{x + 1} - \sqrt{x} \cdot \sqrt{x}}{\sqrt{x + 1} + \sqrt{x}}} + \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-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lower-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 13.8

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lower-+.f64 13.8

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

   4. Applied rewrites 13.8%

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

   5. 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) \]
   6. 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. lower-+.f64 N/A

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

      6. lower-sqrt.f64 22.1

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

   7. Applied rewrites 22.1%

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

   if 0.99990000000000001 < (+.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 96.9

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

   4. Applied rewrites 96.9%

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

   5. Taylor expanded in z around inf

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

      1. lower--.f64 N/A

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

      2. lower-+.f64 N/A

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

      3. lower-sqrt.f64 N/A

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

      4. lower-+.f64 N/A

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

      5. lower-/.f64 N/A

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

      6. +-commutative N/A

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

      7. lower-+.f64 N/A

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

      8. lower-sqrt.f64 N/A

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

      9. lower-+.f64 N/A

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

      10. lower-sqrt.f64 N/A

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

      11. lower-sqrt.f64 50.1

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

   7. Applied rewrites 50.1%

      \[\leadsto \color{blue}{\left(\left(\sqrt{1 + x} + \frac{1}{\sqrt{1 + y} + \sqrt{y}}\right) - \sqrt{x}\right)} + \left(\sqrt{t + 1} - \sqrt{t}\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 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 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 72.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 72.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) \]
3. Recombined 3 regimes into one program.

4. Final simplification 55.5%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 0.9999:\\ \;\;\;\;\left({\left(\sqrt{1 + x} + \sqrt{x}\right)}^{-1} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 2:\\ \;\;\;\;\left(\left(\sqrt{1 + x} + {\left(\sqrt{1 + y} + \sqrt{y}\right)}^{-1}\right) - \sqrt{x}\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\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)\\ \end{array} \]
5. Add Preprocessing

Alternative 14: 86.8% 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{t + 1} - \sqrt{t}\\ t_3 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_1\right) + t\_2\\ t_4 := \sqrt{1 + y}\\ \mathbf{if}\;t\_3 \leq 1:\\ \;\;\;\;\left({\left(\sqrt{x} + 1\right)}^{-1} + t\_1\right) + t\_2\\ \mathbf{elif}\;t\_3 \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, t\_4\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_4 + 1\right) + \sqrt{1 + z}\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)) (sqrt z)))
        (t_2 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_3
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_1)
          t_2))
        (t_4 (sqrt (+ 1.0 y))))
   (if (<= t_3 1.0)
     (+ (+ (pow (+ (sqrt x) 1.0) -1.0) t_1) t_2)
     (if (<= t_3 2.0001)
       (-
        (+ (fma (sqrt (pow z -1.0)) 0.5 t_4) (sqrt (+ 1.0 x)))
        (+ (sqrt y) (sqrt x)))
       (-
        (+ (+ t_4 1.0) (sqrt (+ 1.0 z)))
        (+ (+ (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)) - sqrt(z);
	double t_2 = sqrt((t + 1.0)) - sqrt(t);
	double t_3 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_2;
	double t_4 = sqrt((1.0 + y));
	double tmp;
	if (t_3 <= 1.0) {
		tmp = (pow((sqrt(x) + 1.0), -1.0) + t_1) + t_2;
	} else if (t_3 <= 2.0001) {
		tmp = (fma(sqrt(pow(z, -1.0)), 0.5, t_4) + sqrt((1.0 + x))) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_4 + 1.0) + sqrt((1.0 + z))) - ((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 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_3 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_1) + t_2)
	t_4 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_3 <= 1.0)
		tmp = Float64(Float64((Float64(sqrt(x) + 1.0) ^ -1.0) + t_1) + t_2);
	elseif (t_3 <= 2.0001)
		tmp = Float64(Float64(fma(sqrt((z ^ -1.0)), 0.5, t_4) + sqrt(Float64(1.0 + x))) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_4 + 1.0) + sqrt(Float64(1.0 + z))) - 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[(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[(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] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$3, 1.0], N[(N[(N[Power[N[(N[Sqrt[x], $MachinePrecision] + 1.0), $MachinePrecision], -1.0], $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], If[LessEqual[t$95$3, 2.0001], N[(N[(N[(N[Sqrt[N[Power[z, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$4), $MachinePrecision] + N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$4 + 1.0), $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $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 (-.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 78.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\color{blue}{\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. flip-- N/A

         \[\leadsto \left(\left(\color{blue}{\frac{\sqrt{x + 1} \cdot \sqrt{x + 1} - \sqrt{x} \cdot \sqrt{x}}{\sqrt{x + 1} + \sqrt{x}}} + \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-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lower-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 78.7

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lower-+.f64 78.7

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

   4. Applied rewrites 78.7%

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

   5. 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) \]
   6. 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. lower-+.f64 N/A

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

      6. lower-sqrt.f64 64.4

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

   7. Applied rewrites 64.4%

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

   8. Taylor expanded in x around 0

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

   10. Applied rewrites 62.0%

       \[\leadsto \left(\frac{1}{\color{blue}{\sqrt{x} + 1}} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\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.00010000000000021

   1. Initial program 95.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 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 5.0

          \[\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 5.0%

      \[\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 20.7%

      \[\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.00010000000000021 < (+.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.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 26.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 26.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 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 23.8%

      \[\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 34.0%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 1:\\ \;\;\;\;\left({\left(\sqrt{x} + 1\right)}^{-1} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \mathbf{elif}\;\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) \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, \sqrt{1 + y}\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 15: 86.3% 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{t + 1} - \sqrt{t}\\ t_3 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_1\right) + t\_2\\ t_4 := \sqrt{1 + y}\\ \mathbf{if}\;t\_3 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_1\right) + t\_2\\ \mathbf{elif}\;t\_3 \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, t\_4\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_4 + 1\right) + \sqrt{1 + z}\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)) (sqrt z)))
        (t_2 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_3
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_1)
          t_2))
        (t_4 (sqrt (+ 1.0 y))))
   (if (<= t_3 1.0)
     (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_1) t_2)
     (if (<= t_3 2.0001)
       (-
        (+ (fma (sqrt (pow z -1.0)) 0.5 t_4) (sqrt (+ 1.0 x)))
        (+ (sqrt y) (sqrt x)))
       (-
        (+ (+ t_4 1.0) (sqrt (+ 1.0 z)))
        (+ (+ (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)) - sqrt(z);
	double t_2 = sqrt((t + 1.0)) - sqrt(t);
	double t_3 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_2;
	double t_4 = sqrt((1.0 + y));
	double tmp;
	if (t_3 <= 1.0) {
		tmp = ((fma(0.5, x, 1.0) - sqrt(x)) + t_1) + t_2;
	} else if (t_3 <= 2.0001) {
		tmp = (fma(sqrt(pow(z, -1.0)), 0.5, t_4) + sqrt((1.0 + x))) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_4 + 1.0) + sqrt((1.0 + z))) - ((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 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_3 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_1) + t_2)
	t_4 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_3 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_1) + t_2);
	elseif (t_3 <= 2.0001)
		tmp = Float64(Float64(fma(sqrt((z ^ -1.0)), 0.5, t_4) + sqrt(Float64(1.0 + x))) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_4 + 1.0) + sqrt(Float64(1.0 + z))) - 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[(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[(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] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$3, 1.0], N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], If[LessEqual[t$95$3, 2.0001], N[(N[(N[(N[Sqrt[N[Power[z, -1.0], $MachinePrecision]], $MachinePrecision] * 0.5 + t$95$4), $MachinePrecision] + N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$4 + 1.0), $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $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 (-.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 78.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 79.5

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

   4. Applied rewrites 79.5%

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

   5. 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) \]
   6. 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 60.5

         \[\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) \]

   7. Applied rewrites 60.5%

      \[\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) \]

   8. 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) \]
   9. Step-by-step derivation

   10. Applied rewrites 28.7%

       \[\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 (-.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.00010000000000021

   1. Initial program 95.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 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 5.0

          \[\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 5.0%

      \[\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 20.7%

      \[\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.00010000000000021 < (+.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.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 26.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 26.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 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 23.8%

      \[\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 24.1%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \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(\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) \leq 2.0001:\\ \;\;\;\;\left(\mathsf{fma}\left(\sqrt{{z}^{-1}}, 0.5, \sqrt{1 + y}\right) + \sqrt{1 + x}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 16: 84.6% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + y}\\ t_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)\\ \mathbf{if}\;t\_2 \leq 1 \lor \neg \left(t\_2 \leq 2\right):\\ \;\;\;\;1 + \left(\left(t\_1 + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\sqrt{1 + x} + t\_1\right) - \left(\sqrt{y} + \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 (+ 1.0 y)))
        (t_2
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           (- (sqrt (+ z 1.0)) (sqrt z)))
          (- (sqrt (+ t 1.0)) (sqrt t)))))
   (if (or (<= t_2 1.0) (not (<= t_2 2.0)))
     (+ 1.0 (- (+ t_1 (sqrt (+ 1.0 z))) (+ (+ (sqrt z) (sqrt y)) (sqrt x))))
     (- (+ (sqrt (+ 1.0 x)) t_1) (+ (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((1.0 + y));
	double t_2 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + (sqrt((z + 1.0)) - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
	double tmp;
	if ((t_2 <= 1.0) || !(t_2 <= 2.0)) {
		tmp = 1.0 + ((t_1 + sqrt((1.0 + z))) - ((sqrt(z) + sqrt(y)) + sqrt(x)));
	} else {
		tmp = (sqrt((1.0 + x)) + t_1) - (sqrt(y) + sqrt(x));
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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) :: tmp
    t_1 = sqrt((1.0d0 + y))
    t_2 = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + (sqrt((z + 1.0d0)) - sqrt(z))) + (sqrt((t + 1.0d0)) - sqrt(t))
    if ((t_2 <= 1.0d0) .or. (.not. (t_2 <= 2.0d0))) then
        tmp = 1.0d0 + ((t_1 + sqrt((1.0d0 + z))) - ((sqrt(z) + sqrt(y)) + sqrt(x)))
    else
        tmp = (sqrt((1.0d0 + x)) + t_1) - (sqrt(y) + sqrt(x))
    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((1.0 + y));
	double t_2 = (((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));
	double tmp;
	if ((t_2 <= 1.0) || !(t_2 <= 2.0)) {
		tmp = 1.0 + ((t_1 + Math.sqrt((1.0 + z))) - ((Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x)));
	} else {
		tmp = (Math.sqrt((1.0 + x)) + t_1) - (Math.sqrt(y) + Math.sqrt(x));
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	t_1 = math.sqrt((1.0 + y))
	t_2 = (((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))
	tmp = 0
	if (t_2 <= 1.0) or not (t_2 <= 2.0):
		tmp = 1.0 + ((t_1 + math.sqrt((1.0 + z))) - ((math.sqrt(z) + math.sqrt(y)) + math.sqrt(x)))
	else:
		tmp = (math.sqrt((1.0 + x)) + t_1) - (math.sqrt(y) + math.sqrt(x))
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + y))
	t_2 = 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)))
	tmp = 0.0
	if ((t_2 <= 1.0) || !(t_2 <= 2.0))
		tmp = Float64(1.0 + Float64(Float64(t_1 + sqrt(Float64(1.0 + z))) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))));
	else
		tmp = Float64(Float64(sqrt(Float64(1.0 + x)) + t_1) - Float64(sqrt(y) + sqrt(x)));
	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((1.0 + y));
	t_2 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + (sqrt((z + 1.0)) - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
	tmp = 0.0;
	if ((t_2 <= 1.0) || ~((t_2 <= 2.0)))
		tmp = 1.0 + ((t_1 + sqrt((1.0 + z))) - ((sqrt(z) + sqrt(y)) + sqrt(x)));
	else
		tmp = (sqrt((1.0 + x)) + t_1) - (sqrt(y) + sqrt(x));
	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[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = 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]}, If[Or[LessEqual[t$95$2, 1.0], N[Not[LessEqual[t$95$2, 2.0]], $MachinePrecision]], N[(1.0 + N[(N[(t$95$1 + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + t$95$1), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]

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 88.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 15.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 15.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(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 41.1%

      \[\leadsto 1 + \color{blue}{\left(\left(\sqrt{1 + y} + \sqrt{1 + z}\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.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 4.9

          \[\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 4.9%

      \[\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 20.8%

      \[\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 33.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \leq 1 \lor \neg \left(\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) \leq 2\right):\\ \;\;\;\;1 + \left(\left(\sqrt{1 + y} + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\sqrt{1 + x} + \sqrt{1 + y}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 17: 85.2% 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{t + 1} - \sqrt{t}\\ t_3 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_1\right) + t\_2\\ t_4 := \sqrt{1 + y}\\ \mathbf{if}\;t\_3 \leq 1:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1\right) - \sqrt{x}\right) + t\_1\right) + t\_2\\ \mathbf{elif}\;t\_3 \leq 2:\\ \;\;\;\;\left(\sqrt{1 + x} + t\_4\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_4 + 1\right) + \sqrt{1 + z}\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)) (sqrt z)))
        (t_2 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_3
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_1)
          t_2))
        (t_4 (sqrt (+ 1.0 y))))
   (if (<= t_3 1.0)
     (+ (+ (- (fma 0.5 x 1.0) (sqrt x)) t_1) t_2)
     (if (<= t_3 2.0)
       (- (+ (sqrt (+ 1.0 x)) t_4) (+ (sqrt y) (sqrt x)))
       (-
        (+ (+ t_4 1.0) (sqrt (+ 1.0 z)))
        (+ (+ (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)) - sqrt(z);
	double t_2 = sqrt((t + 1.0)) - sqrt(t);
	double t_3 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_2;
	double t_4 = sqrt((1.0 + y));
	double tmp;
	if (t_3 <= 1.0) {
		tmp = ((fma(0.5, x, 1.0) - sqrt(x)) + t_1) + t_2;
	} else if (t_3 <= 2.0) {
		tmp = (sqrt((1.0 + x)) + t_4) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_4 + 1.0) + sqrt((1.0 + z))) - ((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 = Float64(sqrt(Float64(z + 1.0)) - sqrt(z))
	t_2 = Float64(sqrt(Float64(t + 1.0)) - sqrt(t))
	t_3 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_1) + t_2)
	t_4 = sqrt(Float64(1.0 + y))
	tmp = 0.0
	if (t_3 <= 1.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, 1.0) - sqrt(x)) + t_1) + t_2);
	elseif (t_3 <= 2.0)
		tmp = Float64(Float64(sqrt(Float64(1.0 + x)) + t_4) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_4 + 1.0) + sqrt(Float64(1.0 + z))) - 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[(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[(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] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision]}, Block[{t$95$4 = N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, If[LessEqual[t$95$3, 1.0], N[(N[(N[(N[(0.5 * x + 1.0), $MachinePrecision] - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], If[LessEqual[t$95$3, 2.0], N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + t$95$4), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$4 + 1.0), $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $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 (-.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 78.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 79.5

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

   4. Applied rewrites 79.5%

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

   5. 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) \]
   6. 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 60.5

         \[\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) \]

   7. Applied rewrites 60.5%

      \[\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) \]

   8. 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) \]
   9. Step-by-step derivation

   10. Applied rewrites 28.7%

       \[\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 (-.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.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 4.9

          \[\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 4.9%

      \[\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 20.8%

      \[\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 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 \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 26.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 26.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(\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 23.3%

      \[\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 23.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\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) \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(\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) \leq 2:\\ \;\;\;\;\left(\sqrt{1 + x} + \sqrt{1 + y}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(\sqrt{1 + y} + 1\right) + \sqrt{1 + z}\right) - \left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 18: 84.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{z + 1} - \sqrt{z}\\ t_2 := \sqrt{1 + y}\\ t_3 := \sqrt{t + 1} - \sqrt{t}\\ t_4 := \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_1\right) + t\_3\\ \mathbf{if}\;t\_4 \leq 1:\\ \;\;\;\;\left(\left(1 - \sqrt{x}\right) + t\_1\right) + t\_3\\ \mathbf{elif}\;t\_4 \leq 2:\\ \;\;\;\;\left(\sqrt{1 + x} + t\_2\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_2 + 1\right) + \sqrt{1 + z}\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)) (sqrt z)))
        (t_2 (sqrt (+ 1.0 y)))
        (t_3 (- (sqrt (+ t 1.0)) (sqrt t)))
        (t_4
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           t_1)
          t_3)))
   (if (<= t_4 1.0)
     (+ (+ (- 1.0 (sqrt x)) t_1) t_3)
     (if (<= t_4 2.0)
       (- (+ (sqrt (+ 1.0 x)) t_2) (+ (sqrt y) (sqrt x)))
       (-
        (+ (+ t_2 1.0) (sqrt (+ 1.0 z)))
        (+ (+ (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)) - 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)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_3;
	double tmp;
	if (t_4 <= 1.0) {
		tmp = ((1.0 - sqrt(x)) + t_1) + t_3;
	} else if (t_4 <= 2.0) {
		tmp = (sqrt((1.0 + x)) + t_2) - (sqrt(y) + sqrt(x));
	} else {
		tmp = ((t_2 + 1.0) + sqrt((1.0 + z))) - ((sqrt(z) + sqrt(y)) + sqrt(x));
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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) :: tmp
    t_1 = sqrt((z + 1.0d0)) - sqrt(z)
    t_2 = sqrt((1.0d0 + y))
    t_3 = sqrt((t + 1.0d0)) - sqrt(t)
    t_4 = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + t_1) + t_3
    if (t_4 <= 1.0d0) then
        tmp = ((1.0d0 - sqrt(x)) + t_1) + t_3
    else if (t_4 <= 2.0d0) then
        tmp = (sqrt((1.0d0 + x)) + t_2) - (sqrt(y) + sqrt(x))
    else
        tmp = ((t_2 + 1.0d0) + sqrt((1.0d0 + z))) - ((sqrt(z) + sqrt(y)) + sqrt(x))
    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));
	double t_3 = Math.sqrt((t + 1.0)) - Math.sqrt(t);
	double t_4 = (((Math.sqrt((x + 1.0)) - Math.sqrt(x)) + (Math.sqrt((y + 1.0)) - Math.sqrt(y))) + t_1) + t_3;
	double tmp;
	if (t_4 <= 1.0) {
		tmp = ((1.0 - Math.sqrt(x)) + t_1) + t_3;
	} else if (t_4 <= 2.0) {
		tmp = (Math.sqrt((1.0 + x)) + t_2) - (Math.sqrt(y) + Math.sqrt(x));
	} else {
		tmp = ((t_2 + 1.0) + Math.sqrt((1.0 + z))) - ((Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x));
	}
	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))
	t_3 = math.sqrt((t + 1.0)) - math.sqrt(t)
	t_4 = (((math.sqrt((x + 1.0)) - math.sqrt(x)) + (math.sqrt((y + 1.0)) - math.sqrt(y))) + t_1) + t_3
	tmp = 0
	if t_4 <= 1.0:
		tmp = ((1.0 - math.sqrt(x)) + t_1) + t_3
	elif t_4 <= 2.0:
		tmp = (math.sqrt((1.0 + x)) + t_2) - (math.sqrt(y) + math.sqrt(x))
	else:
		tmp = ((t_2 + 1.0) + math.sqrt((1.0 + z))) - ((math.sqrt(z) + math.sqrt(y)) + math.sqrt(x))
	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 = Float64(Float64(Float64(Float64(sqrt(Float64(x + 1.0)) - sqrt(x)) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_1) + t_3)
	tmp = 0.0
	if (t_4 <= 1.0)
		tmp = Float64(Float64(Float64(1.0 - sqrt(x)) + t_1) + t_3);
	elseif (t_4 <= 2.0)
		tmp = Float64(Float64(sqrt(Float64(1.0 + x)) + t_2) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_2 + 1.0) + sqrt(Float64(1.0 + z))) - Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x)));
	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));
	t_3 = sqrt((t + 1.0)) - sqrt(t);
	t_4 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_3;
	tmp = 0.0;
	if (t_4 <= 1.0)
		tmp = ((1.0 - sqrt(x)) + t_1) + t_3;
	elseif (t_4 <= 2.0)
		tmp = (sqrt((1.0 + x)) + t_2) - (sqrt(y) + sqrt(x));
	else
		tmp = ((t_2 + 1.0) + sqrt((1.0 + z))) - ((sqrt(z) + sqrt(y)) + sqrt(x));
	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[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[(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] + t$95$1), $MachinePrecision] + t$95$3), $MachinePrecision]}, If[LessEqual[t$95$4, 1.0], N[(N[(N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$3), $MachinePrecision], If[LessEqual[t$95$4, 2.0], N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + t$95$2), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$2 + 1.0), $MachinePrecision] + N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]), $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 (-.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 78.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\left(\sqrt{x + 1} - \sqrt{x}\right) + \color{blue}{\left(\sqrt{y + 1} - \sqrt{y}\right)}\right) + \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) + \color{blue}{\frac{\sqrt{y + 1} \cdot \sqrt{y + 1} - \sqrt{y} \cdot \sqrt{y}}{\sqrt{y + 1} + \sqrt{y}}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      3. lower-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. +-commutative N/A

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

      12. lower-+.f64 79.5

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

   4. Applied rewrites 79.5%

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

   5. 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) \]
   6. 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 60.5

         \[\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) \]

   7. Applied rewrites 60.5%

      \[\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) \]

   8. Taylor expanded in x around 0

      \[\leadsto \left(\left(1 - \color{blue}{\sqrt{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 25.3%

       \[\leadsto \left(\left(1 - \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 (-.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.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 4.9

          \[\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 4.9%

      \[\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 20.8%

      \[\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 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 \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 26.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 26.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(\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 23.3%

      \[\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 22.9%

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

Alternative 19: 84.6% accurate, 0.4× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} t_1 := \sqrt{1 + y}\\ t_2 := \sqrt{1 + z}\\ t_3 := \left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\\ t_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)\\ \mathbf{if}\;t\_4 \leq 1:\\ \;\;\;\;1 + \left(\left(t\_1 + t\_2\right) - t\_3\right)\\ \mathbf{elif}\;t\_4 \leq 2:\\ \;\;\;\;\left(\sqrt{1 + x} + t\_1\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\left(t\_1 + 1\right) + t\_2\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 (+ 1.0 y)))
        (t_2 (sqrt (+ 1.0 z)))
        (t_3 (+ (+ (sqrt z) (sqrt y)) (sqrt x)))
        (t_4
         (+
          (+
           (+ (- (sqrt (+ x 1.0)) (sqrt x)) (- (sqrt (+ y 1.0)) (sqrt y)))
           (- (sqrt (+ z 1.0)) (sqrt z)))
          (- (sqrt (+ t 1.0)) (sqrt t)))))
   (if (<= t_4 1.0)
     (+ 1.0 (- (+ t_1 t_2) t_3))
     (if (<= t_4 2.0)
       (- (+ (sqrt (+ 1.0 x)) t_1) (+ (sqrt y) (sqrt x)))
       (- (+ (+ t_1 1.0) t_2) t_3)))))

C

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

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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) :: tmp
    t_1 = sqrt((1.0d0 + y))
    t_2 = sqrt((1.0d0 + z))
    t_3 = (sqrt(z) + sqrt(y)) + sqrt(x)
    t_4 = (((sqrt((x + 1.0d0)) - sqrt(x)) + (sqrt((y + 1.0d0)) - sqrt(y))) + (sqrt((z + 1.0d0)) - sqrt(z))) + (sqrt((t + 1.0d0)) - sqrt(t))
    if (t_4 <= 1.0d0) then
        tmp = 1.0d0 + ((t_1 + t_2) - t_3)
    else if (t_4 <= 2.0d0) then
        tmp = (sqrt((1.0d0 + x)) + t_1) - (sqrt(y) + sqrt(x))
    else
        tmp = ((t_1 + 1.0d0) + t_2) - t_3
    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((1.0 + y));
	double t_2 = Math.sqrt((1.0 + z));
	double t_3 = (Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x);
	double t_4 = (((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));
	double tmp;
	if (t_4 <= 1.0) {
		tmp = 1.0 + ((t_1 + t_2) - t_3);
	} else if (t_4 <= 2.0) {
		tmp = (Math.sqrt((1.0 + x)) + t_1) - (Math.sqrt(y) + Math.sqrt(x));
	} else {
		tmp = ((t_1 + 1.0) + t_2) - t_3;
	}
	return tmp;
}

Python

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

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	t_1 = sqrt(Float64(1.0 + y))
	t_2 = sqrt(Float64(1.0 + z))
	t_3 = Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x))
	t_4 = 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)))
	tmp = 0.0
	if (t_4 <= 1.0)
		tmp = Float64(1.0 + Float64(Float64(t_1 + t_2) - t_3));
	elseif (t_4 <= 2.0)
		tmp = Float64(Float64(sqrt(Float64(1.0 + x)) + t_1) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(Float64(t_1 + 1.0) + t_2) - t_3);
	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((1.0 + y));
	t_2 = sqrt((1.0 + z));
	t_3 = (sqrt(z) + sqrt(y)) + sqrt(x);
	t_4 = (((sqrt((x + 1.0)) - sqrt(x)) + (sqrt((y + 1.0)) - sqrt(y))) + (sqrt((z + 1.0)) - sqrt(z))) + (sqrt((t + 1.0)) - sqrt(t));
	tmp = 0.0;
	if (t_4 <= 1.0)
		tmp = 1.0 + ((t_1 + t_2) - t_3);
	elseif (t_4 <= 2.0)
		tmp = (sqrt((1.0 + x)) + t_1) - (sqrt(y) + sqrt(x));
	else
		tmp = ((t_1 + 1.0) + t_2) - t_3;
	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[(1.0 + y), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$2 = N[Sqrt[N[(1.0 + z), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$3 = N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$4 = 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]}, If[LessEqual[t$95$4, 1.0], N[(1.0 + N[(N[(t$95$1 + t$95$2), $MachinePrecision] - t$95$3), $MachinePrecision]), $MachinePrecision], If[LessEqual[t$95$4, 2.0], N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + t$95$1), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(t$95$1 + 1.0), $MachinePrecision] + t$95$2), $MachinePrecision] - t$95$3), $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 78.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 56.2%

      \[\leadsto 1 + \color{blue}{\left(\left(\sqrt{1 + y} + \sqrt{1 + z}\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.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 4.9

          \[\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 4.9%

      \[\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 20.8%

      \[\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 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 \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 26.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 26.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(\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 23.3%

      \[\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 32.1%

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

Alternative 20: 96.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} - \sqrt{z}\\ t_2 := \sqrt{t + 1} - \sqrt{t}\\ \mathbf{if}\;x \leq 115:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_1\right) + t\_2\\ \mathbf{else}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\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))))
   (if (<= x 115.0)
     (+
      (+ (+ (fma 0.5 x (- 1.0 (sqrt x))) (- (sqrt (+ y 1.0)) (sqrt y))) t_1)
      t_2)
     (+ (+ (* 0.5 (+ (sqrt (pow x -1.0)) (sqrt (pow y -1.0)))) 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 tmp;
	if (x <= 115.0) {
		tmp = ((fma(0.5, x, (1.0 - sqrt(x))) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_2;
	} else {
		tmp = ((0.5 * (sqrt(pow(x, -1.0)) + sqrt(pow(y, -1.0)))) + 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))
	tmp = 0.0
	if (x <= 115.0)
		tmp = Float64(Float64(Float64(fma(0.5, x, Float64(1.0 - sqrt(x))) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_1) + t_2);
	else
		tmp = Float64(Float64(Float64(0.5 * Float64(sqrt((x ^ -1.0)) + sqrt((y ^ -1.0)))) + t_1) + t_2);
	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[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x, 115.0], N[(N[(N[(N[(0.5 * x + N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(y + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], N[(N[(N[(0.5 * N[(N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[Power[y, -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision]]]]

Derivation

1. Split input into 2 regimes

2. if x < 115

   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 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 95.8

         \[\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 95.8%

      \[\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) \]

   if 115 < x

   1. Initial program 84.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 inf

      \[\leadsto \left(\color{blue}{\left(\left(\sqrt{1 + y} + \frac{1}{2} \cdot \sqrt{\frac{1}{x}}\right) - \sqrt{y}\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}{x}} + \sqrt{1 + y}\right)} - \sqrt{y}\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}{x}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}} \cdot \frac{1}{2}} + \left(\sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}}, \frac{1}{2}, \sqrt{1 + y} - \sqrt{y}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y} - \sqrt{y}}\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}{x}}, \frac{1}{2}, \color{blue}{\sqrt{1 + y}} - \sqrt{y}\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}{x}}, \frac{1}{2}, \sqrt{\color{blue}{1 + y}} - \sqrt{y}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right) \]

      10. lower-sqrt.f64 86.6

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

   5. Applied rewrites 86.6%

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

   6. Taylor expanded in y 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 47.7%

      \[\leadsto \left(0.5 \cdot \color{blue}{\left(\sqrt{\frac{1}{x}} + \sqrt{\frac{1}{y}}\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 72.7%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 115:\\ \;\;\;\;\left(\left(\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)\\ \mathbf{else}:\\ \;\;\;\;\left(0.5 \cdot \left(\sqrt{{x}^{-1}} + \sqrt{{y}^{-1}}\right) + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 21: 95.9% 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{t + 1} - \sqrt{t}\\ \mathbf{if}\;x \leq 2.7 \cdot 10^{-8}:\\ \;\;\;\;\left(\left(\mathsf{fma}\left(0.5, x, 1 - \sqrt{x}\right) + \left(\sqrt{y + 1} - \sqrt{y}\right)\right) + t\_1\right) + t\_2\\ \mathbf{else}:\\ \;\;\;\;\left({\left(\sqrt{1 + x} + \sqrt{x}\right)}^{-1} + 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))))
   (if (<= x 2.7e-8)
     (+
      (+ (+ (fma 0.5 x (- 1.0 (sqrt x))) (- (sqrt (+ y 1.0)) (sqrt y))) t_1)
      t_2)
     (+ (+ (pow (+ (sqrt (+ 1.0 x)) (sqrt x)) -1.0) 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 tmp;
	if (x <= 2.7e-8) {
		tmp = ((fma(0.5, x, (1.0 - sqrt(x))) + (sqrt((y + 1.0)) - sqrt(y))) + t_1) + t_2;
	} else {
		tmp = (pow((sqrt((1.0 + x)) + sqrt(x)), -1.0) + 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))
	tmp = 0.0
	if (x <= 2.7e-8)
		tmp = Float64(Float64(Float64(fma(0.5, x, Float64(1.0 - sqrt(x))) + Float64(sqrt(Float64(y + 1.0)) - sqrt(y))) + t_1) + t_2);
	else
		tmp = Float64(Float64((Float64(sqrt(Float64(1.0 + x)) + sqrt(x)) ^ -1.0) + t_1) + t_2);
	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[(t + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[t], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[x, 2.7e-8], N[(N[(N[(N[(0.5 * x + N[(1.0 - N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + N[(N[Sqrt[N[(y + 1.0), $MachinePrecision]], $MachinePrecision] - N[Sqrt[y], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision], N[(N[(N[Power[N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision] + t$95$1), $MachinePrecision] + t$95$2), $MachinePrecision]]]]

Derivation

1. Split input into 2 regimes

2. if x < 2.70000000000000002e-8

   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 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 97.8

         \[\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 97.8%

      \[\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) \]

   if 2.70000000000000002e-8 < x

   1. Initial program 84.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. Step-by-step derivation

      1. lift--.f64 N/A

         \[\leadsto \left(\left(\color{blue}{\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. flip-- N/A

         \[\leadsto \left(\left(\color{blue}{\frac{\sqrt{x + 1} \cdot \sqrt{x + 1} - \sqrt{x} \cdot \sqrt{x}}{\sqrt{x + 1} + \sqrt{x}}} + \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-/.f64 N/A

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

      4. lift-sqrt.f64 N/A

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

      5. lift-sqrt.f64 N/A

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

      6. rem-square-sqrt N/A

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

      7. lift-sqrt.f64 N/A

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

      8. lift-sqrt.f64 N/A

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

      9. rem-square-sqrt N/A

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

      10. lower--.f64 N/A

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

      11. lift-+.f64 N/A

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

      12. +-commutative N/A

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

      13. lower-+.f64 N/A

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

      14. +-commutative N/A

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

      15. lower-+.f64 85.3

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

      16. lift-+.f64 N/A

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

      17. +-commutative N/A

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

      18. lower-+.f64 85.3

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

   4. Applied rewrites 85.3%

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

   5. 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) \]
   6. 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. lower-+.f64 N/A

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

      6. lower-sqrt.f64 47.7

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

   7. Applied rewrites 47.7%

      \[\leadsto \left(\color{blue}{\frac{1}{\sqrt{1 + x} + \sqrt{x}}} + \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 72.7%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq 2.7 \cdot 10^{-8}:\\ \;\;\;\;\left(\left(\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)\\ \mathbf{else}:\\ \;\;\;\;\left({\left(\sqrt{1 + x} + \sqrt{x}\right)}^{-1} + \left(\sqrt{z + 1} - \sqrt{z}\right)\right) + \left(\sqrt{t + 1} - \sqrt{t}\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 22: 6.0% accurate, 1.0× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \left(0.5 + \sqrt{{x}^{-1}}\right) \cdot x \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 (pow x -1.0))) x))

C

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

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = (0.5d0 + sqrt((x ** (-1.0d0)))) * x
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(Math.pow(x, -1.0))) * x;
}

Python

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

Julia

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

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp = code(x, y, z, t)
	tmp = (0.5 + sqrt((x ^ -1.0))) * 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[(0.5 + N[Sqrt[N[Power[x, -1.0], $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * x), $MachinePrecision]

Derivation

1. Initial program 91.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 x around 0

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

   1. associate--l+ N/A

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

   2. +-commutative N/A

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

   3. lower-+.f64 N/A

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

5. Applied rewrites 32.7%

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

6. Taylor expanded in x around inf

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

8. Applied rewrites 3.8%

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

9. Taylor expanded in x around -inf

   \[\leadsto \left(\frac{1}{2} - \sqrt{\frac{1}{x}} \cdot {\left(\sqrt{-1}\right)}^{2}\right) \cdot x \]
10. Step-by-step derivation

11. Applied rewrites 6.4%

    \[\leadsto \left(0.5 + \sqrt{\frac{1}{x}}\right) \cdot x \]

12. Final simplification 6.4%

    \[\leadsto \left(0.5 + \sqrt{{x}^{-1}}\right) \cdot x \]
13. Add Preprocessing

Alternative 23: 59.5% accurate, 1.6× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \begin{array}{l} \mathbf{if}\;y \leq 6.1 \cdot 10^{+29}:\\ \;\;\;\;\left(\sqrt{1 + x} + \sqrt{1 + y}\right) - \left(\sqrt{y} + \sqrt{x}\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\sqrt{t} - \left(\left(\left(\sqrt{z} + \sqrt{y}\right) + \sqrt{x}\right) + \sqrt{t}\right)\right) + 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
 (if (<= y 6.1e+29)
   (- (+ (sqrt (+ 1.0 x)) (sqrt (+ 1.0 y))) (+ (sqrt y) (sqrt x)))
   (+ (- (sqrt t) (+ (+ (+ (sqrt z) (sqrt y)) (sqrt x)) (sqrt t))) 1.0)))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	double tmp;
	if (y <= 6.1e+29) {
		tmp = (sqrt((1.0 + x)) + sqrt((1.0 + y))) - (sqrt(y) + sqrt(x));
	} else {
		tmp = (sqrt(t) - (((sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0;
	}
	return tmp;
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8) :: tmp
    if (y <= 6.1d+29) then
        tmp = (sqrt((1.0d0 + x)) + sqrt((1.0d0 + y))) - (sqrt(y) + sqrt(x))
    else
        tmp = (sqrt(t) - (((sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0d0
    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 tmp;
	if (y <= 6.1e+29) {
		tmp = (Math.sqrt((1.0 + x)) + Math.sqrt((1.0 + y))) - (Math.sqrt(y) + Math.sqrt(x));
	} else {
		tmp = (Math.sqrt(t) - (((Math.sqrt(z) + Math.sqrt(y)) + Math.sqrt(x)) + Math.sqrt(t))) + 1.0;
	}
	return tmp;
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	tmp = 0
	if y <= 6.1e+29:
		tmp = (math.sqrt((1.0 + x)) + math.sqrt((1.0 + y))) - (math.sqrt(y) + math.sqrt(x))
	else:
		tmp = (math.sqrt(t) - (((math.sqrt(z) + math.sqrt(y)) + math.sqrt(x)) + math.sqrt(t))) + 1.0
	return tmp

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	tmp = 0.0
	if (y <= 6.1e+29)
		tmp = Float64(Float64(sqrt(Float64(1.0 + x)) + sqrt(Float64(1.0 + y))) - Float64(sqrt(y) + sqrt(x)));
	else
		tmp = Float64(Float64(sqrt(t) - Float64(Float64(Float64(sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0);
	end
	return tmp
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp_2 = code(x, y, z, t)
	tmp = 0.0;
	if (y <= 6.1e+29)
		tmp = (sqrt((1.0 + x)) + sqrt((1.0 + y))) - (sqrt(y) + sqrt(x));
	else
		tmp = (sqrt(t) - (((sqrt(z) + sqrt(y)) + sqrt(x)) + sqrt(t))) + 1.0;
	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_] := If[LessEqual[y, 6.1e+29], N[(N[(N[Sqrt[N[(1.0 + x), $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[Sqrt[t], $MachinePrecision] - N[(N[(N[(N[Sqrt[z], $MachinePrecision] + N[Sqrt[y], $MachinePrecision]), $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision] + N[Sqrt[t], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if y < 6.0999999999999998e29

   1. Initial program 95.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 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 18.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 18.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 23.3%

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

   if 6.0999999999999998e29 < y

   1. Initial program 86.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. Taylor expanded in x around 0

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

      1. associate--l+ N/A

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

      2. +-commutative N/A

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

      3. lower-+.f64 N/A

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

   5. Applied rewrites 35.5%

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

   6. Taylor expanded in t around inf

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

   8. Applied rewrites 9.7%

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

4. Final simplification 16.9%

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

Alternative 24: 47.6% accurate, 2.0× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \left(\sqrt{1 + x} + \sqrt{1 + y}\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 x)) (sqrt (+ 1.0 y))) (+ (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 + x)) + sqrt((1.0 + y))) - (sqrt(y) + sqrt(x));
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = (sqrt((1.0d0 + x)) + sqrt((1.0d0 + y))) - (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 + x)) + Math.sqrt((1.0 + y))) - (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 + x)) + math.sqrt((1.0 + y))) - (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 + x)) + sqrt(Float64(1.0 + y))) - 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 + x)) + sqrt((1.0 + y))) - (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 + x), $MachinePrecision]], $MachinePrecision] + N[Sqrt[N[(1.0 + y), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] - N[(N[Sqrt[y], $MachinePrecision] + N[Sqrt[x], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]

Derivation

1. Initial program 91.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 11.5

       \[\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 11.5%

   \[\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 13.8%

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

9. Final simplification 13.8%

   \[\leadsto \left(\sqrt{1 + x} + \sqrt{1 + y}\right) - \left(\sqrt{y} + \sqrt{x}\right) \]
10. Add Preprocessing

Alternative 25: 2.3% accurate, 6.0× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ \mathsf{fma}\left(0.5, x, -\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 (fma 0.5 x (- (sqrt x))))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	return fma(0.5, x, -sqrt(x));
}

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	return fma(0.5, x, Float64(-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[(0.5 * x + (-N[Sqrt[x], $MachinePrecision])), $MachinePrecision]

Derivation

1. Initial program 91.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 x around 0

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

   1. associate--l+ N/A

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

   2. +-commutative N/A

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

   3. lower-+.f64 N/A

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

5. Applied rewrites 32.7%

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

6. Taylor expanded in x around inf

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

8. Applied rewrites 3.8%

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

9. Taylor expanded in x around 0

   \[\leadsto -1 \cdot \sqrt{x} + \frac{1}{2} \cdot \color{blue}{x} \]
10. Step-by-step derivation

11. Applied rewrites 3.8%

    \[\leadsto \mathsf{fma}\left(0.5, x, -\sqrt{x}\right) \]
12. Add Preprocessing

Alternative 26: 1.9% accurate, 8.8× speedup

Math

\[\begin{array}{l} [x, y, z, t] = \mathsf{sort}([x, y, z, t])\\ \\ -\sqrt{x} \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 x)))

C

assert(x < y && y < z && z < t);
double code(double x, double y, double z, double t) {
	return -sqrt(x);
}

Fortran

NOTE: x, y, z, and t should be sorted in increasing order before calling this function.
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    code = -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(x);
}

Python

[x, y, z, t] = sort([x, y, z, t])
def code(x, y, z, t):
	return -math.sqrt(x)

Julia

x, y, z, t = sort([x, y, z, t])
function code(x, y, z, t)
	return Float64(-sqrt(x))
end

MATLAB

x, y, z, t = num2cell(sort([x, y, z, t])){:}
function tmp = code(x, y, z, t)
	tmp = -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[Sqrt[x], $MachinePrecision])

Derivation

1. Initial program 91.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 x around 0

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

   1. associate--l+ N/A

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

   2. +-commutative N/A

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

   3. lower-+.f64 N/A

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

5. Applied rewrites 32.7%

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

6. Taylor expanded in x around inf

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

8. Applied rewrites 3.8%

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

9. Taylor expanded in x around 0

   \[\leadsto -1 \cdot \sqrt{x} \]
10. Step-by-step derivation

11. Applied rewrites 1.6%

    \[\leadsto -\sqrt{x} \]
12. 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

module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

    interface fmax
        module procedure fmax88
        module procedure fmax44
        module procedure fmax84
        module procedure fmax48
    end interface
    interface fmin
        module procedure fmin88
        module procedure fmin44
        module procedure fmin84
        module procedure fmin48
    end interface
contains
    real(8) function fmax88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(4) function fmax44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
    end function
    real(8) function fmax84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmax48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
    end function
    real(8) function fmin88(x, y) result (res)
        real(8), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(4) function fmin44(x, y) result (res)
        real(4), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
    end function
    real(8) function fmin84(x, y) result(res)
        real(8), intent (in) :: x
        real(4), intent (in) :: y
        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
    end function
    real(8) function fmin48(x, y) result(res)
        real(4), intent (in) :: x
        real(8), intent (in) :: y
        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
    end function
end module

real(8) function code(x, y, z, t)
use fmin_fmax_functions
    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 2024360 
(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))))