Numeric.SpecFunctions:logGamma from math-functions-0.1.5.2, C

Percentage Accurate: 58.8% → 98.5%

Time: 12.0s

Alternatives: 19

Speedup: 4.4×

Specification

Math

\[\begin{array}{l} \\ \frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (/
  (*
   (- x 2.0)
   (+
    (*
     (+ (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x) y)
     x)
    z))
  (+
   (* (+ (* (+ (* (+ x 43.3400022514) x) 263.505074721) x) 313.399215894) x)
   47.066876606)))

C

double code(double x, double y, double z) {
	return ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606);
}

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)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = ((x - 2.0d0) * ((((((((x * 4.16438922228d0) + 78.6994924154d0) * x) + 137.519416416d0) * x) + y) * x) + z)) / (((((((x + 43.3400022514d0) * x) + 263.505074721d0) * x) + 313.399215894d0) * x) + 47.066876606d0)
end function

Java

public static double code(double x, double y, double z) {
	return ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606);
}

Python

def code(x, y, z):
	return ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)

Julia

function code(x, y, z)
	return Float64(Float64(Float64(x - 2.0) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / Float64(Float64(Float64(Float64(Float64(Float64(Float64(x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606))
end

MATLAB

function tmp = code(x, y, z)
	tmp = ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606);
end

Wolfram

code[x_, y_, z_] := N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(x * 4.16438922228), $MachinePrecision] + 78.6994924154), $MachinePrecision] * x), $MachinePrecision] + 137.519416416), $MachinePrecision] * x), $MachinePrecision] + y), $MachinePrecision] * x), $MachinePrecision] + z), $MachinePrecision]), $MachinePrecision] / N[(N[(N[(N[(N[(N[(N[(x + 43.3400022514), $MachinePrecision] * x), $MachinePrecision] + 263.505074721), $MachinePrecision] * x), $MachinePrecision] + 313.399215894), $MachinePrecision] * x), $MachinePrecision] + 47.066876606), $MachinePrecision]), $MachinePrecision]

Initial Program: 58.8% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (/
  (*
   (- x 2.0)
   (+
    (*
     (+ (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x) y)
     x)
    z))
  (+
   (* (+ (* (+ (* (+ x 43.3400022514) x) 263.505074721) x) 313.399215894) x)
   47.066876606)))

C

double code(double x, double y, double z) {
	return ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606);
}

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)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = ((x - 2.0d0) * ((((((((x * 4.16438922228d0) + 78.6994924154d0) * x) + 137.519416416d0) * x) + y) * x) + z)) / (((((((x + 43.3400022514d0) * x) + 263.505074721d0) * x) + 313.399215894d0) * x) + 47.066876606d0)
end function

Java

public static double code(double x, double y, double z) {
	return ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606);
}

Python

def code(x, y, z):
	return ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)

Julia

function code(x, y, z)
	return Float64(Float64(Float64(x - 2.0) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / Float64(Float64(Float64(Float64(Float64(Float64(Float64(x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606))
end

MATLAB

function tmp = code(x, y, z)
	tmp = ((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606);
end

Wolfram

code[x_, y_, z_] := N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(x * 4.16438922228), $MachinePrecision] + 78.6994924154), $MachinePrecision] * x), $MachinePrecision] + 137.519416416), $MachinePrecision] * x), $MachinePrecision] + y), $MachinePrecision] * x), $MachinePrecision] + z), $MachinePrecision]), $MachinePrecision] / N[(N[(N[(N[(N[(N[(N[(x + 43.3400022514), $MachinePrecision] * x), $MachinePrecision] + 263.505074721), $MachinePrecision] * x), $MachinePrecision] + 313.399215894), $MachinePrecision] * x), $MachinePrecision] + 47.066876606), $MachinePrecision]), $MachinePrecision]

Alternative 1: 98.5% accurate, 0.5× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \leq 10^{+305}:\\ \;\;\;\;\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<=
      (/
       (*
        (- x 2.0)
        (+
         (*
          (+
           (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x)
           y)
          x)
         z))
       (+
        (*
         (+ (* (+ (* (+ x 43.3400022514) x) 263.505074721) x) 313.399215894)
         x)
        47.066876606))
      1e+305)
   (/
    (*
     (fma x x -4.0)
     (/
      (fma
       (fma (fma (fma 4.16438922228 x 78.6994924154) x 137.519416416) x y)
       x
       z)
      (fma
       (fma (fma (+ 43.3400022514 x) x 263.505074721) x 313.399215894)
       x
       47.066876606)))
    (+ 2.0 x))
   (*
    x
    (+
     (/
      (fma
       (/ (- (/ (- 130977.50649958357 y) x) 3655.1204654076414) x)
       -1.0
       -110.1139242984811)
      x)
     4.16438922228))))

C

double code(double x, double y, double z) {
	double tmp;
	if ((((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)) <= 1e+305) {
		tmp = (fma(x, x, -4.0) * (fma(fma(fma(fma(4.16438922228, x, 78.6994924154), x, 137.519416416), x, y), x, z) / fma(fma(fma((43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606))) / (2.0 + x);
	} else {
		tmp = x * ((fma(((((130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228);
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (Float64(Float64(Float64(x - 2.0) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / Float64(Float64(Float64(Float64(Float64(Float64(Float64(x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)) <= 1e+305)
		tmp = Float64(Float64(fma(x, x, -4.0) * Float64(fma(fma(fma(fma(4.16438922228, x, 78.6994924154), x, 137.519416416), x, y), x, z) / fma(fma(fma(Float64(43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606))) / Float64(2.0 + x));
	else
		tmp = Float64(x * Float64(Float64(fma(Float64(Float64(Float64(Float64(130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(x * 4.16438922228), $MachinePrecision] + 78.6994924154), $MachinePrecision] * x), $MachinePrecision] + 137.519416416), $MachinePrecision] * x), $MachinePrecision] + y), $MachinePrecision] * x), $MachinePrecision] + z), $MachinePrecision]), $MachinePrecision] / N[(N[(N[(N[(N[(N[(N[(x + 43.3400022514), $MachinePrecision] * x), $MachinePrecision] + 263.505074721), $MachinePrecision] * x), $MachinePrecision] + 313.399215894), $MachinePrecision] * x), $MachinePrecision] + 47.066876606), $MachinePrecision]), $MachinePrecision], 1e+305], N[(N[(N[(x * x + -4.0), $MachinePrecision] * N[(N[(N[(N[(N[(4.16438922228 * x + 78.6994924154), $MachinePrecision] * x + 137.519416416), $MachinePrecision] * x + y), $MachinePrecision] * x + z), $MachinePrecision] / N[(N[(N[(N[(43.3400022514 + x), $MachinePrecision] * x + 263.505074721), $MachinePrecision] * x + 313.399215894), $MachinePrecision] * x + 47.066876606), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(2.0 + x), $MachinePrecision]), $MachinePrecision], N[(x * N[(N[(N[(N[(N[(N[(N[(130977.50649958357 - y), $MachinePrecision] / x), $MachinePrecision] - 3655.1204654076414), $MachinePrecision] / x), $MachinePrecision] * -1.0 + -110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if (/.f64 (*.f64 (-.f64 x #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 x #s(literal 104109730557/25000000000 binary64)) #s(literal 393497462077/5000000000 binary64)) x) #s(literal 4297481763/31250000 binary64)) x) y) x) z)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 x #s(literal 216700011257/5000000000 binary64)) x) #s(literal 263505074721/1000000000 binary64)) x) #s(literal 156699607947/500000000 binary64)) x) #s(literal 23533438303/500000000 binary64))) < 9.9999999999999994e304

   1. Initial program 96.6%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   4. Applied rewrites 98.4%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]

   if 9.9999999999999994e304 < (/.f64 (*.f64 (-.f64 x #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 x #s(literal 104109730557/25000000000 binary64)) #s(literal 393497462077/5000000000 binary64)) x) #s(literal 4297481763/31250000 binary64)) x) y) x) z)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 x #s(literal 216700011257/5000000000 binary64)) x) #s(literal 263505074721/1000000000 binary64)) x) #s(literal 156699607947/500000000 binary64)) x) #s(literal 23533438303/500000000 binary64)))

   1. Initial program 0.2%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around -inf

      \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \frac{-1 \cdot \frac{\left(-1 \cdot \frac{y}{x} + \frac{409304707811198655637810418659684985388407301}{3125000000000000000000000000000000000000} \cdot \frac{1}{x}\right) - \frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{x} - \frac{13764240537310136880149}{125000000000000000000}}{x} - \frac{104109730557}{25000000000}\right)\right)} \]

   5. Applied rewrites 98.9%

      \[\leadsto \color{blue}{\left(-x\right) \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{-x} - 4.16438922228\right)} \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \leq 10^{+305}:\\ \;\;\;\;\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 2: 98.5% accurate, 0.5× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \leq 10^{+305}:\\ \;\;\;\;\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<=
      (/
       (*
        (- x 2.0)
        (+
         (*
          (+
           (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x)
           y)
          x)
         z))
       (+
        (*
         (+ (* (+ (* (+ x 43.3400022514) x) 263.505074721) x) 313.399215894)
         x)
        47.066876606))
      1e+305)
   (*
    (fma x x -4.0)
    (/
     (/
      (fma
       (fma (fma (fma 4.16438922228 x 78.6994924154) x 137.519416416) x y)
       x
       z)
      (fma
       (fma (fma (+ 43.3400022514 x) x 263.505074721) x 313.399215894)
       x
       47.066876606))
     (+ 2.0 x)))
   (*
    x
    (+
     (/
      (fma
       (/ (- (/ (- 130977.50649958357 y) x) 3655.1204654076414) x)
       -1.0
       -110.1139242984811)
      x)
     4.16438922228))))

C

double code(double x, double y, double z) {
	double tmp;
	if ((((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)) <= 1e+305) {
		tmp = fma(x, x, -4.0) * ((fma(fma(fma(fma(4.16438922228, x, 78.6994924154), x, 137.519416416), x, y), x, z) / fma(fma(fma((43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)) / (2.0 + x));
	} else {
		tmp = x * ((fma(((((130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228);
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (Float64(Float64(Float64(x - 2.0) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / Float64(Float64(Float64(Float64(Float64(Float64(Float64(x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)) <= 1e+305)
		tmp = Float64(fma(x, x, -4.0) * Float64(Float64(fma(fma(fma(fma(4.16438922228, x, 78.6994924154), x, 137.519416416), x, y), x, z) / fma(fma(fma(Float64(43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)) / Float64(2.0 + x)));
	else
		tmp = Float64(x * Float64(Float64(fma(Float64(Float64(Float64(Float64(130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(x * 4.16438922228), $MachinePrecision] + 78.6994924154), $MachinePrecision] * x), $MachinePrecision] + 137.519416416), $MachinePrecision] * x), $MachinePrecision] + y), $MachinePrecision] * x), $MachinePrecision] + z), $MachinePrecision]), $MachinePrecision] / N[(N[(N[(N[(N[(N[(N[(x + 43.3400022514), $MachinePrecision] * x), $MachinePrecision] + 263.505074721), $MachinePrecision] * x), $MachinePrecision] + 313.399215894), $MachinePrecision] * x), $MachinePrecision] + 47.066876606), $MachinePrecision]), $MachinePrecision], 1e+305], N[(N[(x * x + -4.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(4.16438922228 * x + 78.6994924154), $MachinePrecision] * x + 137.519416416), $MachinePrecision] * x + y), $MachinePrecision] * x + z), $MachinePrecision] / N[(N[(N[(N[(43.3400022514 + x), $MachinePrecision] * x + 263.505074721), $MachinePrecision] * x + 313.399215894), $MachinePrecision] * x + 47.066876606), $MachinePrecision]), $MachinePrecision] / N[(2.0 + x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x * N[(N[(N[(N[(N[(N[(N[(130977.50649958357 - y), $MachinePrecision] / x), $MachinePrecision] - 3655.1204654076414), $MachinePrecision] / x), $MachinePrecision] * -1.0 + -110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if (/.f64 (*.f64 (-.f64 x #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 x #s(literal 104109730557/25000000000 binary64)) #s(literal 393497462077/5000000000 binary64)) x) #s(literal 4297481763/31250000 binary64)) x) y) x) z)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 x #s(literal 216700011257/5000000000 binary64)) x) #s(literal 263505074721/1000000000 binary64)) x) #s(literal 156699607947/500000000 binary64)) x) #s(literal 23533438303/500000000 binary64))) < 9.9999999999999994e304

   1. Initial program 96.6%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   4. Applied rewrites 98.4%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]
   5. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}}{2 + x} \]

      3. associate-/l* N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x}} \]

      4. lift-fma.f64 N/A

         \[\leadsto \color{blue}{\left(x \cdot x + -4\right)} \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      5. metadata-eval N/A

         \[\leadsto \left(x \cdot x + \color{blue}{-2 \cdot 2}\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      6. metadata-eval N/A

         \[\leadsto \left(x \cdot x + \color{blue}{\left(\mathsf{neg}\left(2\right)\right)} \cdot 2\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      7. fp-cancel-sub-sign-inv N/A

         \[\leadsto \color{blue}{\left(x \cdot x - 2 \cdot 2\right)} \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      8. lower-*.f64 N/A

         \[\leadsto \color{blue}{\left(x \cdot x - 2 \cdot 2\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x}} \]

      9. fp-cancel-sub-sign-inv N/A

         \[\leadsto \color{blue}{\left(x \cdot x + \left(\mathsf{neg}\left(2\right)\right) \cdot 2\right)} \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      10. metadata-eval N/A

          \[\leadsto \left(x \cdot x + \color{blue}{-2} \cdot 2\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      11. metadata-eval N/A

          \[\leadsto \left(x \cdot x + \color{blue}{-4}\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      12. lift-fma.f64 N/A

          \[\leadsto \color{blue}{\mathsf{fma}\left(x, x, -4\right)} \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{104109730557}{25000000000}, x, \frac{393497462077}{5000000000}\right), x, \frac{4297481763}{31250000}\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\frac{216700011257}{5000000000} + x, x, \frac{263505074721}{1000000000}\right), x, \frac{156699607947}{500000000}\right), x, \frac{23533438303}{500000000}\right)}}{2 + x} \]

      13. lower-/.f64 98.4

          \[\leadsto \mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{\frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]

   6. Applied rewrites 98.4%

      \[\leadsto \color{blue}{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]

   if 9.9999999999999994e304 < (/.f64 (*.f64 (-.f64 x #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 x #s(literal 104109730557/25000000000 binary64)) #s(literal 393497462077/5000000000 binary64)) x) #s(literal 4297481763/31250000 binary64)) x) y) x) z)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 x #s(literal 216700011257/5000000000 binary64)) x) #s(literal 263505074721/1000000000 binary64)) x) #s(literal 156699607947/500000000 binary64)) x) #s(literal 23533438303/500000000 binary64)))

   1. Initial program 0.2%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around -inf

      \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \frac{-1 \cdot \frac{\left(-1 \cdot \frac{y}{x} + \frac{409304707811198655637810418659684985388407301}{3125000000000000000000000000000000000000} \cdot \frac{1}{x}\right) - \frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{x} - \frac{13764240537310136880149}{125000000000000000000}}{x} - \frac{104109730557}{25000000000}\right)\right)} \]

   5. Applied rewrites 98.9%

      \[\leadsto \color{blue}{\left(-x\right) \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{-x} - 4.16438922228\right)} \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.6%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \leq 10^{+305}:\\ \;\;\;\;\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 3: 98.4% accurate, 0.5× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \leq 10^{+305}:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<=
      (/
       (*
        (- x 2.0)
        (+
         (*
          (+
           (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x)
           y)
          x)
         z))
       (+
        (*
         (+ (* (+ (* (+ x 43.3400022514) x) 263.505074721) x) 313.399215894)
         x)
        47.066876606))
      1e+305)
   (*
    (fma
     (fma (fma (fma 4.16438922228 x 78.6994924154) x 137.519416416) x y)
     x
     z)
    (/
     (- x 2.0)
     (fma
      (fma (fma (+ 43.3400022514 x) x 263.505074721) x 313.399215894)
      x
      47.066876606)))
   (*
    x
    (+
     (/
      (fma
       (/ (- (/ (- 130977.50649958357 y) x) 3655.1204654076414) x)
       -1.0
       -110.1139242984811)
      x)
     4.16438922228))))

C

double code(double x, double y, double z) {
	double tmp;
	if ((((x - 2.0) * ((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / (((((((x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)) <= 1e+305) {
		tmp = fma(fma(fma(fma(4.16438922228, x, 78.6994924154), x, 137.519416416), x, y), x, z) * ((x - 2.0) / fma(fma(fma((43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606));
	} else {
		tmp = x * ((fma(((((130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228);
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (Float64(Float64(Float64(x - 2.0) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z)) / Float64(Float64(Float64(Float64(Float64(Float64(Float64(x + 43.3400022514) * x) + 263.505074721) * x) + 313.399215894) * x) + 47.066876606)) <= 1e+305)
		tmp = Float64(fma(fma(fma(fma(4.16438922228, x, 78.6994924154), x, 137.519416416), x, y), x, z) * Float64(Float64(x - 2.0) / fma(fma(fma(Float64(43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)));
	else
		tmp = Float64(x * Float64(Float64(fma(Float64(Float64(Float64(Float64(130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(x * 4.16438922228), $MachinePrecision] + 78.6994924154), $MachinePrecision] * x), $MachinePrecision] + 137.519416416), $MachinePrecision] * x), $MachinePrecision] + y), $MachinePrecision] * x), $MachinePrecision] + z), $MachinePrecision]), $MachinePrecision] / N[(N[(N[(N[(N[(N[(N[(x + 43.3400022514), $MachinePrecision] * x), $MachinePrecision] + 263.505074721), $MachinePrecision] * x), $MachinePrecision] + 313.399215894), $MachinePrecision] * x), $MachinePrecision] + 47.066876606), $MachinePrecision]), $MachinePrecision], 1e+305], N[(N[(N[(N[(N[(4.16438922228 * x + 78.6994924154), $MachinePrecision] * x + 137.519416416), $MachinePrecision] * x + y), $MachinePrecision] * x + z), $MachinePrecision] * N[(N[(x - 2.0), $MachinePrecision] / N[(N[(N[(N[(43.3400022514 + x), $MachinePrecision] * x + 263.505074721), $MachinePrecision] * x + 313.399215894), $MachinePrecision] * x + 47.066876606), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(x * N[(N[(N[(N[(N[(N[(N[(130977.50649958357 - y), $MachinePrecision] / x), $MachinePrecision] - 3655.1204654076414), $MachinePrecision] / x), $MachinePrecision] * -1.0 + -110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if (/.f64 (*.f64 (-.f64 x #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 x #s(literal 104109730557/25000000000 binary64)) #s(literal 393497462077/5000000000 binary64)) x) #s(literal 4297481763/31250000 binary64)) x) y) x) z)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 x #s(literal 216700011257/5000000000 binary64)) x) #s(literal 263505074721/1000000000 binary64)) x) #s(literal 156699607947/500000000 binary64)) x) #s(literal 23533438303/500000000 binary64))) < 9.9999999999999994e304

   1. Initial program 96.6%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing
   3. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot \frac{104109730557}{25000000000} + \frac{393497462077}{5000000000}\right) \cdot x + \frac{4297481763}{31250000}\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot \frac{104109730557}{25000000000} + \frac{393497462077}{5000000000}\right) \cdot x + \frac{4297481763}{31250000}\right) \cdot x + y\right) \cdot x + z\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. *-commutative N/A

         \[\leadsto \frac{\color{blue}{\left(\left(\left(\left(x \cdot \frac{104109730557}{25000000000} + \frac{393497462077}{5000000000}\right) \cdot x + \frac{4297481763}{31250000}\right) \cdot x + y\right) \cdot x + z\right) \cdot \left(x - 2\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. associate-/l* N/A

         \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \frac{104109730557}{25000000000} + \frac{393497462077}{5000000000}\right) \cdot x + \frac{4297481763}{31250000}\right) \cdot x + y\right) \cdot x + z\right) \cdot \frac{x - 2}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\left(\left(\left(\left(x \cdot \frac{104109730557}{25000000000} + \frac{393497462077}{5000000000}\right) \cdot x + \frac{4297481763}{31250000}\right) \cdot x + y\right) \cdot x + z\right) \cdot \frac{x - 2}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

   4. Applied rewrites 98.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}} \]

   if 9.9999999999999994e304 < (/.f64 (*.f64 (-.f64 x #s(literal 2 binary64)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 x #s(literal 104109730557/25000000000 binary64)) #s(literal 393497462077/5000000000 binary64)) x) #s(literal 4297481763/31250000 binary64)) x) y) x) z)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 x #s(literal 216700011257/5000000000 binary64)) x) #s(literal 263505074721/1000000000 binary64)) x) #s(literal 156699607947/500000000 binary64)) x) #s(literal 23533438303/500000000 binary64)))

   1. Initial program 0.2%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around -inf

      \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \frac{-1 \cdot \frac{\left(-1 \cdot \frac{y}{x} + \frac{409304707811198655637810418659684985388407301}{3125000000000000000000000000000000000000} \cdot \frac{1}{x}\right) - \frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{x} - \frac{13764240537310136880149}{125000000000000000000}}{x} - \frac{104109730557}{25000000000}\right)\right)} \]

   5. Applied rewrites 98.9%

      \[\leadsto \color{blue}{\left(-x\right) \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{-x} - 4.16438922228\right)} \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \leq 10^{+305}:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 4: 96.7% accurate, 1.0× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -3.65 \cdot 10^{+15} \lor \neg \left(x \leq 82000000000000\right):\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(2 + x\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (or (<= x -3.65e+15) (not (<= x 82000000000000.0)))
   (*
    x
    (+
     (/
      (fma
       (/ (- (/ (- 130977.50649958357 y) x) 3655.1204654076414) x)
       -1.0
       -110.1139242984811)
      x)
     4.16438922228))
   (/
    (* (fma x x -4.0) (fma (fma 137.519416416 x y) x z))
    (*
     (+ 2.0 x)
     (fma
      (fma (fma (+ 43.3400022514 x) x 263.505074721) x 313.399215894)
      x
      47.066876606)))))

C

double code(double x, double y, double z) {
	double tmp;
	if ((x <= -3.65e+15) || !(x <= 82000000000000.0)) {
		tmp = x * ((fma(((((130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228);
	} else {
		tmp = (fma(x, x, -4.0) * fma(fma(137.519416416, x, y), x, z)) / ((2.0 + x) * fma(fma(fma((43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606));
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if ((x <= -3.65e+15) || !(x <= 82000000000000.0))
		tmp = Float64(x * Float64(Float64(fma(Float64(Float64(Float64(Float64(130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228));
	else
		tmp = Float64(Float64(fma(x, x, -4.0) * fma(fma(137.519416416, x, y), x, z)) / Float64(Float64(2.0 + x) * fma(fma(fma(Float64(43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[Or[LessEqual[x, -3.65e+15], N[Not[LessEqual[x, 82000000000000.0]], $MachinePrecision]], N[(x * N[(N[(N[(N[(N[(N[(N[(130977.50649958357 - y), $MachinePrecision] / x), $MachinePrecision] - 3655.1204654076414), $MachinePrecision] / x), $MachinePrecision] * -1.0 + -110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision]), $MachinePrecision], N[(N[(N[(x * x + -4.0), $MachinePrecision] * N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision]), $MachinePrecision] / N[(N[(2.0 + x), $MachinePrecision] * N[(N[(N[(N[(43.3400022514 + x), $MachinePrecision] * x + 263.505074721), $MachinePrecision] * x + 313.399215894), $MachinePrecision] * x + 47.066876606), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if x < -3.65e15 or 8.2e13 < x

   1. Initial program 12.6%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around -inf

      \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \frac{-1 \cdot \frac{\left(-1 \cdot \frac{y}{x} + \frac{409304707811198655637810418659684985388407301}{3125000000000000000000000000000000000000} \cdot \frac{1}{x}\right) - \frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{x} - \frac{13764240537310136880149}{125000000000000000000}}{x} - \frac{104109730557}{25000000000}\right)\right)} \]

   5. Applied rewrites 98.1%

      \[\leadsto \color{blue}{\left(-x\right) \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{-x} - 4.16438922228\right)} \]

   if -3.65e15 < x < 8.2e13

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 98.6

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 98.6%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   6. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. associate-/l* N/A

         \[\leadsto \color{blue}{\left(x - 2\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      4. lift--.f64 N/A

         \[\leadsto \color{blue}{\left(x - 2\right)} \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. flip-- N/A

         \[\leadsto \color{blue}{\frac{x \cdot x - 2 \cdot 2}{x + 2}} \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      6. +-commutative N/A

         \[\leadsto \frac{x \cdot x - 2 \cdot 2}{\color{blue}{2 + x}} \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      7. lift-+.f64 N/A

         \[\leadsto \frac{x \cdot x - 2 \cdot 2}{\color{blue}{2 + x}} \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      8. frac-times N/A

         \[\leadsto \color{blue}{\frac{\left(x \cdot x - 2 \cdot 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(2 + x\right) \cdot \left(\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}\right)}} \]

   7. Applied rewrites 98.6%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(2 + x\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}} \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -3.65 \cdot 10^{+15} \lor \neg \left(x \leq 82000000000000\right):\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(2 + x\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}\\ \end{array} \]
5. Add Preprocessing

Alternative 5: 96.7% accurate, 1.2× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -6 \cdot 10^{+18} \lor \neg \left(x \leq 82000000000000\right):\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)} \cdot \left(x - 2\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (or (<= x -6e+18) (not (<= x 82000000000000.0)))
   (*
    x
    (+
     (/
      (fma
       (/ (- (/ (- 130977.50649958357 y) x) 3655.1204654076414) x)
       -1.0
       -110.1139242984811)
      x)
     4.16438922228))
   (*
    (/
     (fma (fma 137.519416416 x y) x z)
     (fma
      (fma (fma (+ 43.3400022514 x) x 263.505074721) x 313.399215894)
      x
      47.066876606))
    (- x 2.0))))

C

double code(double x, double y, double z) {
	double tmp;
	if ((x <= -6e+18) || !(x <= 82000000000000.0)) {
		tmp = x * ((fma(((((130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228);
	} else {
		tmp = (fma(fma(137.519416416, x, y), x, z) / fma(fma(fma((43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)) * (x - 2.0);
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if ((x <= -6e+18) || !(x <= 82000000000000.0))
		tmp = Float64(x * Float64(Float64(fma(Float64(Float64(Float64(Float64(130977.50649958357 - y) / x) - 3655.1204654076414) / x), -1.0, -110.1139242984811) / x) + 4.16438922228));
	else
		tmp = Float64(Float64(fma(fma(137.519416416, x, y), x, z) / fma(fma(fma(Float64(43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)) * Float64(x - 2.0));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[Or[LessEqual[x, -6e+18], N[Not[LessEqual[x, 82000000000000.0]], $MachinePrecision]], N[(x * N[(N[(N[(N[(N[(N[(N[(130977.50649958357 - y), $MachinePrecision] / x), $MachinePrecision] - 3655.1204654076414), $MachinePrecision] / x), $MachinePrecision] * -1.0 + -110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] / N[(N[(N[(N[(43.3400022514 + x), $MachinePrecision] * x + 263.505074721), $MachinePrecision] * x + 313.399215894), $MachinePrecision] * x + 47.066876606), $MachinePrecision]), $MachinePrecision] * N[(x - 2.0), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if x < -6e18 or 8.2e13 < x

   1. Initial program 12.6%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around -inf

      \[\leadsto \color{blue}{-1 \cdot \left(x \cdot \left(-1 \cdot \frac{-1 \cdot \frac{\left(-1 \cdot \frac{y}{x} + \frac{409304707811198655637810418659684985388407301}{3125000000000000000000000000000000000000} \cdot \frac{1}{x}\right) - \frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{x} - \frac{13764240537310136880149}{125000000000000000000}}{x} - \frac{104109730557}{25000000000}\right)\right)} \]

   5. Applied rewrites 98.1%

      \[\leadsto \color{blue}{\left(-x\right) \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{-x} - 4.16438922228\right)} \]

   if -6e18 < x < 8.2e13

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 98.6

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 98.6%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   6. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. associate-/l* N/A

         \[\leadsto \color{blue}{\left(x - 2\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      4. *-commutative N/A

         \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \cdot \left(x - 2\right)} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \cdot \left(x - 2\right)} \]

   7. Applied rewrites 98.6%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)} \cdot \left(x - 2\right)} \]
3. Recombined 2 regimes into one program.

4. Final simplification 98.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -6 \cdot 10^{+18} \lor \neg \left(x \leq 82000000000000\right):\\ \;\;\;\;x \cdot \left(\frac{\mathsf{fma}\left(\frac{\frac{130977.50649958357 - y}{x} - 3655.1204654076414}{x}, -1, -110.1139242984811\right)}{x} + 4.16438922228\right)\\ \mathbf{else}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)} \cdot \left(x - 2\right)\\ \end{array} \]
5. Add Preprocessing

Alternative 6: 94.5% accurate, 1.2× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -7.5 \cdot 10^{+47}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 7 \cdot 10^{+14}:\\ \;\;\;\;\frac{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)} \cdot \left(x - 2\right)\\ \mathbf{else}:\\ \;\;\;\;\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -7.5e+47)
   (* 4.16438922228 x)
   (if (<= x 7e+14)
     (*
      (/
       (fma (fma 137.519416416 x y) x z)
       (fma
        (fma (fma (+ 43.3400022514 x) x 263.505074721) x 313.399215894)
        x
        47.066876606))
      (- x 2.0))
     (* (- 4.16438922228 (/ 110.1139242984811 x)) x))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -7.5e+47) {
		tmp = 4.16438922228 * x;
	} else if (x <= 7e+14) {
		tmp = (fma(fma(137.519416416, x, y), x, z) / fma(fma(fma((43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)) * (x - 2.0);
	} else {
		tmp = (4.16438922228 - (110.1139242984811 / x)) * x;
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -7.5e+47)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 7e+14)
		tmp = Float64(Float64(fma(fma(137.519416416, x, y), x, z) / fma(fma(fma(Float64(43.3400022514 + x), x, 263.505074721), x, 313.399215894), x, 47.066876606)) * Float64(x - 2.0));
	else
		tmp = Float64(Float64(4.16438922228 - Float64(110.1139242984811 / x)) * x);
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -7.5e+47], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 7e+14], N[(N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] / N[(N[(N[(N[(43.3400022514 + x), $MachinePrecision] * x + 263.505074721), $MachinePrecision] * x + 313.399215894), $MachinePrecision] * x + 47.066876606), $MachinePrecision]), $MachinePrecision] * N[(x - 2.0), $MachinePrecision]), $MachinePrecision], N[(N[(4.16438922228 - N[(110.1139242984811 / x), $MachinePrecision]), $MachinePrecision] * x), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -7.4999999999999999e47

   1. Initial program 2.2%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 99.0

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

   5. Applied rewrites 99.0%

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

   if -7.4999999999999999e47 < x < 7e14

   1. Initial program 99.0%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 96.7

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 96.7%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   6. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. associate-/l* N/A

         \[\leadsto \color{blue}{\left(x - 2\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}}} \]

      4. *-commutative N/A

         \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \cdot \left(x - 2\right)} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \cdot \left(x - 2\right)} \]

   7. Applied rewrites 96.7%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)} \cdot \left(x - 2\right)} \]

   if 7e14 < x

   1. Initial program 15.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      3. lower--.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot x \]

      4. associate-*r/ N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000} \cdot 1}{x}\right) \cdot x \]

      5. metadata-eval N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000}}{x}\right) \cdot x \]

      6. lower-/.f64 91.5

         \[\leadsto \left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x \]

   5. Applied rewrites 91.5%

      \[\leadsto \color{blue}{\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 7: 93.0% accurate, 1.4× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \cdot 10^{+15}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 195000000:\\ \;\;\;\;\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(263.505074721, x, 313.399215894\right), x, 47.066876606\right)}\\ \mathbf{else}:\\ \;\;\;\;\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.5e+15)
   (* 4.16438922228 x)
   (if (<= x 195000000.0)
     (/
      (* (- x 2.0) (fma (fma 137.519416416 x y) x z))
      (fma (fma 263.505074721 x 313.399215894) x 47.066876606))
     (*
      (+ (/ (- (/ 3655.1204654076414 x) 110.1139242984811) x) 4.16438922228)
      x))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.5e+15) {
		tmp = 4.16438922228 * x;
	} else if (x <= 195000000.0) {
		tmp = ((x - 2.0) * fma(fma(137.519416416, x, y), x, z)) / fma(fma(263.505074721, x, 313.399215894), x, 47.066876606);
	} else {
		tmp = ((((3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x;
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.5e+15)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 195000000.0)
		tmp = Float64(Float64(Float64(x - 2.0) * fma(fma(137.519416416, x, y), x, z)) / fma(fma(263.505074721, x, 313.399215894), x, 47.066876606));
	else
		tmp = Float64(Float64(Float64(Float64(Float64(3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x);
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.5e+15], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 195000000.0], N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision]), $MachinePrecision] / N[(N[(263.505074721 * x + 313.399215894), $MachinePrecision] * x + 47.066876606), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(N[(3655.1204654076414 / x), $MachinePrecision] - 110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision] * x), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.5e15

   1. Initial program 9.3%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 93.7

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

   5. Applied rewrites 93.7%

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

   if -1.5e15 < x < 1.95e8

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + \frac{263505074721}{1000000000} \cdot x\right)}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{x \cdot \left(\frac{156699607947}{500000000} + \frac{263505074721}{1000000000} \cdot x\right) + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\left(\frac{156699607947}{500000000} + \frac{263505074721}{1000000000} \cdot x\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{156699607947}{500000000} + \frac{263505074721}{1000000000} \cdot x, \color{blue}{x}, \frac{23533438303}{500000000}\right)} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{263505074721}{1000000000} \cdot x + \frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      5. lower-fma.f64 95.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(263.505074721, x, 313.399215894\right), x, 47.066876606\right)} \]

   8. Applied rewrites 95.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(263.505074721, x, 313.399215894\right), x, 47.066876606\right)}} \]

   if 1.95e8 < x

   1. Initial program 18.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

   5. Applied rewrites 90.1%

      \[\leadsto \color{blue}{\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 8: 92.7% accurate, 1.5× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \cdot 10^{+15}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 115000000:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(10.238818846568002 \cdot x - 1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.5e+15)
   (* 4.16438922228 x)
   (if (<= x 115000000.0)
     (*
      (fma (fma 137.519416416 x y) x z)
      (-
       (*
        (fma
         (- (* 10.238818846568002 x) 1.787568985856513)
         x
         0.3041881842569256)
        x)
       0.0424927283095952))
     (*
      (+ (/ (- (/ 3655.1204654076414 x) 110.1139242984811) x) 4.16438922228)
      x))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.5e+15) {
		tmp = 4.16438922228 * x;
	} else if (x <= 115000000.0) {
		tmp = fma(fma(137.519416416, x, y), x, z) * ((fma(((10.238818846568002 * x) - 1.787568985856513), x, 0.3041881842569256) * x) - 0.0424927283095952);
	} else {
		tmp = ((((3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x;
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.5e+15)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 115000000.0)
		tmp = Float64(fma(fma(137.519416416, x, y), x, z) * Float64(Float64(fma(Float64(Float64(10.238818846568002 * x) - 1.787568985856513), x, 0.3041881842569256) * x) - 0.0424927283095952));
	else
		tmp = Float64(Float64(Float64(Float64(Float64(3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x);
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.5e+15], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 115000000.0], N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] * N[(N[(N[(N[(N[(10.238818846568002 * x), $MachinePrecision] - 1.787568985856513), $MachinePrecision] * x + 0.3041881842569256), $MachinePrecision] * x), $MachinePrecision] - 0.0424927283095952), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(N[(3655.1204654076414 / x), $MachinePrecision] - 110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision] * x), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.5e15

   1. Initial program 9.3%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 93.7

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

   5. Applied rewrites 93.7%

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

   if -1.5e15 < x < 1.15e8

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + \frac{156699607947}{500000000} \cdot x}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\frac{156699607947}{500000000} \cdot x + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. lower-fma.f64 94.7

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, \color{blue}{x}, 47.066876606\right)} \]

   8. Applied rewrites 94.7%

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\color{blue}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]
   9. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      3. *-commutative N/A

         \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x - 2\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      4. associate-/l* N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      6. lower-/.f64 94.4

         \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   10. Applied rewrites 94.4%

       \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   11. Taylor expanded in x around 0

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \color{blue}{\left(x \cdot \left(\frac{168466327098500000000}{553822718361107519809} + x \cdot \left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}\right)\right) - \frac{1000000000}{23533438303}\right)} \]
   12. Step-by-step derivation

       1. lower--.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x \cdot \left(\frac{168466327098500000000}{553822718361107519809} + x \cdot \left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}\right)\right) - \color{blue}{\frac{1000000000}{23533438303}}\right) \]

       2. *-commutative N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{168466327098500000000}{553822718361107519809} + x \cdot \left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}\right)\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       3. lower-*.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{168466327098500000000}{553822718361107519809} + x \cdot \left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}\right)\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       4. +-commutative N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(x \cdot \left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}\right) + \frac{168466327098500000000}{553822718361107519809}\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       5. *-commutative N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}\right) \cdot x + \frac{168466327098500000000}{553822718361107519809}\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       6. lower-fma.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}, x, \frac{168466327098500000000}{553822718361107519809}\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       7. lower--.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(\frac{3140446455626174059100348970313144550000000}{306719603372886620352117082586607327396481} \cdot x - \frac{23298017199368982832548000000000}{13033352773350869092174451844127}, x, \frac{168466327098500000000}{553822718361107519809}\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       8. lower-*.f64 94.9

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(10.238818846568002 \cdot x - 1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right) \]

   13. Applied rewrites 94.9%

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\left(\mathsf{fma}\left(10.238818846568002 \cdot x - 1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right)} \]

   if 1.15e8 < x

   1. Initial program 18.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

   5. Applied rewrites 90.1%

      \[\leadsto \color{blue}{\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 9: 92.9% accurate, 1.6× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -36 \lor \neg \left(x \leq 195000000\right):\\ \;\;\;\;\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (or (<= x -36.0) (not (<= x 195000000.0)))
   (* (+ (/ (- (/ 3655.1204654076414 x) 110.1139242984811) x) 4.16438922228) x)
   (/
    (* (- x 2.0) (fma (fma 137.519416416 x y) x z))
    (fma 313.399215894 x 47.066876606))))

C

double code(double x, double y, double z) {
	double tmp;
	if ((x <= -36.0) || !(x <= 195000000.0)) {
		tmp = ((((3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x;
	} else {
		tmp = ((x - 2.0) * fma(fma(137.519416416, x, y), x, z)) / fma(313.399215894, x, 47.066876606);
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if ((x <= -36.0) || !(x <= 195000000.0))
		tmp = Float64(Float64(Float64(Float64(Float64(3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x);
	else
		tmp = Float64(Float64(Float64(x - 2.0) * fma(fma(137.519416416, x, y), x, z)) / fma(313.399215894, x, 47.066876606));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[Or[LessEqual[x, -36.0], N[Not[LessEqual[x, 195000000.0]], $MachinePrecision]], N[(N[(N[(N[(N[(3655.1204654076414 / x), $MachinePrecision] - 110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision] * x), $MachinePrecision], N[(N[(N[(x - 2.0), $MachinePrecision] * N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision]), $MachinePrecision] / N[(313.399215894 * x + 47.066876606), $MachinePrecision]), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if x < -36 or 1.95e8 < x

   1. Initial program 15.6%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

   5. Applied rewrites 90.3%

      \[\leadsto \color{blue}{\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x} \]

   if -36 < x < 1.95e8

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + \frac{156699607947}{500000000} \cdot x}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\frac{156699607947}{500000000} \cdot x + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. lower-fma.f64 96.0

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, \color{blue}{x}, 47.066876606\right)} \]

   8. Applied rewrites 96.0%

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

4. Final simplification 93.4%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -36 \lor \neg \left(x \leq 195000000\right):\\ \;\;\;\;\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x\\ \mathbf{else}:\\ \;\;\;\;\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}\\ \end{array} \]
5. Add Preprocessing

Alternative 10: 92.8% accurate, 1.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \cdot 10^{+15}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(-1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right)\\ \mathbf{else}:\\ \;\;\;\;\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.5e+15)
   (* 4.16438922228 x)
   (if (<= x 2.0)
     (*
      (fma (fma 137.519416416 x y) x z)
      (-
       (* (fma -1.787568985856513 x 0.3041881842569256) x)
       0.0424927283095952))
     (*
      (+ (/ (- (/ 3655.1204654076414 x) 110.1139242984811) x) 4.16438922228)
      x))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.5e+15) {
		tmp = 4.16438922228 * x;
	} else if (x <= 2.0) {
		tmp = fma(fma(137.519416416, x, y), x, z) * ((fma(-1.787568985856513, x, 0.3041881842569256) * x) - 0.0424927283095952);
	} else {
		tmp = ((((3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x;
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.5e+15)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 2.0)
		tmp = Float64(fma(fma(137.519416416, x, y), x, z) * Float64(Float64(fma(-1.787568985856513, x, 0.3041881842569256) * x) - 0.0424927283095952));
	else
		tmp = Float64(Float64(Float64(Float64(Float64(3655.1204654076414 / x) - 110.1139242984811) / x) + 4.16438922228) * x);
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.5e+15], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 2.0], N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] * N[(N[(N[(-1.787568985856513 * x + 0.3041881842569256), $MachinePrecision] * x), $MachinePrecision] - 0.0424927283095952), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(N[(3655.1204654076414 / x), $MachinePrecision] - 110.1139242984811), $MachinePrecision] / x), $MachinePrecision] + 4.16438922228), $MachinePrecision] * x), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.5e15

   1. Initial program 9.3%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 93.7

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

   5. Applied rewrites 93.7%

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

   if -1.5e15 < x < 2

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + \frac{156699607947}{500000000} \cdot x}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\frac{156699607947}{500000000} \cdot x + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. lower-fma.f64 97.1

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, \color{blue}{x}, 47.066876606\right)} \]

   8. Applied rewrites 97.1%

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\color{blue}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]
   9. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      3. *-commutative N/A

         \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x - 2\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      4. associate-/l* N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      6. lower-/.f64 96.8

         \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   10. Applied rewrites 96.8%

       \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   11. Taylor expanded in x around 0

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \color{blue}{\left(x \cdot \left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) - \frac{1000000000}{23533438303}\right)} \]
   12. Step-by-step derivation

       1. lower--.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x \cdot \left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) - \color{blue}{\frac{1000000000}{23533438303}}\right) \]

       2. *-commutative N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       3. lower-*.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       4. +-commutative N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x + \frac{168466327098500000000}{553822718361107519809}\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       5. lower-fma.f64 97.2

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(-1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right) \]

   13. Applied rewrites 97.2%

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\left(\mathsf{fma}\left(-1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right)} \]

   if 2 < x

   1. Initial program 23.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\left(\frac{104109730557}{25000000000} + \frac{\frac{2284450290879775841688574159837293}{625000000000000000000000000000}}{{x}^{2}}\right) - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

   5. Applied rewrites 84.8%

      \[\leadsto \color{blue}{\left(\frac{\frac{3655.1204654076414}{x} - 110.1139242984811}{x} + 4.16438922228\right) \cdot x} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 11: 92.7% accurate, 1.8× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \cdot 10^{+15}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(-1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right)\\ \mathbf{else}:\\ \;\;\;\;\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.5e+15)
   (* 4.16438922228 x)
   (if (<= x 2.0)
     (*
      (fma (fma 137.519416416 x y) x z)
      (-
       (* (fma -1.787568985856513 x 0.3041881842569256) x)
       0.0424927283095952))
     (* (- 4.16438922228 (/ 110.1139242984811 x)) x))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.5e+15) {
		tmp = 4.16438922228 * x;
	} else if (x <= 2.0) {
		tmp = fma(fma(137.519416416, x, y), x, z) * ((fma(-1.787568985856513, x, 0.3041881842569256) * x) - 0.0424927283095952);
	} else {
		tmp = (4.16438922228 - (110.1139242984811 / x)) * x;
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.5e+15)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 2.0)
		tmp = Float64(fma(fma(137.519416416, x, y), x, z) * Float64(Float64(fma(-1.787568985856513, x, 0.3041881842569256) * x) - 0.0424927283095952));
	else
		tmp = Float64(Float64(4.16438922228 - Float64(110.1139242984811 / x)) * x);
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.5e+15], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 2.0], N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] * N[(N[(N[(-1.787568985856513 * x + 0.3041881842569256), $MachinePrecision] * x), $MachinePrecision] - 0.0424927283095952), $MachinePrecision]), $MachinePrecision], N[(N[(4.16438922228 - N[(110.1139242984811 / x), $MachinePrecision]), $MachinePrecision] * x), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.5e15

   1. Initial program 9.3%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 93.7

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

   5. Applied rewrites 93.7%

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

   if -1.5e15 < x < 2

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + \frac{156699607947}{500000000} \cdot x}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\frac{156699607947}{500000000} \cdot x + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. lower-fma.f64 97.1

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, \color{blue}{x}, 47.066876606\right)} \]

   8. Applied rewrites 97.1%

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\color{blue}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]
   9. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      3. *-commutative N/A

         \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x - 2\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      4. associate-/l* N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      6. lower-/.f64 96.8

         \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   10. Applied rewrites 96.8%

       \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   11. Taylor expanded in x around 0

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \color{blue}{\left(x \cdot \left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) - \frac{1000000000}{23533438303}\right)} \]
   12. Step-by-step derivation

       1. lower--.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x \cdot \left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) - \color{blue}{\frac{1000000000}{23533438303}}\right) \]

       2. *-commutative N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       3. lower-*.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{168466327098500000000}{553822718361107519809} + \frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       4. +-commutative N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\left(\frac{-23298017199368982832548000000000}{13033352773350869092174451844127} \cdot x + \frac{168466327098500000000}{553822718361107519809}\right) \cdot x - \frac{1000000000}{23533438303}\right) \]

       5. lower-fma.f64 97.2

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(\mathsf{fma}\left(-1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right) \]

   13. Applied rewrites 97.2%

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\left(\mathsf{fma}\left(-1.787568985856513, x, 0.3041881842569256\right) \cdot x - 0.0424927283095952\right)} \]

   if 2 < x

   1. Initial program 23.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      3. lower--.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot x \]

      4. associate-*r/ N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000} \cdot 1}{x}\right) \cdot x \]

      5. metadata-eval N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000}}{x}\right) \cdot x \]

      6. lower-/.f64 84.6

         \[\leadsto \left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x \]

   5. Applied rewrites 84.6%

      \[\leadsto \color{blue}{\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 12: 92.6% accurate, 2.1× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \cdot 10^{+15}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 195000000:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(0.3041881842569256 \cdot x - 0.0424927283095952\right)\\ \mathbf{else}:\\ \;\;\;\;\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.5e+15)
   (* 4.16438922228 x)
   (if (<= x 195000000.0)
     (*
      (fma (fma 137.519416416 x y) x z)
      (- (* 0.3041881842569256 x) 0.0424927283095952))
     (* (- 4.16438922228 (/ 110.1139242984811 x)) x))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.5e+15) {
		tmp = 4.16438922228 * x;
	} else if (x <= 195000000.0) {
		tmp = fma(fma(137.519416416, x, y), x, z) * ((0.3041881842569256 * x) - 0.0424927283095952);
	} else {
		tmp = (4.16438922228 - (110.1139242984811 / x)) * x;
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.5e+15)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 195000000.0)
		tmp = Float64(fma(fma(137.519416416, x, y), x, z) * Float64(Float64(0.3041881842569256 * x) - 0.0424927283095952));
	else
		tmp = Float64(Float64(4.16438922228 - Float64(110.1139242984811 / x)) * x);
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.5e+15], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 195000000.0], N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] * N[(N[(0.3041881842569256 * x), $MachinePrecision] - 0.0424927283095952), $MachinePrecision]), $MachinePrecision], N[(N[(4.16438922228 - N[(110.1139242984811 / x), $MachinePrecision]), $MachinePrecision] * x), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.5e15

   1. Initial program 9.3%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 93.7

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

   5. Applied rewrites 93.7%

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

   if -1.5e15 < x < 1.95e8

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + \frac{156699607947}{500000000} \cdot x}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\frac{156699607947}{500000000} \cdot x + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. lower-fma.f64 94.7

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, \color{blue}{x}, 47.066876606\right)} \]

   8. Applied rewrites 94.7%

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\color{blue}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]
   9. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      3. *-commutative N/A

         \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x - 2\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      4. associate-/l* N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      6. lower-/.f64 94.4

         \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   10. Applied rewrites 94.4%

       \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   11. Taylor expanded in x around 0

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \color{blue}{\left(\frac{168466327098500000000}{553822718361107519809} \cdot x - \frac{1000000000}{23533438303}\right)} \]
   12. Step-by-step derivation

       1. lower--.f64 N/A

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(\frac{168466327098500000000}{553822718361107519809} \cdot x - \color{blue}{\frac{1000000000}{23533438303}}\right) \]

       2. lower-*.f64 94.4

          \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \left(0.3041881842569256 \cdot x - 0.0424927283095952\right) \]

   13. Applied rewrites 94.4%

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

   if 1.95e8 < x

   1. Initial program 18.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      3. lower--.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot x \]

      4. associate-*r/ N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000} \cdot 1}{x}\right) \cdot x \]

      5. metadata-eval N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000}}{x}\right) \cdot x \]

      6. lower-/.f64 90.0

         \[\leadsto \left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x \]

   5. Applied rewrites 90.0%

      \[\leadsto \color{blue}{\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 13: 92.2% accurate, 2.5× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \cdot 10^{+15}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot -0.0424927283095952\\ \mathbf{else}:\\ \;\;\;\;\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.5e+15)
   (* 4.16438922228 x)
   (if (<= x 2.0)
     (* (fma (fma 137.519416416 x y) x z) -0.0424927283095952)
     (* (- 4.16438922228 (/ 110.1139242984811 x)) x))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.5e+15) {
		tmp = 4.16438922228 * x;
	} else if (x <= 2.0) {
		tmp = fma(fma(137.519416416, x, y), x, z) * -0.0424927283095952;
	} else {
		tmp = (4.16438922228 - (110.1139242984811 / x)) * x;
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.5e+15)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 2.0)
		tmp = Float64(fma(fma(137.519416416, x, y), x, z) * -0.0424927283095952);
	else
		tmp = Float64(Float64(4.16438922228 - Float64(110.1139242984811 / x)) * x);
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.5e+15], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 2.0], N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] * -0.0424927283095952), $MachinePrecision], N[(N[(4.16438922228 - N[(110.1139242984811 / x), $MachinePrecision]), $MachinePrecision] * x), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.5e15

   1. Initial program 9.3%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 93.7

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

   5. Applied rewrites 93.7%

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

   if -1.5e15 < x < 2

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + \frac{156699607947}{500000000} \cdot x}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\frac{156699607947}{500000000} \cdot x + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. lower-fma.f64 97.1

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, \color{blue}{x}, 47.066876606\right)} \]

   8. Applied rewrites 97.1%

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\color{blue}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]
   9. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      3. *-commutative N/A

         \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x - 2\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      4. associate-/l* N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      6. lower-/.f64 96.8

         \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   10. Applied rewrites 96.8%

       \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   11. Taylor expanded in x around 0

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \color{blue}{\frac{-1000000000}{23533438303}} \]
   12. Step-by-step derivation

   13. Applied rewrites 96.1%

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

   if 2 < x

   1. Initial program 23.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{x \cdot \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right)} \]
   4. Step-by-step derivation

      1. *-commutative N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      2. lower-*.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot \color{blue}{x} \]

      3. lower--.f64 N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{13764240537310136880149}{125000000000000000000} \cdot \frac{1}{x}\right) \cdot x \]

      4. associate-*r/ N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000} \cdot 1}{x}\right) \cdot x \]

      5. metadata-eval N/A

         \[\leadsto \left(\frac{104109730557}{25000000000} - \frac{\frac{13764240537310136880149}{125000000000000000000}}{x}\right) \cdot x \]

      6. lower-/.f64 84.6

         \[\leadsto \left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x \]

   5. Applied rewrites 84.6%

      \[\leadsto \color{blue}{\left(4.16438922228 - \frac{110.1139242984811}{x}\right) \cdot x} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 14: 92.2% accurate, 2.6× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.5 \cdot 10^{+15}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 2:\\ \;\;\;\;\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot -0.0424927283095952\\ \mathbf{else}:\\ \;\;\;\;4.16438922228 \cdot \left(x - 2\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.5e+15)
   (* 4.16438922228 x)
   (if (<= x 2.0)
     (* (fma (fma 137.519416416 x y) x z) -0.0424927283095952)
     (* 4.16438922228 (- x 2.0)))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.5e+15) {
		tmp = 4.16438922228 * x;
	} else if (x <= 2.0) {
		tmp = fma(fma(137.519416416, x, y), x, z) * -0.0424927283095952;
	} else {
		tmp = 4.16438922228 * (x - 2.0);
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.5e+15)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 2.0)
		tmp = Float64(fma(fma(137.519416416, x, y), x, z) * -0.0424927283095952);
	else
		tmp = Float64(4.16438922228 * Float64(x - 2.0));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.5e+15], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 2.0], N[(N[(N[(137.519416416 * x + y), $MachinePrecision] * x + z), $MachinePrecision] * -0.0424927283095952), $MachinePrecision], N[(4.16438922228 * N[(x - 2.0), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.5e15

   1. Initial program 9.3%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 93.7

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

   5. Applied rewrites 93.7%

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

   if -1.5e15 < x < 2

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\left(z + x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right)\right)}}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]
   4. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(x \cdot \left(y + \frac{4297481763}{31250000} \cdot x\right) + \color{blue}{z}\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      2. *-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \left(\left(y + \frac{4297481763}{31250000} \cdot x\right) \cdot x + z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      3. lower-fma.f64 N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(y + \frac{4297481763}{31250000} \cdot x, \color{blue}{x}, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      4. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\frac{4297481763}{31250000} \cdot x + y, x, z\right)}{\left(\left(\left(x + \frac{216700011257}{5000000000}\right) \cdot x + \frac{263505074721}{1000000000}\right) \cdot x + \frac{156699607947}{500000000}\right) \cdot x + \frac{23533438303}{500000000}} \]

      5. lower-fma.f64 99.2

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   5. Applied rewrites 99.2%

      \[\leadsto \frac{\left(x - 2\right) \cdot \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\color{blue}{\frac{23533438303}{500000000} + \frac{156699607947}{500000000} \cdot x}} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\frac{156699607947}{500000000} \cdot x + \color{blue}{\frac{23533438303}{500000000}}} \]

      2. lower-fma.f64 97.1

         \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\mathsf{fma}\left(313.399215894, \color{blue}{x}, 47.066876606\right)} \]

   8. Applied rewrites 97.1%

      \[\leadsto \frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right)}{\color{blue}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]
   9. Step-by-step derivation

      1. lift-/.f64 N/A

         \[\leadsto \color{blue}{\frac{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      2. lift-*.f64 N/A

         \[\leadsto \frac{\color{blue}{\left(x - 2\right) \cdot \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      3. *-commutative N/A

         \[\leadsto \frac{\color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \left(x - 2\right)}}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)} \]

      4. associate-/l* N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      5. lower-*.f64 N/A

         \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(\frac{156699607947}{500000000}, x, \frac{23533438303}{500000000}\right)}} \]

      6. lower-/.f64 96.8

         \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \color{blue}{\frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   10. Applied rewrites 96.8%

       \[\leadsto \color{blue}{\mathsf{fma}\left(\mathsf{fma}\left(137.519416416, x, y\right), x, z\right) \cdot \frac{x - 2}{\mathsf{fma}\left(313.399215894, x, 47.066876606\right)}} \]

   11. Taylor expanded in x around 0

       \[\leadsto \mathsf{fma}\left(\mathsf{fma}\left(\frac{4297481763}{31250000}, x, y\right), x, z\right) \cdot \color{blue}{\frac{-1000000000}{23533438303}} \]
   12. Step-by-step derivation

   13. Applied rewrites 96.1%

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

   if 2 < x

   1. Initial program 23.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   4. Applied rewrites 29.5%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]

   5. Taylor expanded in x around inf

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{\frac{104109730557}{25000000000}}}{2 + x} \]
   6. Step-by-step derivation

   7. Applied rewrites 48.3%

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{4.16438922228}}{2 + x} \]

   9. Applied rewrites 83.9%

      \[\leadsto \color{blue}{4.16438922228 \cdot \left(x - 2\right)} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 15: 77.2% accurate, 2.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.2 \cdot 10^{-8}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 195000000:\\ \;\;\;\;\mathsf{fma}\left(0.3041881842569256 \cdot z, x, -0.0424927283095952 \cdot z\right)\\ \mathbf{else}:\\ \;\;\;\;4.16438922228 \cdot \left(x - 2\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.2e-8)
   (* 4.16438922228 x)
   (if (<= x 195000000.0)
     (fma (* 0.3041881842569256 z) x (* -0.0424927283095952 z))
     (* 4.16438922228 (- x 2.0)))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.2e-8) {
		tmp = 4.16438922228 * x;
	} else if (x <= 195000000.0) {
		tmp = fma((0.3041881842569256 * z), x, (-0.0424927283095952 * z));
	} else {
		tmp = 4.16438922228 * (x - 2.0);
	}
	return tmp;
}

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.2e-8)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 195000000.0)
		tmp = fma(Float64(0.3041881842569256 * z), x, Float64(-0.0424927283095952 * z));
	else
		tmp = Float64(4.16438922228 * Float64(x - 2.0));
	end
	return tmp
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.2e-8], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 195000000.0], N[(N[(0.3041881842569256 * z), $MachinePrecision] * x + N[(-0.0424927283095952 * z), $MachinePrecision]), $MachinePrecision], N[(4.16438922228 * N[(x - 2.0), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.19999999999999999e-8

   1. Initial program 15.4%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 87.7

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

   5. Applied rewrites 87.7%

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

   if -1.19999999999999999e-8 < x < 1.95e8

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in z around inf

      \[\leadsto \color{blue}{\frac{z \cdot \left(x - 2\right)}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)}} \]
   4. Step-by-step derivation

      1. associate-/l* N/A

         \[\leadsto z \cdot \color{blue}{\frac{x - 2}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)}} \]

      2. *-commutative N/A

         \[\leadsto \frac{x - 2}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)} \cdot \color{blue}{z} \]

      3. lower-*.f64 N/A

         \[\leadsto \frac{x - 2}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)} \cdot \color{blue}{z} \]

   5. Applied rewrites 68.6%

      \[\leadsto \color{blue}{\frac{-2 + x}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(x - -43.3400022514, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)} \cdot z} \]

   6. Taylor expanded in x around 0

      \[\leadsto \frac{-1000000000}{23533438303} \cdot z + \color{blue}{x \cdot \left(\frac{500000000}{23533438303} \cdot z - \frac{-156699607947000000000}{553822718361107519809} \cdot z\right)} \]
   7. Step-by-step derivation

      1. +-commutative N/A

         \[\leadsto x \cdot \left(\frac{500000000}{23533438303} \cdot z - \frac{-156699607947000000000}{553822718361107519809} \cdot z\right) + \frac{-1000000000}{23533438303} \cdot \color{blue}{z} \]

      2. *-commutative N/A

         \[\leadsto \left(\frac{500000000}{23533438303} \cdot z - \frac{-156699607947000000000}{553822718361107519809} \cdot z\right) \cdot x + \frac{-1000000000}{23533438303} \cdot z \]

      3. lower-fma.f64 N/A

         \[\leadsto \mathsf{fma}\left(\frac{500000000}{23533438303} \cdot z - \frac{-156699607947000000000}{553822718361107519809} \cdot z, x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      4. distribute-rgt-out-- N/A

         \[\leadsto \mathsf{fma}\left(z \cdot \left(\frac{500000000}{23533438303} - \frac{-156699607947000000000}{553822718361107519809}\right), x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      5. metadata-eval N/A

         \[\leadsto \mathsf{fma}\left(z \cdot \frac{168466327098500000000}{553822718361107519809}, x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      6. metadata-eval N/A

         \[\leadsto \mathsf{fma}\left(z \cdot \left(\mathsf{neg}\left(\frac{-168466327098500000000}{553822718361107519809}\right)\right), x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      7. distribute-rgt-neg-out N/A

         \[\leadsto \mathsf{fma}\left(\mathsf{neg}\left(z \cdot \frac{-168466327098500000000}{553822718361107519809}\right), x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      8. *-commutative N/A

         \[\leadsto \mathsf{fma}\left(\mathsf{neg}\left(\frac{-168466327098500000000}{553822718361107519809} \cdot z\right), x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      9. distribute-lft-neg-out N/A

         \[\leadsto \mathsf{fma}\left(\left(\mathsf{neg}\left(\frac{-168466327098500000000}{553822718361107519809}\right)\right) \cdot z, x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      10. metadata-eval N/A

          \[\leadsto \mathsf{fma}\left(\frac{168466327098500000000}{553822718361107519809} \cdot z, x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      11. lower-*.f64 N/A

          \[\leadsto \mathsf{fma}\left(\frac{168466327098500000000}{553822718361107519809} \cdot z, x, \frac{-1000000000}{23533438303} \cdot z\right) \]

      12. lower-*.f64 67.0

          \[\leadsto \mathsf{fma}\left(0.3041881842569256 \cdot z, x, -0.0424927283095952 \cdot z\right) \]

   8. Applied rewrites 67.0%

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

   if 1.95e8 < x

   1. Initial program 18.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   4. Applied rewrites 24.9%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]

   5. Taylor expanded in x around inf

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{\frac{104109730557}{25000000000}}}{2 + x} \]
   6. Step-by-step derivation

   7. Applied rewrites 51.2%

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{4.16438922228}}{2 + x} \]

   9. Applied rewrites 89.2%

      \[\leadsto \color{blue}{4.16438922228 \cdot \left(x - 2\right)} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 16: 77.2% accurate, 3.0× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.2 \cdot 10^{-8}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 195000000:\\ \;\;\;\;\left(0.3041881842569256 \cdot x - 0.0424927283095952\right) \cdot z\\ \mathbf{else}:\\ \;\;\;\;4.16438922228 \cdot \left(x - 2\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.2e-8)
   (* 4.16438922228 x)
   (if (<= x 195000000.0)
     (* (- (* 0.3041881842569256 x) 0.0424927283095952) z)
     (* 4.16438922228 (- x 2.0)))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.2e-8) {
		tmp = 4.16438922228 * x;
	} else if (x <= 195000000.0) {
		tmp = ((0.3041881842569256 * x) - 0.0424927283095952) * z;
	} else {
		tmp = 4.16438922228 * (x - 2.0);
	}
	return tmp;
}

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)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8) :: tmp
    if (x <= (-1.2d-8)) then
        tmp = 4.16438922228d0 * x
    else if (x <= 195000000.0d0) then
        tmp = ((0.3041881842569256d0 * x) - 0.0424927283095952d0) * z
    else
        tmp = 4.16438922228d0 * (x - 2.0d0)
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.2e-8) {
		tmp = 4.16438922228 * x;
	} else if (x <= 195000000.0) {
		tmp = ((0.3041881842569256 * x) - 0.0424927283095952) * z;
	} else {
		tmp = 4.16438922228 * (x - 2.0);
	}
	return tmp;
}

Python

def code(x, y, z):
	tmp = 0
	if x <= -1.2e-8:
		tmp = 4.16438922228 * x
	elif x <= 195000000.0:
		tmp = ((0.3041881842569256 * x) - 0.0424927283095952) * z
	else:
		tmp = 4.16438922228 * (x - 2.0)
	return tmp

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.2e-8)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 195000000.0)
		tmp = Float64(Float64(Float64(0.3041881842569256 * x) - 0.0424927283095952) * z);
	else
		tmp = Float64(4.16438922228 * Float64(x - 2.0));
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z)
	tmp = 0.0;
	if (x <= -1.2e-8)
		tmp = 4.16438922228 * x;
	elseif (x <= 195000000.0)
		tmp = ((0.3041881842569256 * x) - 0.0424927283095952) * z;
	else
		tmp = 4.16438922228 * (x - 2.0);
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.2e-8], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 195000000.0], N[(N[(N[(0.3041881842569256 * x), $MachinePrecision] - 0.0424927283095952), $MachinePrecision] * z), $MachinePrecision], N[(4.16438922228 * N[(x - 2.0), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.19999999999999999e-8

   1. Initial program 15.4%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 87.7

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

   5. Applied rewrites 87.7%

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

   if -1.19999999999999999e-8 < x < 1.95e8

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in z around inf

      \[\leadsto \color{blue}{\frac{z \cdot \left(x - 2\right)}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)}} \]
   4. Step-by-step derivation

      1. associate-/l* N/A

         \[\leadsto z \cdot \color{blue}{\frac{x - 2}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)}} \]

      2. *-commutative N/A

         \[\leadsto \frac{x - 2}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)} \cdot \color{blue}{z} \]

      3. lower-*.f64 N/A

         \[\leadsto \frac{x - 2}{\frac{23533438303}{500000000} + x \cdot \left(\frac{156699607947}{500000000} + x \cdot \left(\frac{263505074721}{1000000000} + x \cdot \left(\frac{216700011257}{5000000000} + x\right)\right)\right)} \cdot \color{blue}{z} \]

   5. Applied rewrites 68.6%

      \[\leadsto \color{blue}{\frac{-2 + x}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(x - -43.3400022514, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)} \cdot z} \]

   6. Taylor expanded in x around 0

      \[\leadsto \left(\frac{168466327098500000000}{553822718361107519809} \cdot x - \frac{1000000000}{23533438303}\right) \cdot z \]
   7. Step-by-step derivation

      1. lower--.f64 N/A

         \[\leadsto \left(\frac{168466327098500000000}{553822718361107519809} \cdot x - \frac{1000000000}{23533438303}\right) \cdot z \]

      2. lower-*.f64 67.0

         \[\leadsto \left(0.3041881842569256 \cdot x - 0.0424927283095952\right) \cdot z \]

   8. Applied rewrites 67.0%

      \[\leadsto \left(0.3041881842569256 \cdot x - 0.0424927283095952\right) \cdot z \]

   if 1.95e8 < x

   1. Initial program 18.5%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   4. Applied rewrites 24.9%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]

   5. Taylor expanded in x around inf

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{\frac{104109730557}{25000000000}}}{2 + x} \]
   6. Step-by-step derivation

   7. Applied rewrites 51.2%

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{4.16438922228}}{2 + x} \]

   9. Applied rewrites 89.2%

      \[\leadsto \color{blue}{4.16438922228 \cdot \left(x - 2\right)} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 17: 76.8% accurate, 3.8× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.2 \cdot 10^{-8}:\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{elif}\;x \leq 1.5 \cdot 10^{-18}:\\ \;\;\;\;-0.0424927283095952 \cdot z\\ \mathbf{else}:\\ \;\;\;\;4.16438922228 \cdot \left(x - 2\right)\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (<= x -1.2e-8)
   (* 4.16438922228 x)
   (if (<= x 1.5e-18) (* -0.0424927283095952 z) (* 4.16438922228 (- x 2.0)))))

C

double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.2e-8) {
		tmp = 4.16438922228 * x;
	} else if (x <= 1.5e-18) {
		tmp = -0.0424927283095952 * z;
	} else {
		tmp = 4.16438922228 * (x - 2.0);
	}
	return tmp;
}

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)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8) :: tmp
    if (x <= (-1.2d-8)) then
        tmp = 4.16438922228d0 * x
    else if (x <= 1.5d-18) then
        tmp = (-0.0424927283095952d0) * z
    else
        tmp = 4.16438922228d0 * (x - 2.0d0)
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z) {
	double tmp;
	if (x <= -1.2e-8) {
		tmp = 4.16438922228 * x;
	} else if (x <= 1.5e-18) {
		tmp = -0.0424927283095952 * z;
	} else {
		tmp = 4.16438922228 * (x - 2.0);
	}
	return tmp;
}

Python

def code(x, y, z):
	tmp = 0
	if x <= -1.2e-8:
		tmp = 4.16438922228 * x
	elif x <= 1.5e-18:
		tmp = -0.0424927283095952 * z
	else:
		tmp = 4.16438922228 * (x - 2.0)
	return tmp

Julia

function code(x, y, z)
	tmp = 0.0
	if (x <= -1.2e-8)
		tmp = Float64(4.16438922228 * x);
	elseif (x <= 1.5e-18)
		tmp = Float64(-0.0424927283095952 * z);
	else
		tmp = Float64(4.16438922228 * Float64(x - 2.0));
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z)
	tmp = 0.0;
	if (x <= -1.2e-8)
		tmp = 4.16438922228 * x;
	elseif (x <= 1.5e-18)
		tmp = -0.0424927283095952 * z;
	else
		tmp = 4.16438922228 * (x - 2.0);
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_] := If[LessEqual[x, -1.2e-8], N[(4.16438922228 * x), $MachinePrecision], If[LessEqual[x, 1.5e-18], N[(-0.0424927283095952 * z), $MachinePrecision], N[(4.16438922228 * N[(x - 2.0), $MachinePrecision]), $MachinePrecision]]]

Derivation

1. Split input into 3 regimes

2. if x < -1.19999999999999999e-8

   1. Initial program 15.4%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 87.7

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

   5. Applied rewrites 87.7%

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

   if -1.19999999999999999e-8 < x < 1.49999999999999991e-18

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\frac{-1000000000}{23533438303} \cdot z} \]
   4. Step-by-step derivation

      1. lower-*.f64 70.8

         \[\leadsto -0.0424927283095952 \cdot \color{blue}{z} \]

   5. Applied rewrites 70.8%

      \[\leadsto \color{blue}{-0.0424927283095952 \cdot z} \]

   if 1.49999999999999991e-18 < x

   1. Initial program 28.0%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   4. Applied rewrites 33.6%

      \[\leadsto \color{blue}{\frac{\mathsf{fma}\left(x, x, -4\right) \cdot \frac{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(4.16438922228, x, 78.6994924154\right), x, 137.519416416\right), x, y\right), x, z\right)}{\mathsf{fma}\left(\mathsf{fma}\left(\mathsf{fma}\left(43.3400022514 + x, x, 263.505074721\right), x, 313.399215894\right), x, 47.066876606\right)}}{2 + x}} \]

   5. Taylor expanded in x around inf

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{\frac{104109730557}{25000000000}}}{2 + x} \]
   6. Step-by-step derivation

   7. Applied rewrites 45.7%

      \[\leadsto \frac{\mathsf{fma}\left(x, x, -4\right) \cdot \color{blue}{4.16438922228}}{2 + x} \]

   9. Applied rewrites 79.3%

      \[\leadsto \color{blue}{4.16438922228 \cdot \left(x - 2\right)} \]
3. Recombined 3 regimes into one program.
4. Add Preprocessing

Alternative 18: 77.0% accurate, 4.4× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;x \leq -1.2 \cdot 10^{-8} \lor \neg \left(x \leq 2.9 \cdot 10^{-5}\right):\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{else}:\\ \;\;\;\;-0.0424927283095952 \cdot z\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (if (or (<= x -1.2e-8) (not (<= x 2.9e-5)))
   (* 4.16438922228 x)
   (* -0.0424927283095952 z)))

C

double code(double x, double y, double z) {
	double tmp;
	if ((x <= -1.2e-8) || !(x <= 2.9e-5)) {
		tmp = 4.16438922228 * x;
	} else {
		tmp = -0.0424927283095952 * z;
	}
	return tmp;
}

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)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8) :: tmp
    if ((x <= (-1.2d-8)) .or. (.not. (x <= 2.9d-5))) then
        tmp = 4.16438922228d0 * x
    else
        tmp = (-0.0424927283095952d0) * z
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z) {
	double tmp;
	if ((x <= -1.2e-8) || !(x <= 2.9e-5)) {
		tmp = 4.16438922228 * x;
	} else {
		tmp = -0.0424927283095952 * z;
	}
	return tmp;
}

Python

def code(x, y, z):
	tmp = 0
	if (x <= -1.2e-8) or not (x <= 2.9e-5):
		tmp = 4.16438922228 * x
	else:
		tmp = -0.0424927283095952 * z
	return tmp

Julia

function code(x, y, z)
	tmp = 0.0
	if ((x <= -1.2e-8) || !(x <= 2.9e-5))
		tmp = Float64(4.16438922228 * x);
	else
		tmp = Float64(-0.0424927283095952 * z);
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z)
	tmp = 0.0;
	if ((x <= -1.2e-8) || ~((x <= 2.9e-5)))
		tmp = 4.16438922228 * x;
	else
		tmp = -0.0424927283095952 * z;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_] := If[Or[LessEqual[x, -1.2e-8], N[Not[LessEqual[x, 2.9e-5]], $MachinePrecision]], N[(4.16438922228 * x), $MachinePrecision], N[(-0.0424927283095952 * z), $MachinePrecision]]

Derivation

1. Split input into 2 regimes

2. if x < -1.19999999999999999e-8 or 2.9e-5 < x

   1. Initial program 20.9%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around inf

      \[\leadsto \color{blue}{\frac{104109730557}{25000000000} \cdot x} \]
   4. Step-by-step derivation

      1. lower-*.f64 84.4

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

   5. Applied rewrites 84.4%

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

   if -1.19999999999999999e-8 < x < 2.9e-5

   1. Initial program 99.7%

      \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
   2. Add Preprocessing

   3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\frac{-1000000000}{23533438303} \cdot z} \]
   4. Step-by-step derivation

      1. lower-*.f64 69.8

         \[\leadsto -0.0424927283095952 \cdot \color{blue}{z} \]

   5. Applied rewrites 69.8%

      \[\leadsto \color{blue}{-0.0424927283095952 \cdot z} \]
3. Recombined 2 regimes into one program.

4. Final simplification 76.9%

   \[\leadsto \begin{array}{l} \mathbf{if}\;x \leq -1.2 \cdot 10^{-8} \lor \neg \left(x \leq 2.9 \cdot 10^{-5}\right):\\ \;\;\;\;4.16438922228 \cdot x\\ \mathbf{else}:\\ \;\;\;\;-0.0424927283095952 \cdot z\\ \end{array} \]
5. Add Preprocessing

Alternative 19: 35.7% accurate, 13.2× speedup

Math

\[\begin{array}{l} \\ -0.0424927283095952 \cdot z \end{array} \]

FPCore

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

C

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

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)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = (-0.0424927283095952d0) * z
end function

Java

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

Python

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

Julia

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

MATLAB

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

Wolfram

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

Derivation

1. Initial program 61.2%

   \[\frac{\left(x - 2\right) \cdot \left(\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z\right)}{\left(\left(\left(x + 43.3400022514\right) \cdot x + 263.505074721\right) \cdot x + 313.399215894\right) \cdot x + 47.066876606} \]
2. Add Preprocessing

3. Taylor expanded in x around 0

   \[\leadsto \color{blue}{\frac{-1000000000}{23533438303} \cdot z} \]
4. Step-by-step derivation

   1. lower-*.f64 37.1

      \[\leadsto -0.0424927283095952 \cdot \color{blue}{z} \]

5. Applied rewrites 37.1%

   \[\leadsto \color{blue}{-0.0424927283095952 \cdot z} \]
6. Add Preprocessing

Developer Target 1: 98.8% accurate, 0.7× speedup

Math

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \left(\frac{y}{x \cdot x} + 4.16438922228 \cdot x\right) - 110.1139242984811\\ \mathbf{if}\;x < -3.326128725870005 \cdot 10^{+62}:\\ \;\;\;\;t\_0\\ \mathbf{elif}\;x < 9.429991714554673 \cdot 10^{+55}:\\ \;\;\;\;\frac{x - 2}{1} \cdot \frac{\left(\left(\left(x \cdot 4.16438922228 + 78.6994924154\right) \cdot x + 137.519416416\right) \cdot x + y\right) \cdot x + z}{\left(\left(263.505074721 \cdot x + \left(43.3400022514 \cdot \left(x \cdot x\right) + x \cdot \left(x \cdot x\right)\right)\right) + 313.399215894\right) \cdot x + 47.066876606}\\ \mathbf{else}:\\ \;\;\;\;t\_0\\ \end{array} \end{array} \]

FPCore

(FPCore (x y z)
 :precision binary64
 (let* ((t_0 (- (+ (/ y (* x x)) (* 4.16438922228 x)) 110.1139242984811)))
   (if (< x -3.326128725870005e+62)
     t_0
     (if (< x 9.429991714554673e+55)
       (*
        (/ (- x 2.0) 1.0)
        (/
         (+
          (*
           (+
            (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x)
            y)
           x)
          z)
         (+
          (*
           (+
            (+ (* 263.505074721 x) (+ (* 43.3400022514 (* x x)) (* x (* x x))))
            313.399215894)
           x)
          47.066876606)))
       t_0))))

C

double code(double x, double y, double z) {
	double t_0 = ((y / (x * x)) + (4.16438922228 * x)) - 110.1139242984811;
	double tmp;
	if (x < -3.326128725870005e+62) {
		tmp = t_0;
	} else if (x < 9.429991714554673e+55) {
		tmp = ((x - 2.0) / 1.0) * (((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z) / (((((263.505074721 * x) + ((43.3400022514 * (x * x)) + (x * (x * x)))) + 313.399215894) * x) + 47.066876606));
	} else {
		tmp = t_0;
	}
	return tmp;
}

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)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8) :: t_0
    real(8) :: tmp
    t_0 = ((y / (x * x)) + (4.16438922228d0 * x)) - 110.1139242984811d0
    if (x < (-3.326128725870005d+62)) then
        tmp = t_0
    else if (x < 9.429991714554673d+55) then
        tmp = ((x - 2.0d0) / 1.0d0) * (((((((((x * 4.16438922228d0) + 78.6994924154d0) * x) + 137.519416416d0) * x) + y) * x) + z) / (((((263.505074721d0 * x) + ((43.3400022514d0 * (x * x)) + (x * (x * x)))) + 313.399215894d0) * x) + 47.066876606d0))
    else
        tmp = t_0
    end if
    code = tmp
end function

Java

public static double code(double x, double y, double z) {
	double t_0 = ((y / (x * x)) + (4.16438922228 * x)) - 110.1139242984811;
	double tmp;
	if (x < -3.326128725870005e+62) {
		tmp = t_0;
	} else if (x < 9.429991714554673e+55) {
		tmp = ((x - 2.0) / 1.0) * (((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z) / (((((263.505074721 * x) + ((43.3400022514 * (x * x)) + (x * (x * x)))) + 313.399215894) * x) + 47.066876606));
	} else {
		tmp = t_0;
	}
	return tmp;
}

Python

def code(x, y, z):
	t_0 = ((y / (x * x)) + (4.16438922228 * x)) - 110.1139242984811
	tmp = 0
	if x < -3.326128725870005e+62:
		tmp = t_0
	elif x < 9.429991714554673e+55:
		tmp = ((x - 2.0) / 1.0) * (((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z) / (((((263.505074721 * x) + ((43.3400022514 * (x * x)) + (x * (x * x)))) + 313.399215894) * x) + 47.066876606))
	else:
		tmp = t_0
	return tmp

Julia

function code(x, y, z)
	t_0 = Float64(Float64(Float64(y / Float64(x * x)) + Float64(4.16438922228 * x)) - 110.1139242984811)
	tmp = 0.0
	if (x < -3.326128725870005e+62)
		tmp = t_0;
	elseif (x < 9.429991714554673e+55)
		tmp = Float64(Float64(Float64(x - 2.0) / 1.0) * Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(Float64(x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z) / Float64(Float64(Float64(Float64(Float64(263.505074721 * x) + Float64(Float64(43.3400022514 * Float64(x * x)) + Float64(x * Float64(x * x)))) + 313.399215894) * x) + 47.066876606)));
	else
		tmp = t_0;
	end
	return tmp
end

MATLAB

function tmp_2 = code(x, y, z)
	t_0 = ((y / (x * x)) + (4.16438922228 * x)) - 110.1139242984811;
	tmp = 0.0;
	if (x < -3.326128725870005e+62)
		tmp = t_0;
	elseif (x < 9.429991714554673e+55)
		tmp = ((x - 2.0) / 1.0) * (((((((((x * 4.16438922228) + 78.6994924154) * x) + 137.519416416) * x) + y) * x) + z) / (((((263.505074721 * x) + ((43.3400022514 * (x * x)) + (x * (x * x)))) + 313.399215894) * x) + 47.066876606));
	else
		tmp = t_0;
	end
	tmp_2 = tmp;
end

Wolfram

code[x_, y_, z_] := Block[{t$95$0 = N[(N[(N[(y / N[(x * x), $MachinePrecision]), $MachinePrecision] + N[(4.16438922228 * x), $MachinePrecision]), $MachinePrecision] - 110.1139242984811), $MachinePrecision]}, If[Less[x, -3.326128725870005e+62], t$95$0, If[Less[x, 9.429991714554673e+55], N[(N[(N[(x - 2.0), $MachinePrecision] / 1.0), $MachinePrecision] * N[(N[(N[(N[(N[(N[(N[(N[(N[(x * 4.16438922228), $MachinePrecision] + 78.6994924154), $MachinePrecision] * x), $MachinePrecision] + 137.519416416), $MachinePrecision] * x), $MachinePrecision] + y), $MachinePrecision] * x), $MachinePrecision] + z), $MachinePrecision] / N[(N[(N[(N[(N[(263.505074721 * x), $MachinePrecision] + N[(N[(43.3400022514 * N[(x * x), $MachinePrecision]), $MachinePrecision] + N[(x * N[(x * x), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + 313.399215894), $MachinePrecision] * x), $MachinePrecision] + 47.066876606), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$0]]]

Reproduce

herbie shell --seed 2025026 
(FPCore (x y z)
  :name "Numeric.SpecFunctions:logGamma from math-functions-0.1.5.2, C"
  :precision binary64

  :alt
  (! :herbie-platform default (if (< x -332612872587000500000000000000000000000000000000000000000000000) (- (+ (/ y (* x x)) (* 104109730557/25000000000 x)) 1101139242984811/10000000000000) (if (< x 94299917145546730000000000000000000000000000000000000000) (* (/ (- x 2) 1) (/ (+ (* (+ (* (+ (* (+ (* x 104109730557/25000000000) 393497462077/5000000000) x) 4297481763/31250000) x) y) x) z) (+ (* (+ (+ (* 263505074721/1000000000 x) (+ (* 216700011257/5000000000 (* x x)) (* x (* x x)))) 156699607947/500000000) x) 23533438303/500000000))) (- (+ (/ y (* x x)) (* 104109730557/25000000000 x)) 1101139242984811/10000000000000))))

  (/ (* (- x 2.0) (+ (* (+ (* (+ (* (+ (* x 4.16438922228) 78.6994924154) x) 137.519416416) x) y) x) z)) (+ (* (+ (* (+ (* (+ x 43.3400022514) x) 263.505074721) x) 313.399215894) x) 47.066876606)))