Graphics.Rendering.Plot.Render.Plot.Axis:renderAxisTick from plot-0.2.3.4, B

Percentage Accurate: 77.0% → 92.1%
Time: 5.2s
Alternatives: 10
Speedup: 0.9×

Specification

?
\[\begin{array}{l} \\ \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \end{array} \]
(FPCore (x y z t a) :precision binary64 (- (+ x y) (/ (* (- z t) y) (- a t))))
double code(double x, double y, double z, double t, double a) {
	return (x + y) - (((z - t) * y) / (a - t));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(8) function code(x, y, z, t, a)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    code = (x + y) - (((z - t) * y) / (a - t))
end function
public static double code(double x, double y, double z, double t, double a) {
	return (x + y) - (((z - t) * y) / (a - t));
}
def code(x, y, z, t, a):
	return (x + y) - (((z - t) * y) / (a - t))
function code(x, y, z, t, a)
	return Float64(Float64(x + y) - Float64(Float64(Float64(z - t) * y) / Float64(a - t)))
end
function tmp = code(x, y, z, t, a)
	tmp = (x + y) - (((z - t) * y) / (a - t));
end
code[x_, y_, z_, t_, a_] := N[(N[(x + y), $MachinePrecision] - N[(N[(N[(z - t), $MachinePrecision] * y), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}
\end{array}

Sampling outcomes in binary64 precision:

Local Percentage Accuracy vs ?

The average percentage accuracy by input value. Horizontal axis shows value of an input variable; the variable is choosen in the title. Vertical axis is accuracy; higher is better. Red represent the original program, while blue represents Herbie's suggestion. These can be toggled with buttons below the plot. The line is an average while dots represent individual samples.

Accuracy vs Speed?

Herbie found 10 alternatives:

AlternativeAccuracySpeedup
The accuracy (vertical axis) and speed (horizontal axis) of each alternatives. Up and to the right is better. The red square shows the initial program, and each blue circle shows an alternative.The line shows the best available speed-accuracy tradeoffs.

Initial Program: 77.0% accurate, 1.0× speedup?

\[\begin{array}{l} \\ \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \end{array} \]
(FPCore (x y z t a) :precision binary64 (- (+ x y) (/ (* (- z t) y) (- a t))))
double code(double x, double y, double z, double t, double a) {
	return (x + y) - (((z - t) * y) / (a - t));
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(8) function code(x, y, z, t, a)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    code = (x + y) - (((z - t) * y) / (a - t))
end function
public static double code(double x, double y, double z, double t, double a) {
	return (x + y) - (((z - t) * y) / (a - t));
}
def code(x, y, z, t, a):
	return (x + y) - (((z - t) * y) / (a - t))
function code(x, y, z, t, a)
	return Float64(Float64(x + y) - Float64(Float64(Float64(z - t) * y) / Float64(a - t)))
end
function tmp = code(x, y, z, t, a)
	tmp = (x + y) - (((z - t) * y) / (a - t));
end
code[x_, y_, z_, t_, a_] := N[(N[(x + y), $MachinePrecision] - N[(N[(N[(z - t), $MachinePrecision] * y), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}
\end{array}

Alternative 1: 92.1% accurate, 0.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}\\ \mathbf{if}\;t\_1 \leq -4 \cdot 10^{-220} \lor \neg \left(t\_1 \leq 2 \cdot 10^{-261}\right):\\ \;\;\;\;\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)\\ \mathbf{else}:\\ \;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t a)
 :precision binary64
 (let* ((t_1 (- (+ x y) (/ (* (- z t) y) (- a t)))))
   (if (or (<= t_1 -4e-220) (not (<= t_1 2e-261)))
     (fma (- 1.0 (/ (- z t) (- a t))) y x)
     (- x (/ (* y (- a z)) t)))))
double code(double x, double y, double z, double t, double a) {
	double t_1 = (x + y) - (((z - t) * y) / (a - t));
	double tmp;
	if ((t_1 <= -4e-220) || !(t_1 <= 2e-261)) {
		tmp = fma((1.0 - ((z - t) / (a - t))), y, x);
	} else {
		tmp = x - ((y * (a - z)) / t);
	}
	return tmp;
}
function code(x, y, z, t, a)
	t_1 = Float64(Float64(x + y) - Float64(Float64(Float64(z - t) * y) / Float64(a - t)))
	tmp = 0.0
	if ((t_1 <= -4e-220) || !(t_1 <= 2e-261))
		tmp = fma(Float64(1.0 - Float64(Float64(z - t) / Float64(a - t))), y, x);
	else
		tmp = Float64(x - Float64(Float64(y * Float64(a - z)) / t));
	end
	return tmp
end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(N[(x + y), $MachinePrecision] - N[(N[(N[(z - t), $MachinePrecision] * y), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[Or[LessEqual[t$95$1, -4e-220], N[Not[LessEqual[t$95$1, 2e-261]], $MachinePrecision]], N[(N[(1.0 - N[(N[(z - t), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * y + x), $MachinePrecision], N[(x - N[(N[(y * N[(a - z), $MachinePrecision]), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
t_1 := \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}\\
\mathbf{if}\;t\_1 \leq -4 \cdot 10^{-220} \lor \neg \left(t\_1 \leq 2 \cdot 10^{-261}\right):\\
\;\;\;\;\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)\\

\mathbf{else}:\\
\;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (-.f64 (+.f64 x y) (/.f64 (*.f64 (-.f64 z t) y) (-.f64 a t))) < -3.99999999999999997e-220 or 1.99999999999999997e-261 < (-.f64 (+.f64 x y) (/.f64 (*.f64 (-.f64 z t) y) (-.f64 a t)))

    1. Initial program 82.2%

      \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\left(x + y\right) - \frac{y \cdot \left(z - t\right)}{a - t}} \]
    4. Step-by-step derivation
      1. associate--l+N/A

        \[\leadsto \color{blue}{x + \left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right)} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x} \]
      3. *-lft-identityN/A

        \[\leadsto \left(\color{blue}{1 \cdot y} - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x \]
      4. associate-/l*N/A

        \[\leadsto \left(1 \cdot y - \color{blue}{y \cdot \frac{z - t}{a - t}}\right) + x \]
      5. *-commutativeN/A

        \[\leadsto \left(1 \cdot y - \color{blue}{\frac{z - t}{a - t} \cdot y}\right) + x \]
      6. fp-cancel-sub-signN/A

        \[\leadsto \color{blue}{\left(1 \cdot y + \left(\mathsf{neg}\left(\frac{z - t}{a - t}\right)\right) \cdot y\right)} + x \]
      7. mul-1-negN/A

        \[\leadsto \left(1 \cdot y + \color{blue}{\left(-1 \cdot \frac{z - t}{a - t}\right)} \cdot y\right) + x \]
      8. distribute-rgt-inN/A

        \[\leadsto \color{blue}{y \cdot \left(1 + -1 \cdot \frac{z - t}{a - t}\right)} + x \]
      9. *-commutativeN/A

        \[\leadsto \color{blue}{\left(1 + -1 \cdot \frac{z - t}{a - t}\right) \cdot y} + x \]
      10. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(1 + -1 \cdot \frac{z - t}{a - t}, y, x\right)} \]
      11. fp-cancel-sign-sub-invN/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{z - t}{a - t}}, y, x\right) \]
      12. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(1 - \color{blue}{1} \cdot \frac{z - t}{a - t}, y, x\right) \]
      13. *-lft-identityN/A

        \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
      14. lower--.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \frac{z - t}{a - t}}, y, x\right) \]
      15. lower-/.f64N/A

        \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
      16. lower--.f64N/A

        \[\leadsto \mathsf{fma}\left(1 - \frac{\color{blue}{z - t}}{a - t}, y, x\right) \]
      17. lower--.f6494.3

        \[\leadsto \mathsf{fma}\left(1 - \frac{z - t}{\color{blue}{a - t}}, y, x\right) \]
    5. Applied rewrites94.3%

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

    if -3.99999999999999997e-220 < (-.f64 (+.f64 x y) (/.f64 (*.f64 (-.f64 z t) y) (-.f64 a t))) < 1.99999999999999997e-261

    1. Initial program 7.6%

      \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
    2. Add Preprocessing
    3. Taylor expanded in t around inf

      \[\leadsto \color{blue}{\left(x + -1 \cdot \frac{a \cdot y}{t}\right) - -1 \cdot \frac{y \cdot z}{t}} \]
    4. Step-by-step derivation
      1. associate--l+N/A

        \[\leadsto \color{blue}{x + \left(-1 \cdot \frac{a \cdot y}{t} - -1 \cdot \frac{y \cdot z}{t}\right)} \]
      2. distribute-lft-out--N/A

        \[\leadsto x + \color{blue}{-1 \cdot \left(\frac{a \cdot y}{t} - \frac{y \cdot z}{t}\right)} \]
      3. div-subN/A

        \[\leadsto x + -1 \cdot \color{blue}{\frac{a \cdot y - y \cdot z}{t}} \]
      4. *-commutativeN/A

        \[\leadsto x + \color{blue}{\frac{a \cdot y - y \cdot z}{t} \cdot -1} \]
      5. fp-cancel-sign-sub-invN/A

        \[\leadsto \color{blue}{x - \left(\mathsf{neg}\left(\frac{a \cdot y - y \cdot z}{t}\right)\right) \cdot -1} \]
    5. Applied rewrites99.8%

      \[\leadsto \color{blue}{x - \frac{y \cdot \left(a - z\right)}{t}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification94.8%

    \[\leadsto \begin{array}{l} \mathbf{if}\;\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \leq -4 \cdot 10^{-220} \lor \neg \left(\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \leq 2 \cdot 10^{-261}\right):\\ \;\;\;\;\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)\\ \mathbf{else}:\\ \;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\ \end{array} \]
  5. Add Preprocessing

Alternative 2: 87.2% accurate, 0.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}\\ \mathbf{if}\;t\_1 \leq -4 \cdot 10^{-220} \lor \neg \left(t\_1 \leq 2 \cdot 10^{-261}\right):\\ \;\;\;\;\left(x + y\right) - \frac{z}{a - t} \cdot y\\ \mathbf{else}:\\ \;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t a)
 :precision binary64
 (let* ((t_1 (- (+ x y) (/ (* (- z t) y) (- a t)))))
   (if (or (<= t_1 -4e-220) (not (<= t_1 2e-261)))
     (- (+ x y) (* (/ z (- a t)) y))
     (- x (/ (* y (- a z)) t)))))
double code(double x, double y, double z, double t, double a) {
	double t_1 = (x + y) - (((z - t) * y) / (a - t));
	double tmp;
	if ((t_1 <= -4e-220) || !(t_1 <= 2e-261)) {
		tmp = (x + y) - ((z / (a - t)) * y);
	} else {
		tmp = x - ((y * (a - z)) / t);
	}
	return tmp;
}
module fmin_fmax_functions
    implicit none
    private
    public fmax
    public fmin

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

real(8) function code(x, y, z, t, a)
use fmin_fmax_functions
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: t
    real(8), intent (in) :: a
    real(8) :: t_1
    real(8) :: tmp
    t_1 = (x + y) - (((z - t) * y) / (a - t))
    if ((t_1 <= (-4d-220)) .or. (.not. (t_1 <= 2d-261))) then
        tmp = (x + y) - ((z / (a - t)) * y)
    else
        tmp = x - ((y * (a - z)) / t)
    end if
    code = tmp
end function
public static double code(double x, double y, double z, double t, double a) {
	double t_1 = (x + y) - (((z - t) * y) / (a - t));
	double tmp;
	if ((t_1 <= -4e-220) || !(t_1 <= 2e-261)) {
		tmp = (x + y) - ((z / (a - t)) * y);
	} else {
		tmp = x - ((y * (a - z)) / t);
	}
	return tmp;
}
def code(x, y, z, t, a):
	t_1 = (x + y) - (((z - t) * y) / (a - t))
	tmp = 0
	if (t_1 <= -4e-220) or not (t_1 <= 2e-261):
		tmp = (x + y) - ((z / (a - t)) * y)
	else:
		tmp = x - ((y * (a - z)) / t)
	return tmp
function code(x, y, z, t, a)
	t_1 = Float64(Float64(x + y) - Float64(Float64(Float64(z - t) * y) / Float64(a - t)))
	tmp = 0.0
	if ((t_1 <= -4e-220) || !(t_1 <= 2e-261))
		tmp = Float64(Float64(x + y) - Float64(Float64(z / Float64(a - t)) * y));
	else
		tmp = Float64(x - Float64(Float64(y * Float64(a - z)) / t));
	end
	return tmp
end
function tmp_2 = code(x, y, z, t, a)
	t_1 = (x + y) - (((z - t) * y) / (a - t));
	tmp = 0.0;
	if ((t_1 <= -4e-220) || ~((t_1 <= 2e-261)))
		tmp = (x + y) - ((z / (a - t)) * y);
	else
		tmp = x - ((y * (a - z)) / t);
	end
	tmp_2 = tmp;
end
code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(N[(x + y), $MachinePrecision] - N[(N[(N[(z - t), $MachinePrecision] * y), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[Or[LessEqual[t$95$1, -4e-220], N[Not[LessEqual[t$95$1, 2e-261]], $MachinePrecision]], N[(N[(x + y), $MachinePrecision] - N[(N[(z / N[(a - t), $MachinePrecision]), $MachinePrecision] * y), $MachinePrecision]), $MachinePrecision], N[(x - N[(N[(y * N[(a - z), $MachinePrecision]), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]]]
\begin{array}{l}

\\
\begin{array}{l}
t_1 := \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}\\
\mathbf{if}\;t\_1 \leq -4 \cdot 10^{-220} \lor \neg \left(t\_1 \leq 2 \cdot 10^{-261}\right):\\
\;\;\;\;\left(x + y\right) - \frac{z}{a - t} \cdot y\\

\mathbf{else}:\\
\;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (-.f64 (+.f64 x y) (/.f64 (*.f64 (-.f64 z t) y) (-.f64 a t))) < -3.99999999999999997e-220 or 1.99999999999999997e-261 < (-.f64 (+.f64 x y) (/.f64 (*.f64 (-.f64 z t) y) (-.f64 a t)))

    1. Initial program 82.2%

      \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
    2. Add Preprocessing
    3. Taylor expanded in z around inf

      \[\leadsto \left(x + y\right) - \color{blue}{\frac{y \cdot z}{a - t}} \]
    4. Step-by-step derivation
      1. associate-/l*N/A

        \[\leadsto \left(x + y\right) - \color{blue}{y \cdot \frac{z}{a - t}} \]
      2. *-commutativeN/A

        \[\leadsto \left(x + y\right) - \color{blue}{\frac{z}{a - t} \cdot y} \]
      3. lower-*.f64N/A

        \[\leadsto \left(x + y\right) - \color{blue}{\frac{z}{a - t} \cdot y} \]
      4. lower-/.f64N/A

        \[\leadsto \left(x + y\right) - \color{blue}{\frac{z}{a - t}} \cdot y \]
      5. lower--.f6487.8

        \[\leadsto \left(x + y\right) - \frac{z}{\color{blue}{a - t}} \cdot y \]
    5. Applied rewrites87.8%

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

    if -3.99999999999999997e-220 < (-.f64 (+.f64 x y) (/.f64 (*.f64 (-.f64 z t) y) (-.f64 a t))) < 1.99999999999999997e-261

    1. Initial program 7.6%

      \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
    2. Add Preprocessing
    3. Taylor expanded in t around inf

      \[\leadsto \color{blue}{\left(x + -1 \cdot \frac{a \cdot y}{t}\right) - -1 \cdot \frac{y \cdot z}{t}} \]
    4. Step-by-step derivation
      1. associate--l+N/A

        \[\leadsto \color{blue}{x + \left(-1 \cdot \frac{a \cdot y}{t} - -1 \cdot \frac{y \cdot z}{t}\right)} \]
      2. distribute-lft-out--N/A

        \[\leadsto x + \color{blue}{-1 \cdot \left(\frac{a \cdot y}{t} - \frac{y \cdot z}{t}\right)} \]
      3. div-subN/A

        \[\leadsto x + -1 \cdot \color{blue}{\frac{a \cdot y - y \cdot z}{t}} \]
      4. *-commutativeN/A

        \[\leadsto x + \color{blue}{\frac{a \cdot y - y \cdot z}{t} \cdot -1} \]
      5. fp-cancel-sign-sub-invN/A

        \[\leadsto \color{blue}{x - \left(\mathsf{neg}\left(\frac{a \cdot y - y \cdot z}{t}\right)\right) \cdot -1} \]
    5. Applied rewrites99.8%

      \[\leadsto \color{blue}{x - \frac{y \cdot \left(a - z\right)}{t}} \]
  3. Recombined 2 regimes into one program.
  4. Final simplification89.1%

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

Alternative 3: 82.5% accurate, 0.8× speedup?

\[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \leq -5800 \lor \neg \left(a \leq 3100000000\right):\\ \;\;\;\;\mathsf{fma}\left(1 - \frac{z}{a}, y, x\right)\\ \mathbf{else}:\\ \;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\ \end{array} \end{array} \]
(FPCore (x y z t a)
 :precision binary64
 (if (or (<= a -5800.0) (not (<= a 3100000000.0)))
   (fma (- 1.0 (/ z a)) y x)
   (- x (/ (* y (- a z)) t))))
double code(double x, double y, double z, double t, double a) {
	double tmp;
	if ((a <= -5800.0) || !(a <= 3100000000.0)) {
		tmp = fma((1.0 - (z / a)), y, x);
	} else {
		tmp = x - ((y * (a - z)) / t);
	}
	return tmp;
}
function code(x, y, z, t, a)
	tmp = 0.0
	if ((a <= -5800.0) || !(a <= 3100000000.0))
		tmp = fma(Float64(1.0 - Float64(z / a)), y, x);
	else
		tmp = Float64(x - Float64(Float64(y * Float64(a - z)) / t));
	end
	return tmp
end
code[x_, y_, z_, t_, a_] := If[Or[LessEqual[a, -5800.0], N[Not[LessEqual[a, 3100000000.0]], $MachinePrecision]], N[(N[(1.0 - N[(z / a), $MachinePrecision]), $MachinePrecision] * y + x), $MachinePrecision], N[(x - N[(N[(y * N[(a - z), $MachinePrecision]), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
\mathbf{if}\;a \leq -5800 \lor \neg \left(a \leq 3100000000\right):\\
\;\;\;\;\mathsf{fma}\left(1 - \frac{z}{a}, y, x\right)\\

\mathbf{else}:\\
\;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if a < -5800 or 3.1e9 < a

    1. Initial program 81.5%

      \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
    2. Add Preprocessing
    3. Taylor expanded in x around 0

      \[\leadsto \color{blue}{\left(x + y\right) - \frac{y \cdot \left(z - t\right)}{a - t}} \]
    4. Step-by-step derivation
      1. associate--l+N/A

        \[\leadsto \color{blue}{x + \left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right)} \]
      2. +-commutativeN/A

        \[\leadsto \color{blue}{\left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x} \]
      3. *-lft-identityN/A

        \[\leadsto \left(\color{blue}{1 \cdot y} - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x \]
      4. associate-/l*N/A

        \[\leadsto \left(1 \cdot y - \color{blue}{y \cdot \frac{z - t}{a - t}}\right) + x \]
      5. *-commutativeN/A

        \[\leadsto \left(1 \cdot y - \color{blue}{\frac{z - t}{a - t} \cdot y}\right) + x \]
      6. fp-cancel-sub-signN/A

        \[\leadsto \color{blue}{\left(1 \cdot y + \left(\mathsf{neg}\left(\frac{z - t}{a - t}\right)\right) \cdot y\right)} + x \]
      7. mul-1-negN/A

        \[\leadsto \left(1 \cdot y + \color{blue}{\left(-1 \cdot \frac{z - t}{a - t}\right)} \cdot y\right) + x \]
      8. distribute-rgt-inN/A

        \[\leadsto \color{blue}{y \cdot \left(1 + -1 \cdot \frac{z - t}{a - t}\right)} + x \]
      9. *-commutativeN/A

        \[\leadsto \color{blue}{\left(1 + -1 \cdot \frac{z - t}{a - t}\right) \cdot y} + x \]
      10. lower-fma.f64N/A

        \[\leadsto \color{blue}{\mathsf{fma}\left(1 + -1 \cdot \frac{z - t}{a - t}, y, x\right)} \]
      11. fp-cancel-sign-sub-invN/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{z - t}{a - t}}, y, x\right) \]
      12. metadata-evalN/A

        \[\leadsto \mathsf{fma}\left(1 - \color{blue}{1} \cdot \frac{z - t}{a - t}, y, x\right) \]
      13. *-lft-identityN/A

        \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
      14. lower--.f64N/A

        \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \frac{z - t}{a - t}}, y, x\right) \]
      15. lower-/.f64N/A

        \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
      16. lower--.f64N/A

        \[\leadsto \mathsf{fma}\left(1 - \frac{\color{blue}{z - t}}{a - t}, y, x\right) \]
      17. lower--.f6496.2

        \[\leadsto \mathsf{fma}\left(1 - \frac{z - t}{\color{blue}{a - t}}, y, x\right) \]
    5. Applied rewrites96.2%

      \[\leadsto \color{blue}{\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)} \]
    6. Taylor expanded in t around 0

      \[\leadsto \mathsf{fma}\left(1 - \frac{z}{a}, y, x\right) \]
    7. Step-by-step derivation
      1. Applied rewrites90.0%

        \[\leadsto \mathsf{fma}\left(1 - \frac{z}{a}, y, x\right) \]

      if -5800 < a < 3.1e9

      1. Initial program 67.2%

        \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
      2. Add Preprocessing
      3. Taylor expanded in t around inf

        \[\leadsto \color{blue}{\left(x + -1 \cdot \frac{a \cdot y}{t}\right) - -1 \cdot \frac{y \cdot z}{t}} \]
      4. Step-by-step derivation
        1. associate--l+N/A

          \[\leadsto \color{blue}{x + \left(-1 \cdot \frac{a \cdot y}{t} - -1 \cdot \frac{y \cdot z}{t}\right)} \]
        2. distribute-lft-out--N/A

          \[\leadsto x + \color{blue}{-1 \cdot \left(\frac{a \cdot y}{t} - \frac{y \cdot z}{t}\right)} \]
        3. div-subN/A

          \[\leadsto x + -1 \cdot \color{blue}{\frac{a \cdot y - y \cdot z}{t}} \]
        4. *-commutativeN/A

          \[\leadsto x + \color{blue}{\frac{a \cdot y - y \cdot z}{t} \cdot -1} \]
        5. fp-cancel-sign-sub-invN/A

          \[\leadsto \color{blue}{x - \left(\mathsf{neg}\left(\frac{a \cdot y - y \cdot z}{t}\right)\right) \cdot -1} \]
      5. Applied rewrites83.0%

        \[\leadsto \color{blue}{x - \frac{y \cdot \left(a - z\right)}{t}} \]
    8. Recombined 2 regimes into one program.
    9. Final simplification86.7%

      \[\leadsto \begin{array}{l} \mathbf{if}\;a \leq -5800 \lor \neg \left(a \leq 3100000000\right):\\ \;\;\;\;\mathsf{fma}\left(1 - \frac{z}{a}, y, x\right)\\ \mathbf{else}:\\ \;\;\;\;x - \frac{y \cdot \left(a - z\right)}{t}\\ \end{array} \]
    10. Add Preprocessing

    Alternative 4: 81.5% accurate, 0.9× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \leq -2.9 \cdot 10^{+47} \lor \neg \left(a \leq 6 \cdot 10^{-23}\right):\\ \;\;\;\;\mathsf{fma}\left(1 - \frac{z}{a}, y, x\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\ \end{array} \end{array} \]
    (FPCore (x y z t a)
     :precision binary64
     (if (or (<= a -2.9e+47) (not (<= a 6e-23)))
       (fma (- 1.0 (/ z a)) y x)
       (fma (/ z t) y x)))
    double code(double x, double y, double z, double t, double a) {
    	double tmp;
    	if ((a <= -2.9e+47) || !(a <= 6e-23)) {
    		tmp = fma((1.0 - (z / a)), y, x);
    	} else {
    		tmp = fma((z / t), y, x);
    	}
    	return tmp;
    }
    
    function code(x, y, z, t, a)
    	tmp = 0.0
    	if ((a <= -2.9e+47) || !(a <= 6e-23))
    		tmp = fma(Float64(1.0 - Float64(z / a)), y, x);
    	else
    		tmp = fma(Float64(z / t), y, x);
    	end
    	return tmp
    end
    
    code[x_, y_, z_, t_, a_] := If[Or[LessEqual[a, -2.9e+47], N[Not[LessEqual[a, 6e-23]], $MachinePrecision]], N[(N[(1.0 - N[(z / a), $MachinePrecision]), $MachinePrecision] * y + x), $MachinePrecision], N[(N[(z / t), $MachinePrecision] * y + x), $MachinePrecision]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    \mathbf{if}\;a \leq -2.9 \cdot 10^{+47} \lor \neg \left(a \leq 6 \cdot 10^{-23}\right):\\
    \;\;\;\;\mathsf{fma}\left(1 - \frac{z}{a}, y, x\right)\\
    
    \mathbf{else}:\\
    \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if a < -2.8999999999999998e47 or 6.00000000000000006e-23 < a

      1. Initial program 82.0%

        \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
      2. Add Preprocessing
      3. Taylor expanded in x around 0

        \[\leadsto \color{blue}{\left(x + y\right) - \frac{y \cdot \left(z - t\right)}{a - t}} \]
      4. Step-by-step derivation
        1. associate--l+N/A

          \[\leadsto \color{blue}{x + \left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right)} \]
        2. +-commutativeN/A

          \[\leadsto \color{blue}{\left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x} \]
        3. *-lft-identityN/A

          \[\leadsto \left(\color{blue}{1 \cdot y} - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x \]
        4. associate-/l*N/A

          \[\leadsto \left(1 \cdot y - \color{blue}{y \cdot \frac{z - t}{a - t}}\right) + x \]
        5. *-commutativeN/A

          \[\leadsto \left(1 \cdot y - \color{blue}{\frac{z - t}{a - t} \cdot y}\right) + x \]
        6. fp-cancel-sub-signN/A

          \[\leadsto \color{blue}{\left(1 \cdot y + \left(\mathsf{neg}\left(\frac{z - t}{a - t}\right)\right) \cdot y\right)} + x \]
        7. mul-1-negN/A

          \[\leadsto \left(1 \cdot y + \color{blue}{\left(-1 \cdot \frac{z - t}{a - t}\right)} \cdot y\right) + x \]
        8. distribute-rgt-inN/A

          \[\leadsto \color{blue}{y \cdot \left(1 + -1 \cdot \frac{z - t}{a - t}\right)} + x \]
        9. *-commutativeN/A

          \[\leadsto \color{blue}{\left(1 + -1 \cdot \frac{z - t}{a - t}\right) \cdot y} + x \]
        10. lower-fma.f64N/A

          \[\leadsto \color{blue}{\mathsf{fma}\left(1 + -1 \cdot \frac{z - t}{a - t}, y, x\right)} \]
        11. fp-cancel-sign-sub-invN/A

          \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{z - t}{a - t}}, y, x\right) \]
        12. metadata-evalN/A

          \[\leadsto \mathsf{fma}\left(1 - \color{blue}{1} \cdot \frac{z - t}{a - t}, y, x\right) \]
        13. *-lft-identityN/A

          \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
        14. lower--.f64N/A

          \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \frac{z - t}{a - t}}, y, x\right) \]
        15. lower-/.f64N/A

          \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
        16. lower--.f64N/A

          \[\leadsto \mathsf{fma}\left(1 - \frac{\color{blue}{z - t}}{a - t}, y, x\right) \]
        17. lower--.f6496.8

          \[\leadsto \mathsf{fma}\left(1 - \frac{z - t}{\color{blue}{a - t}}, y, x\right) \]
      5. Applied rewrites96.8%

        \[\leadsto \color{blue}{\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)} \]
      6. Taylor expanded in t around 0

        \[\leadsto \mathsf{fma}\left(1 - \frac{z}{a}, y, x\right) \]
      7. Step-by-step derivation
        1. Applied rewrites88.6%

          \[\leadsto \mathsf{fma}\left(1 - \frac{z}{a}, y, x\right) \]

        if -2.8999999999999998e47 < a < 6.00000000000000006e-23

        1. Initial program 66.5%

          \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
        2. Add Preprocessing
        3. Taylor expanded in x around 0

          \[\leadsto \color{blue}{\left(x + y\right) - \frac{y \cdot \left(z - t\right)}{a - t}} \]
        4. Step-by-step derivation
          1. associate--l+N/A

            \[\leadsto \color{blue}{x + \left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right)} \]
          2. +-commutativeN/A

            \[\leadsto \color{blue}{\left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x} \]
          3. *-lft-identityN/A

            \[\leadsto \left(\color{blue}{1 \cdot y} - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x \]
          4. associate-/l*N/A

            \[\leadsto \left(1 \cdot y - \color{blue}{y \cdot \frac{z - t}{a - t}}\right) + x \]
          5. *-commutativeN/A

            \[\leadsto \left(1 \cdot y - \color{blue}{\frac{z - t}{a - t} \cdot y}\right) + x \]
          6. fp-cancel-sub-signN/A

            \[\leadsto \color{blue}{\left(1 \cdot y + \left(\mathsf{neg}\left(\frac{z - t}{a - t}\right)\right) \cdot y\right)} + x \]
          7. mul-1-negN/A

            \[\leadsto \left(1 \cdot y + \color{blue}{\left(-1 \cdot \frac{z - t}{a - t}\right)} \cdot y\right) + x \]
          8. distribute-rgt-inN/A

            \[\leadsto \color{blue}{y \cdot \left(1 + -1 \cdot \frac{z - t}{a - t}\right)} + x \]
          9. *-commutativeN/A

            \[\leadsto \color{blue}{\left(1 + -1 \cdot \frac{z - t}{a - t}\right) \cdot y} + x \]
          10. lower-fma.f64N/A

            \[\leadsto \color{blue}{\mathsf{fma}\left(1 + -1 \cdot \frac{z - t}{a - t}, y, x\right)} \]
          11. fp-cancel-sign-sub-invN/A

            \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{z - t}{a - t}}, y, x\right) \]
          12. metadata-evalN/A

            \[\leadsto \mathsf{fma}\left(1 - \color{blue}{1} \cdot \frac{z - t}{a - t}, y, x\right) \]
          13. *-lft-identityN/A

            \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
          14. lower--.f64N/A

            \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \frac{z - t}{a - t}}, y, x\right) \]
          15. lower-/.f64N/A

            \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
          16. lower--.f64N/A

            \[\leadsto \mathsf{fma}\left(1 - \frac{\color{blue}{z - t}}{a - t}, y, x\right) \]
          17. lower--.f6482.3

            \[\leadsto \mathsf{fma}\left(1 - \frac{z - t}{\color{blue}{a - t}}, y, x\right) \]
        5. Applied rewrites82.3%

          \[\leadsto \color{blue}{\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)} \]
        6. Taylor expanded in a around 0

          \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
        7. Step-by-step derivation
          1. Applied rewrites80.0%

            \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
        8. Recombined 2 regimes into one program.
        9. Final simplification84.5%

          \[\leadsto \begin{array}{l} \mathbf{if}\;a \leq -2.9 \cdot 10^{+47} \lor \neg \left(a \leq 6 \cdot 10^{-23}\right):\\ \;\;\;\;\mathsf{fma}\left(1 - \frac{z}{a}, y, x\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\ \end{array} \]
        10. Add Preprocessing

        Alternative 5: 51.4% accurate, 1.0× speedup?

        \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;z \leq -4.6 \cdot 10^{+137} \lor \neg \left(z \leq 1.35 \cdot 10^{+222}\right):\\ \;\;\;\;y \cdot \frac{z}{t}\\ \mathbf{else}:\\ \;\;\;\;x\\ \end{array} \end{array} \]
        (FPCore (x y z t a)
         :precision binary64
         (if (or (<= z -4.6e+137) (not (<= z 1.35e+222))) (* y (/ z t)) x))
        double code(double x, double y, double z, double t, double a) {
        	double tmp;
        	if ((z <= -4.6e+137) || !(z <= 1.35e+222)) {
        		tmp = y * (z / t);
        	} else {
        		tmp = x;
        	}
        	return tmp;
        }
        
        module fmin_fmax_functions
            implicit none
            private
            public fmax
            public fmin
        
            interface fmax
                module procedure fmax88
                module procedure fmax44
                module procedure fmax84
                module procedure fmax48
            end interface
            interface fmin
                module procedure fmin88
                module procedure fmin44
                module procedure fmin84
                module procedure fmin48
            end interface
        contains
            real(8) function fmax88(x, y) result (res)
                real(8), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
            end function
            real(4) function fmax44(x, y) result (res)
                real(4), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(y, merge(x, max(x, y), y /= y), x /= x)
            end function
            real(8) function fmax84(x, y) result(res)
                real(8), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
            end function
            real(8) function fmax48(x, y) result(res)
                real(4), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
            end function
            real(8) function fmin88(x, y) result (res)
                real(8), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
            end function
            real(4) function fmin44(x, y) result (res)
                real(4), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(y, merge(x, min(x, y), y /= y), x /= x)
            end function
            real(8) function fmin84(x, y) result(res)
                real(8), intent (in) :: x
                real(4), intent (in) :: y
                res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
            end function
            real(8) function fmin48(x, y) result(res)
                real(4), intent (in) :: x
                real(8), intent (in) :: y
                res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
            end function
        end module
        
        real(8) function code(x, y, z, t, a)
        use fmin_fmax_functions
            real(8), intent (in) :: x
            real(8), intent (in) :: y
            real(8), intent (in) :: z
            real(8), intent (in) :: t
            real(8), intent (in) :: a
            real(8) :: tmp
            if ((z <= (-4.6d+137)) .or. (.not. (z <= 1.35d+222))) then
                tmp = y * (z / t)
            else
                tmp = x
            end if
            code = tmp
        end function
        
        public static double code(double x, double y, double z, double t, double a) {
        	double tmp;
        	if ((z <= -4.6e+137) || !(z <= 1.35e+222)) {
        		tmp = y * (z / t);
        	} else {
        		tmp = x;
        	}
        	return tmp;
        }
        
        def code(x, y, z, t, a):
        	tmp = 0
        	if (z <= -4.6e+137) or not (z <= 1.35e+222):
        		tmp = y * (z / t)
        	else:
        		tmp = x
        	return tmp
        
        function code(x, y, z, t, a)
        	tmp = 0.0
        	if ((z <= -4.6e+137) || !(z <= 1.35e+222))
        		tmp = Float64(y * Float64(z / t));
        	else
        		tmp = x;
        	end
        	return tmp
        end
        
        function tmp_2 = code(x, y, z, t, a)
        	tmp = 0.0;
        	if ((z <= -4.6e+137) || ~((z <= 1.35e+222)))
        		tmp = y * (z / t);
        	else
        		tmp = x;
        	end
        	tmp_2 = tmp;
        end
        
        code[x_, y_, z_, t_, a_] := If[Or[LessEqual[z, -4.6e+137], N[Not[LessEqual[z, 1.35e+222]], $MachinePrecision]], N[(y * N[(z / t), $MachinePrecision]), $MachinePrecision], x]
        
        \begin{array}{l}
        
        \\
        \begin{array}{l}
        \mathbf{if}\;z \leq -4.6 \cdot 10^{+137} \lor \neg \left(z \leq 1.35 \cdot 10^{+222}\right):\\
        \;\;\;\;y \cdot \frac{z}{t}\\
        
        \mathbf{else}:\\
        \;\;\;\;x\\
        
        
        \end{array}
        \end{array}
        
        Derivation
        1. Split input into 2 regimes
        2. if z < -4.59999999999999999e137 or 1.35000000000000006e222 < z

          1. Initial program 77.2%

            \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
          2. Add Preprocessing
          3. Taylor expanded in t around inf

            \[\leadsto \color{blue}{\left(x + -1 \cdot \frac{a \cdot y}{t}\right) - -1 \cdot \frac{y \cdot z}{t}} \]
          4. Step-by-step derivation
            1. associate--l+N/A

              \[\leadsto \color{blue}{x + \left(-1 \cdot \frac{a \cdot y}{t} - -1 \cdot \frac{y \cdot z}{t}\right)} \]
            2. distribute-lft-out--N/A

              \[\leadsto x + \color{blue}{-1 \cdot \left(\frac{a \cdot y}{t} - \frac{y \cdot z}{t}\right)} \]
            3. div-subN/A

              \[\leadsto x + -1 \cdot \color{blue}{\frac{a \cdot y - y \cdot z}{t}} \]
            4. *-commutativeN/A

              \[\leadsto x + \color{blue}{\frac{a \cdot y - y \cdot z}{t} \cdot -1} \]
            5. fp-cancel-sign-sub-invN/A

              \[\leadsto \color{blue}{x - \left(\mathsf{neg}\left(\frac{a \cdot y - y \cdot z}{t}\right)\right) \cdot -1} \]
          5. Applied rewrites57.1%

            \[\leadsto \color{blue}{x - \frac{y \cdot \left(a - z\right)}{t}} \]
          6. Taylor expanded in z around inf

            \[\leadsto \frac{y \cdot z}{\color{blue}{t}} \]
          7. Step-by-step derivation
            1. Applied rewrites51.8%

              \[\leadsto y \cdot \color{blue}{\frac{z}{t}} \]

            if -4.59999999999999999e137 < z < 1.35000000000000006e222

            1. Initial program 73.9%

              \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
            2. Add Preprocessing
            3. Taylor expanded in z around 0

              \[\leadsto \color{blue}{\left(x + y\right) - -1 \cdot \frac{t \cdot y}{a - t}} \]
            4. Step-by-step derivation
              1. fp-cancel-sub-sign-invN/A

                \[\leadsto \color{blue}{\left(x + y\right) + \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t}} \]
              2. +-commutativeN/A

                \[\leadsto \color{blue}{\left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t} + \left(x + y\right)} \]
              3. metadata-evalN/A

                \[\leadsto \color{blue}{1} \cdot \frac{t \cdot y}{a - t} + \left(x + y\right) \]
              4. *-lft-identityN/A

                \[\leadsto \color{blue}{\frac{t \cdot y}{a - t}} + \left(x + y\right) \]
              5. *-commutativeN/A

                \[\leadsto \frac{\color{blue}{y \cdot t}}{a - t} + \left(x + y\right) \]
              6. associate-/l*N/A

                \[\leadsto \color{blue}{y \cdot \frac{t}{a - t}} + \left(x + y\right) \]
              7. lower-fma.f64N/A

                \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, x + y\right)} \]
              8. lower-/.f64N/A

                \[\leadsto \mathsf{fma}\left(y, \color{blue}{\frac{t}{a - t}}, x + y\right) \]
              9. lower--.f64N/A

                \[\leadsto \mathsf{fma}\left(y, \frac{t}{\color{blue}{a - t}}, x + y\right) \]
              10. +-commutativeN/A

                \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
              11. lower-+.f6472.3

                \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
            5. Applied rewrites72.3%

              \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, y + x\right)} \]
            6. Taylor expanded in t around inf

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

                \[\leadsto \mathsf{fma}\left(0, \color{blue}{y}, x\right) \]
              2. Step-by-step derivation
                1. Applied rewrites61.7%

                  \[\leadsto \color{blue}{x} \]
              3. Recombined 2 regimes into one program.
              4. Final simplification59.6%

                \[\leadsto \begin{array}{l} \mathbf{if}\;z \leq -4.6 \cdot 10^{+137} \lor \neg \left(z \leq 1.35 \cdot 10^{+222}\right):\\ \;\;\;\;y \cdot \frac{z}{t}\\ \mathbf{else}:\\ \;\;\;\;x\\ \end{array} \]
              5. Add Preprocessing

              Alternative 6: 62.4% accurate, 1.1× speedup?

              \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \leq -4.6 \cdot 10^{+202}:\\ \;\;\;\;\mathsf{fma}\left(\frac{t}{a - t}, y, y\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\ \end{array} \end{array} \]
              (FPCore (x y z t a)
               :precision binary64
               (if (<= a -4.6e+202) (fma (/ t (- a t)) y y) (fma (/ z t) y x)))
              double code(double x, double y, double z, double t, double a) {
              	double tmp;
              	if (a <= -4.6e+202) {
              		tmp = fma((t / (a - t)), y, y);
              	} else {
              		tmp = fma((z / t), y, x);
              	}
              	return tmp;
              }
              
              function code(x, y, z, t, a)
              	tmp = 0.0
              	if (a <= -4.6e+202)
              		tmp = fma(Float64(t / Float64(a - t)), y, y);
              	else
              		tmp = fma(Float64(z / t), y, x);
              	end
              	return tmp
              end
              
              code[x_, y_, z_, t_, a_] := If[LessEqual[a, -4.6e+202], N[(N[(t / N[(a - t), $MachinePrecision]), $MachinePrecision] * y + y), $MachinePrecision], N[(N[(z / t), $MachinePrecision] * y + x), $MachinePrecision]]
              
              \begin{array}{l}
              
              \\
              \begin{array}{l}
              \mathbf{if}\;a \leq -4.6 \cdot 10^{+202}:\\
              \;\;\;\;\mathsf{fma}\left(\frac{t}{a - t}, y, y\right)\\
              
              \mathbf{else}:\\
              \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\
              
              
              \end{array}
              \end{array}
              
              Derivation
              1. Split input into 2 regimes
              2. if a < -4.59999999999999998e202

                1. Initial program 80.0%

                  \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                2. Add Preprocessing
                3. Taylor expanded in z around 0

                  \[\leadsto \color{blue}{\left(x + y\right) - -1 \cdot \frac{t \cdot y}{a - t}} \]
                4. Step-by-step derivation
                  1. fp-cancel-sub-sign-invN/A

                    \[\leadsto \color{blue}{\left(x + y\right) + \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t}} \]
                  2. +-commutativeN/A

                    \[\leadsto \color{blue}{\left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t} + \left(x + y\right)} \]
                  3. metadata-evalN/A

                    \[\leadsto \color{blue}{1} \cdot \frac{t \cdot y}{a - t} + \left(x + y\right) \]
                  4. *-lft-identityN/A

                    \[\leadsto \color{blue}{\frac{t \cdot y}{a - t}} + \left(x + y\right) \]
                  5. *-commutativeN/A

                    \[\leadsto \frac{\color{blue}{y \cdot t}}{a - t} + \left(x + y\right) \]
                  6. associate-/l*N/A

                    \[\leadsto \color{blue}{y \cdot \frac{t}{a - t}} + \left(x + y\right) \]
                  7. lower-fma.f64N/A

                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, x + y\right)} \]
                  8. lower-/.f64N/A

                    \[\leadsto \mathsf{fma}\left(y, \color{blue}{\frac{t}{a - t}}, x + y\right) \]
                  9. lower--.f64N/A

                    \[\leadsto \mathsf{fma}\left(y, \frac{t}{\color{blue}{a - t}}, x + y\right) \]
                  10. +-commutativeN/A

                    \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                  11. lower-+.f6492.1

                    \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                5. Applied rewrites92.1%

                  \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, y + x\right)} \]
                6. Taylor expanded in t around inf

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

                    \[\leadsto \mathsf{fma}\left(0, \color{blue}{y}, x\right) \]
                  2. Step-by-step derivation
                    1. Applied rewrites37.0%

                      \[\leadsto \color{blue}{x} \]
                    2. Taylor expanded in y around inf

                      \[\leadsto y \cdot \color{blue}{\left(1 + \frac{t}{a - t}\right)} \]
                    3. Step-by-step derivation
                      1. Applied rewrites58.7%

                        \[\leadsto \mathsf{fma}\left(\frac{t}{a - t}, \color{blue}{y}, y\right) \]

                      if -4.59999999999999998e202 < a

                      1. Initial program 73.9%

                        \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                      2. Add Preprocessing
                      3. Taylor expanded in x around 0

                        \[\leadsto \color{blue}{\left(x + y\right) - \frac{y \cdot \left(z - t\right)}{a - t}} \]
                      4. Step-by-step derivation
                        1. associate--l+N/A

                          \[\leadsto \color{blue}{x + \left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right)} \]
                        2. +-commutativeN/A

                          \[\leadsto \color{blue}{\left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x} \]
                        3. *-lft-identityN/A

                          \[\leadsto \left(\color{blue}{1 \cdot y} - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x \]
                        4. associate-/l*N/A

                          \[\leadsto \left(1 \cdot y - \color{blue}{y \cdot \frac{z - t}{a - t}}\right) + x \]
                        5. *-commutativeN/A

                          \[\leadsto \left(1 \cdot y - \color{blue}{\frac{z - t}{a - t} \cdot y}\right) + x \]
                        6. fp-cancel-sub-signN/A

                          \[\leadsto \color{blue}{\left(1 \cdot y + \left(\mathsf{neg}\left(\frac{z - t}{a - t}\right)\right) \cdot y\right)} + x \]
                        7. mul-1-negN/A

                          \[\leadsto \left(1 \cdot y + \color{blue}{\left(-1 \cdot \frac{z - t}{a - t}\right)} \cdot y\right) + x \]
                        8. distribute-rgt-inN/A

                          \[\leadsto \color{blue}{y \cdot \left(1 + -1 \cdot \frac{z - t}{a - t}\right)} + x \]
                        9. *-commutativeN/A

                          \[\leadsto \color{blue}{\left(1 + -1 \cdot \frac{z - t}{a - t}\right) \cdot y} + x \]
                        10. lower-fma.f64N/A

                          \[\leadsto \color{blue}{\mathsf{fma}\left(1 + -1 \cdot \frac{z - t}{a - t}, y, x\right)} \]
                        11. fp-cancel-sign-sub-invN/A

                          \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{z - t}{a - t}}, y, x\right) \]
                        12. metadata-evalN/A

                          \[\leadsto \mathsf{fma}\left(1 - \color{blue}{1} \cdot \frac{z - t}{a - t}, y, x\right) \]
                        13. *-lft-identityN/A

                          \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
                        14. lower--.f64N/A

                          \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \frac{z - t}{a - t}}, y, x\right) \]
                        15. lower-/.f64N/A

                          \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
                        16. lower--.f64N/A

                          \[\leadsto \mathsf{fma}\left(1 - \frac{\color{blue}{z - t}}{a - t}, y, x\right) \]
                        17. lower--.f6488.8

                          \[\leadsto \mathsf{fma}\left(1 - \frac{z - t}{\color{blue}{a - t}}, y, x\right) \]
                      5. Applied rewrites88.8%

                        \[\leadsto \color{blue}{\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)} \]
                      6. Taylor expanded in a around 0

                        \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
                      7. Step-by-step derivation
                        1. Applied rewrites66.9%

                          \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
                      8. Recombined 2 regimes into one program.
                      9. Add Preprocessing

                      Alternative 7: 62.3% accurate, 1.1× speedup?

                      \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \leq -4.6 \cdot 10^{+202}:\\ \;\;\;\;\mathsf{fma}\left(t, \frac{y}{a - t}, y\right)\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\ \end{array} \end{array} \]
                      (FPCore (x y z t a)
                       :precision binary64
                       (if (<= a -4.6e+202) (fma t (/ y (- a t)) y) (fma (/ z t) y x)))
                      double code(double x, double y, double z, double t, double a) {
                      	double tmp;
                      	if (a <= -4.6e+202) {
                      		tmp = fma(t, (y / (a - t)), y);
                      	} else {
                      		tmp = fma((z / t), y, x);
                      	}
                      	return tmp;
                      }
                      
                      function code(x, y, z, t, a)
                      	tmp = 0.0
                      	if (a <= -4.6e+202)
                      		tmp = fma(t, Float64(y / Float64(a - t)), y);
                      	else
                      		tmp = fma(Float64(z / t), y, x);
                      	end
                      	return tmp
                      end
                      
                      code[x_, y_, z_, t_, a_] := If[LessEqual[a, -4.6e+202], N[(t * N[(y / N[(a - t), $MachinePrecision]), $MachinePrecision] + y), $MachinePrecision], N[(N[(z / t), $MachinePrecision] * y + x), $MachinePrecision]]
                      
                      \begin{array}{l}
                      
                      \\
                      \begin{array}{l}
                      \mathbf{if}\;a \leq -4.6 \cdot 10^{+202}:\\
                      \;\;\;\;\mathsf{fma}\left(t, \frac{y}{a - t}, y\right)\\
                      
                      \mathbf{else}:\\
                      \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\
                      
                      
                      \end{array}
                      \end{array}
                      
                      Derivation
                      1. Split input into 2 regimes
                      2. if a < -4.59999999999999998e202

                        1. Initial program 80.0%

                          \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                        2. Add Preprocessing
                        3. Taylor expanded in z around 0

                          \[\leadsto \color{blue}{\left(x + y\right) - -1 \cdot \frac{t \cdot y}{a - t}} \]
                        4. Step-by-step derivation
                          1. fp-cancel-sub-sign-invN/A

                            \[\leadsto \color{blue}{\left(x + y\right) + \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t}} \]
                          2. +-commutativeN/A

                            \[\leadsto \color{blue}{\left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t} + \left(x + y\right)} \]
                          3. metadata-evalN/A

                            \[\leadsto \color{blue}{1} \cdot \frac{t \cdot y}{a - t} + \left(x + y\right) \]
                          4. *-lft-identityN/A

                            \[\leadsto \color{blue}{\frac{t \cdot y}{a - t}} + \left(x + y\right) \]
                          5. *-commutativeN/A

                            \[\leadsto \frac{\color{blue}{y \cdot t}}{a - t} + \left(x + y\right) \]
                          6. associate-/l*N/A

                            \[\leadsto \color{blue}{y \cdot \frac{t}{a - t}} + \left(x + y\right) \]
                          7. lower-fma.f64N/A

                            \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, x + y\right)} \]
                          8. lower-/.f64N/A

                            \[\leadsto \mathsf{fma}\left(y, \color{blue}{\frac{t}{a - t}}, x + y\right) \]
                          9. lower--.f64N/A

                            \[\leadsto \mathsf{fma}\left(y, \frac{t}{\color{blue}{a - t}}, x + y\right) \]
                          10. +-commutativeN/A

                            \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                          11. lower-+.f6492.1

                            \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                        5. Applied rewrites92.1%

                          \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, y + x\right)} \]
                        6. Taylor expanded in x around 0

                          \[\leadsto y + \color{blue}{\frac{t \cdot y}{a - t}} \]
                        7. Step-by-step derivation
                          1. Applied rewrites58.6%

                            \[\leadsto \mathsf{fma}\left(t, \color{blue}{\frac{y}{a - t}}, y\right) \]

                          if -4.59999999999999998e202 < a

                          1. Initial program 73.9%

                            \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                          2. Add Preprocessing
                          3. Taylor expanded in x around 0

                            \[\leadsto \color{blue}{\left(x + y\right) - \frac{y \cdot \left(z - t\right)}{a - t}} \]
                          4. Step-by-step derivation
                            1. associate--l+N/A

                              \[\leadsto \color{blue}{x + \left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right)} \]
                            2. +-commutativeN/A

                              \[\leadsto \color{blue}{\left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x} \]
                            3. *-lft-identityN/A

                              \[\leadsto \left(\color{blue}{1 \cdot y} - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x \]
                            4. associate-/l*N/A

                              \[\leadsto \left(1 \cdot y - \color{blue}{y \cdot \frac{z - t}{a - t}}\right) + x \]
                            5. *-commutativeN/A

                              \[\leadsto \left(1 \cdot y - \color{blue}{\frac{z - t}{a - t} \cdot y}\right) + x \]
                            6. fp-cancel-sub-signN/A

                              \[\leadsto \color{blue}{\left(1 \cdot y + \left(\mathsf{neg}\left(\frac{z - t}{a - t}\right)\right) \cdot y\right)} + x \]
                            7. mul-1-negN/A

                              \[\leadsto \left(1 \cdot y + \color{blue}{\left(-1 \cdot \frac{z - t}{a - t}\right)} \cdot y\right) + x \]
                            8. distribute-rgt-inN/A

                              \[\leadsto \color{blue}{y \cdot \left(1 + -1 \cdot \frac{z - t}{a - t}\right)} + x \]
                            9. *-commutativeN/A

                              \[\leadsto \color{blue}{\left(1 + -1 \cdot \frac{z - t}{a - t}\right) \cdot y} + x \]
                            10. lower-fma.f64N/A

                              \[\leadsto \color{blue}{\mathsf{fma}\left(1 + -1 \cdot \frac{z - t}{a - t}, y, x\right)} \]
                            11. fp-cancel-sign-sub-invN/A

                              \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{z - t}{a - t}}, y, x\right) \]
                            12. metadata-evalN/A

                              \[\leadsto \mathsf{fma}\left(1 - \color{blue}{1} \cdot \frac{z - t}{a - t}, y, x\right) \]
                            13. *-lft-identityN/A

                              \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
                            14. lower--.f64N/A

                              \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \frac{z - t}{a - t}}, y, x\right) \]
                            15. lower-/.f64N/A

                              \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
                            16. lower--.f64N/A

                              \[\leadsto \mathsf{fma}\left(1 - \frac{\color{blue}{z - t}}{a - t}, y, x\right) \]
                            17. lower--.f6488.8

                              \[\leadsto \mathsf{fma}\left(1 - \frac{z - t}{\color{blue}{a - t}}, y, x\right) \]
                          5. Applied rewrites88.8%

                            \[\leadsto \color{blue}{\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)} \]
                          6. Taylor expanded in a around 0

                            \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
                          7. Step-by-step derivation
                            1. Applied rewrites66.9%

                              \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
                          8. Recombined 2 regimes into one program.
                          9. Add Preprocessing

                          Alternative 8: 63.5% accurate, 1.2× speedup?

                          \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;a \leq -2.5 \cdot 10^{+160}:\\ \;\;\;\;x\\ \mathbf{else}:\\ \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\ \end{array} \end{array} \]
                          (FPCore (x y z t a)
                           :precision binary64
                           (if (<= a -2.5e+160) x (fma (/ z t) y x)))
                          double code(double x, double y, double z, double t, double a) {
                          	double tmp;
                          	if (a <= -2.5e+160) {
                          		tmp = x;
                          	} else {
                          		tmp = fma((z / t), y, x);
                          	}
                          	return tmp;
                          }
                          
                          function code(x, y, z, t, a)
                          	tmp = 0.0
                          	if (a <= -2.5e+160)
                          		tmp = x;
                          	else
                          		tmp = fma(Float64(z / t), y, x);
                          	end
                          	return tmp
                          end
                          
                          code[x_, y_, z_, t_, a_] := If[LessEqual[a, -2.5e+160], x, N[(N[(z / t), $MachinePrecision] * y + x), $MachinePrecision]]
                          
                          \begin{array}{l}
                          
                          \\
                          \begin{array}{l}
                          \mathbf{if}\;a \leq -2.5 \cdot 10^{+160}:\\
                          \;\;\;\;x\\
                          
                          \mathbf{else}:\\
                          \;\;\;\;\mathsf{fma}\left(\frac{z}{t}, y, x\right)\\
                          
                          
                          \end{array}
                          \end{array}
                          
                          Derivation
                          1. Split input into 2 regimes
                          2. if a < -2.5000000000000001e160

                            1. Initial program 81.6%

                              \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                            2. Add Preprocessing
                            3. Taylor expanded in z around 0

                              \[\leadsto \color{blue}{\left(x + y\right) - -1 \cdot \frac{t \cdot y}{a - t}} \]
                            4. Step-by-step derivation
                              1. fp-cancel-sub-sign-invN/A

                                \[\leadsto \color{blue}{\left(x + y\right) + \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t}} \]
                              2. +-commutativeN/A

                                \[\leadsto \color{blue}{\left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t} + \left(x + y\right)} \]
                              3. metadata-evalN/A

                                \[\leadsto \color{blue}{1} \cdot \frac{t \cdot y}{a - t} + \left(x + y\right) \]
                              4. *-lft-identityN/A

                                \[\leadsto \color{blue}{\frac{t \cdot y}{a - t}} + \left(x + y\right) \]
                              5. *-commutativeN/A

                                \[\leadsto \frac{\color{blue}{y \cdot t}}{a - t} + \left(x + y\right) \]
                              6. associate-/l*N/A

                                \[\leadsto \color{blue}{y \cdot \frac{t}{a - t}} + \left(x + y\right) \]
                              7. lower-fma.f64N/A

                                \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, x + y\right)} \]
                              8. lower-/.f64N/A

                                \[\leadsto \mathsf{fma}\left(y, \color{blue}{\frac{t}{a - t}}, x + y\right) \]
                              9. lower--.f64N/A

                                \[\leadsto \mathsf{fma}\left(y, \frac{t}{\color{blue}{a - t}}, x + y\right) \]
                              10. +-commutativeN/A

                                \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                              11. lower-+.f6491.8

                                \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                            5. Applied rewrites91.8%

                              \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, y + x\right)} \]
                            6. Taylor expanded in t around inf

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

                                \[\leadsto \mathsf{fma}\left(0, \color{blue}{y}, x\right) \]
                              2. Step-by-step derivation
                                1. Applied rewrites48.2%

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

                                if -2.5000000000000001e160 < a

                                1. Initial program 73.4%

                                  \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                                2. Add Preprocessing
                                3. Taylor expanded in x around 0

                                  \[\leadsto \color{blue}{\left(x + y\right) - \frac{y \cdot \left(z - t\right)}{a - t}} \]
                                4. Step-by-step derivation
                                  1. associate--l+N/A

                                    \[\leadsto \color{blue}{x + \left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right)} \]
                                  2. +-commutativeN/A

                                    \[\leadsto \color{blue}{\left(y - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x} \]
                                  3. *-lft-identityN/A

                                    \[\leadsto \left(\color{blue}{1 \cdot y} - \frac{y \cdot \left(z - t\right)}{a - t}\right) + x \]
                                  4. associate-/l*N/A

                                    \[\leadsto \left(1 \cdot y - \color{blue}{y \cdot \frac{z - t}{a - t}}\right) + x \]
                                  5. *-commutativeN/A

                                    \[\leadsto \left(1 \cdot y - \color{blue}{\frac{z - t}{a - t} \cdot y}\right) + x \]
                                  6. fp-cancel-sub-signN/A

                                    \[\leadsto \color{blue}{\left(1 \cdot y + \left(\mathsf{neg}\left(\frac{z - t}{a - t}\right)\right) \cdot y\right)} + x \]
                                  7. mul-1-negN/A

                                    \[\leadsto \left(1 \cdot y + \color{blue}{\left(-1 \cdot \frac{z - t}{a - t}\right)} \cdot y\right) + x \]
                                  8. distribute-rgt-inN/A

                                    \[\leadsto \color{blue}{y \cdot \left(1 + -1 \cdot \frac{z - t}{a - t}\right)} + x \]
                                  9. *-commutativeN/A

                                    \[\leadsto \color{blue}{\left(1 + -1 \cdot \frac{z - t}{a - t}\right) \cdot y} + x \]
                                  10. lower-fma.f64N/A

                                    \[\leadsto \color{blue}{\mathsf{fma}\left(1 + -1 \cdot \frac{z - t}{a - t}, y, x\right)} \]
                                  11. fp-cancel-sign-sub-invN/A

                                    \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{z - t}{a - t}}, y, x\right) \]
                                  12. metadata-evalN/A

                                    \[\leadsto \mathsf{fma}\left(1 - \color{blue}{1} \cdot \frac{z - t}{a - t}, y, x\right) \]
                                  13. *-lft-identityN/A

                                    \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
                                  14. lower--.f64N/A

                                    \[\leadsto \mathsf{fma}\left(\color{blue}{1 - \frac{z - t}{a - t}}, y, x\right) \]
                                  15. lower-/.f64N/A

                                    \[\leadsto \mathsf{fma}\left(1 - \color{blue}{\frac{z - t}{a - t}}, y, x\right) \]
                                  16. lower--.f64N/A

                                    \[\leadsto \mathsf{fma}\left(1 - \frac{\color{blue}{z - t}}{a - t}, y, x\right) \]
                                  17. lower--.f6488.4

                                    \[\leadsto \mathsf{fma}\left(1 - \frac{z - t}{\color{blue}{a - t}}, y, x\right) \]
                                5. Applied rewrites88.4%

                                  \[\leadsto \color{blue}{\mathsf{fma}\left(1 - \frac{z - t}{a - t}, y, x\right)} \]
                                6. Taylor expanded in a around 0

                                  \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
                                7. Step-by-step derivation
                                  1. Applied rewrites67.9%

                                    \[\leadsto \mathsf{fma}\left(\frac{z}{t}, y, x\right) \]
                                8. Recombined 2 regimes into one program.
                                9. Add Preprocessing

                                Alternative 9: 51.3% accurate, 1.3× speedup?

                                \[\begin{array}{l} \\ \begin{array}{l} \mathbf{if}\;z \leq 1.85 \cdot 10^{+223}:\\ \;\;\;\;x\\ \mathbf{else}:\\ \;\;\;\;\frac{z \cdot y}{t}\\ \end{array} \end{array} \]
                                (FPCore (x y z t a) :precision binary64 (if (<= z 1.85e+223) x (/ (* z y) t)))
                                double code(double x, double y, double z, double t, double a) {
                                	double tmp;
                                	if (z <= 1.85e+223) {
                                		tmp = x;
                                	} else {
                                		tmp = (z * y) / t;
                                	}
                                	return tmp;
                                }
                                
                                module fmin_fmax_functions
                                    implicit none
                                    private
                                    public fmax
                                    public fmin
                                
                                    interface fmax
                                        module procedure fmax88
                                        module procedure fmax44
                                        module procedure fmax84
                                        module procedure fmax48
                                    end interface
                                    interface fmin
                                        module procedure fmin88
                                        module procedure fmin44
                                        module procedure fmin84
                                        module procedure fmin48
                                    end interface
                                contains
                                    real(8) function fmax88(x, y) result (res)
                                        real(8), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                    end function
                                    real(4) function fmax44(x, y) result (res)
                                        real(4), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                    end function
                                    real(8) function fmax84(x, y) result(res)
                                        real(8), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                    end function
                                    real(8) function fmax48(x, y) result(res)
                                        real(4), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                    end function
                                    real(8) function fmin88(x, y) result (res)
                                        real(8), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                    end function
                                    real(4) function fmin44(x, y) result (res)
                                        real(4), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                    end function
                                    real(8) function fmin84(x, y) result(res)
                                        real(8), intent (in) :: x
                                        real(4), intent (in) :: y
                                        res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                    end function
                                    real(8) function fmin48(x, y) result(res)
                                        real(4), intent (in) :: x
                                        real(8), intent (in) :: y
                                        res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                    end function
                                end module
                                
                                real(8) function code(x, y, z, t, a)
                                use fmin_fmax_functions
                                    real(8), intent (in) :: x
                                    real(8), intent (in) :: y
                                    real(8), intent (in) :: z
                                    real(8), intent (in) :: t
                                    real(8), intent (in) :: a
                                    real(8) :: tmp
                                    if (z <= 1.85d+223) then
                                        tmp = x
                                    else
                                        tmp = (z * y) / t
                                    end if
                                    code = tmp
                                end function
                                
                                public static double code(double x, double y, double z, double t, double a) {
                                	double tmp;
                                	if (z <= 1.85e+223) {
                                		tmp = x;
                                	} else {
                                		tmp = (z * y) / t;
                                	}
                                	return tmp;
                                }
                                
                                def code(x, y, z, t, a):
                                	tmp = 0
                                	if z <= 1.85e+223:
                                		tmp = x
                                	else:
                                		tmp = (z * y) / t
                                	return tmp
                                
                                function code(x, y, z, t, a)
                                	tmp = 0.0
                                	if (z <= 1.85e+223)
                                		tmp = x;
                                	else
                                		tmp = Float64(Float64(z * y) / t);
                                	end
                                	return tmp
                                end
                                
                                function tmp_2 = code(x, y, z, t, a)
                                	tmp = 0.0;
                                	if (z <= 1.85e+223)
                                		tmp = x;
                                	else
                                		tmp = (z * y) / t;
                                	end
                                	tmp_2 = tmp;
                                end
                                
                                code[x_, y_, z_, t_, a_] := If[LessEqual[z, 1.85e+223], x, N[(N[(z * y), $MachinePrecision] / t), $MachinePrecision]]
                                
                                \begin{array}{l}
                                
                                \\
                                \begin{array}{l}
                                \mathbf{if}\;z \leq 1.85 \cdot 10^{+223}:\\
                                \;\;\;\;x\\
                                
                                \mathbf{else}:\\
                                \;\;\;\;\frac{z \cdot y}{t}\\
                                
                                
                                \end{array}
                                \end{array}
                                
                                Derivation
                                1. Split input into 2 regimes
                                2. if z < 1.8500000000000001e223

                                  1. Initial program 73.6%

                                    \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                                  2. Add Preprocessing
                                  3. Taylor expanded in z around 0

                                    \[\leadsto \color{blue}{\left(x + y\right) - -1 \cdot \frac{t \cdot y}{a - t}} \]
                                  4. Step-by-step derivation
                                    1. fp-cancel-sub-sign-invN/A

                                      \[\leadsto \color{blue}{\left(x + y\right) + \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t}} \]
                                    2. +-commutativeN/A

                                      \[\leadsto \color{blue}{\left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t} + \left(x + y\right)} \]
                                    3. metadata-evalN/A

                                      \[\leadsto \color{blue}{1} \cdot \frac{t \cdot y}{a - t} + \left(x + y\right) \]
                                    4. *-lft-identityN/A

                                      \[\leadsto \color{blue}{\frac{t \cdot y}{a - t}} + \left(x + y\right) \]
                                    5. *-commutativeN/A

                                      \[\leadsto \frac{\color{blue}{y \cdot t}}{a - t} + \left(x + y\right) \]
                                    6. associate-/l*N/A

                                      \[\leadsto \color{blue}{y \cdot \frac{t}{a - t}} + \left(x + y\right) \]
                                    7. lower-fma.f64N/A

                                      \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, x + y\right)} \]
                                    8. lower-/.f64N/A

                                      \[\leadsto \mathsf{fma}\left(y, \color{blue}{\frac{t}{a - t}}, x + y\right) \]
                                    9. lower--.f64N/A

                                      \[\leadsto \mathsf{fma}\left(y, \frac{t}{\color{blue}{a - t}}, x + y\right) \]
                                    10. +-commutativeN/A

                                      \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                                    11. lower-+.f6467.3

                                      \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                                  5. Applied rewrites67.3%

                                    \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, y + x\right)} \]
                                  6. Taylor expanded in t around inf

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

                                      \[\leadsto \mathsf{fma}\left(0, \color{blue}{y}, x\right) \]
                                    2. Step-by-step derivation
                                      1. Applied rewrites57.1%

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

                                      if 1.8500000000000001e223 < z

                                      1. Initial program 84.1%

                                        \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                                      2. Add Preprocessing
                                      3. Taylor expanded in z around inf

                                        \[\leadsto \color{blue}{-1 \cdot \frac{y \cdot z}{a - t}} \]
                                      4. Step-by-step derivation
                                        1. mul-1-negN/A

                                          \[\leadsto \color{blue}{\mathsf{neg}\left(\frac{y \cdot z}{a - t}\right)} \]
                                        2. *-commutativeN/A

                                          \[\leadsto \mathsf{neg}\left(\frac{\color{blue}{z \cdot y}}{a - t}\right) \]
                                        3. associate-*r/N/A

                                          \[\leadsto \mathsf{neg}\left(\color{blue}{z \cdot \frac{y}{a - t}}\right) \]
                                        4. distribute-lft-neg-inN/A

                                          \[\leadsto \color{blue}{\left(\mathsf{neg}\left(z\right)\right) \cdot \frac{y}{a - t}} \]
                                        5. lower-*.f64N/A

                                          \[\leadsto \color{blue}{\left(\mathsf{neg}\left(z\right)\right) \cdot \frac{y}{a - t}} \]
                                        6. lower-neg.f64N/A

                                          \[\leadsto \color{blue}{\left(-z\right)} \cdot \frac{y}{a - t} \]
                                        7. lower-/.f64N/A

                                          \[\leadsto \left(-z\right) \cdot \color{blue}{\frac{y}{a - t}} \]
                                        8. lower--.f6472.5

                                          \[\leadsto \left(-z\right) \cdot \frac{y}{\color{blue}{a - t}} \]
                                      5. Applied rewrites72.5%

                                        \[\leadsto \color{blue}{\left(-z\right) \cdot \frac{y}{a - t}} \]
                                      6. Taylor expanded in t around inf

                                        \[\leadsto \frac{y \cdot z}{\color{blue}{t}} \]
                                      7. Step-by-step derivation
                                        1. Applied rewrites45.7%

                                          \[\leadsto \frac{z \cdot y}{\color{blue}{t}} \]
                                      8. Recombined 2 regimes into one program.
                                      9. Add Preprocessing

                                      Alternative 10: 50.9% accurate, 29.0× speedup?

                                      \[\begin{array}{l} \\ x \end{array} \]
                                      (FPCore (x y z t a) :precision binary64 x)
                                      double code(double x, double y, double z, double t, double a) {
                                      	return x;
                                      }
                                      
                                      module fmin_fmax_functions
                                          implicit none
                                          private
                                          public fmax
                                          public fmin
                                      
                                          interface fmax
                                              module procedure fmax88
                                              module procedure fmax44
                                              module procedure fmax84
                                              module procedure fmax48
                                          end interface
                                          interface fmin
                                              module procedure fmin88
                                              module procedure fmin44
                                              module procedure fmin84
                                              module procedure fmin48
                                          end interface
                                      contains
                                          real(8) function fmax88(x, y) result (res)
                                              real(8), intent (in) :: x
                                              real(8), intent (in) :: y
                                              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                          end function
                                          real(4) function fmax44(x, y) result (res)
                                              real(4), intent (in) :: x
                                              real(4), intent (in) :: y
                                              res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                          end function
                                          real(8) function fmax84(x, y) result(res)
                                              real(8), intent (in) :: x
                                              real(4), intent (in) :: y
                                              res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                          end function
                                          real(8) function fmax48(x, y) result(res)
                                              real(4), intent (in) :: x
                                              real(8), intent (in) :: y
                                              res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                          end function
                                          real(8) function fmin88(x, y) result (res)
                                              real(8), intent (in) :: x
                                              real(8), intent (in) :: y
                                              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                          end function
                                          real(4) function fmin44(x, y) result (res)
                                              real(4), intent (in) :: x
                                              real(4), intent (in) :: y
                                              res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                          end function
                                          real(8) function fmin84(x, y) result(res)
                                              real(8), intent (in) :: x
                                              real(4), intent (in) :: y
                                              res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                          end function
                                          real(8) function fmin48(x, y) result(res)
                                              real(4), intent (in) :: x
                                              real(8), intent (in) :: y
                                              res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                          end function
                                      end module
                                      
                                      real(8) function code(x, y, z, t, a)
                                      use fmin_fmax_functions
                                          real(8), intent (in) :: x
                                          real(8), intent (in) :: y
                                          real(8), intent (in) :: z
                                          real(8), intent (in) :: t
                                          real(8), intent (in) :: a
                                          code = x
                                      end function
                                      
                                      public static double code(double x, double y, double z, double t, double a) {
                                      	return x;
                                      }
                                      
                                      def code(x, y, z, t, a):
                                      	return x
                                      
                                      function code(x, y, z, t, a)
                                      	return x
                                      end
                                      
                                      function tmp = code(x, y, z, t, a)
                                      	tmp = x;
                                      end
                                      
                                      code[x_, y_, z_, t_, a_] := x
                                      
                                      \begin{array}{l}
                                      
                                      \\
                                      x
                                      \end{array}
                                      
                                      Derivation
                                      1. Initial program 74.6%

                                        \[\left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t} \]
                                      2. Add Preprocessing
                                      3. Taylor expanded in z around 0

                                        \[\leadsto \color{blue}{\left(x + y\right) - -1 \cdot \frac{t \cdot y}{a - t}} \]
                                      4. Step-by-step derivation
                                        1. fp-cancel-sub-sign-invN/A

                                          \[\leadsto \color{blue}{\left(x + y\right) + \left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t}} \]
                                        2. +-commutativeN/A

                                          \[\leadsto \color{blue}{\left(\mathsf{neg}\left(-1\right)\right) \cdot \frac{t \cdot y}{a - t} + \left(x + y\right)} \]
                                        3. metadata-evalN/A

                                          \[\leadsto \color{blue}{1} \cdot \frac{t \cdot y}{a - t} + \left(x + y\right) \]
                                        4. *-lft-identityN/A

                                          \[\leadsto \color{blue}{\frac{t \cdot y}{a - t}} + \left(x + y\right) \]
                                        5. *-commutativeN/A

                                          \[\leadsto \frac{\color{blue}{y \cdot t}}{a - t} + \left(x + y\right) \]
                                        6. associate-/l*N/A

                                          \[\leadsto \color{blue}{y \cdot \frac{t}{a - t}} + \left(x + y\right) \]
                                        7. lower-fma.f64N/A

                                          \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, x + y\right)} \]
                                        8. lower-/.f64N/A

                                          \[\leadsto \mathsf{fma}\left(y, \color{blue}{\frac{t}{a - t}}, x + y\right) \]
                                        9. lower--.f64N/A

                                          \[\leadsto \mathsf{fma}\left(y, \frac{t}{\color{blue}{a - t}}, x + y\right) \]
                                        10. +-commutativeN/A

                                          \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                                        11. lower-+.f6462.7

                                          \[\leadsto \mathsf{fma}\left(y, \frac{t}{a - t}, \color{blue}{y + x}\right) \]
                                      5. Applied rewrites62.7%

                                        \[\leadsto \color{blue}{\mathsf{fma}\left(y, \frac{t}{a - t}, y + x\right)} \]
                                      6. Taylor expanded in t around inf

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

                                          \[\leadsto \mathsf{fma}\left(0, \color{blue}{y}, x\right) \]
                                        2. Step-by-step derivation
                                          1. Applied rewrites53.2%

                                            \[\leadsto \color{blue}{x} \]
                                          2. Add Preprocessing

                                          Developer Target 1: 87.2% accurate, 0.3× speedup?

                                          \[\begin{array}{l} \\ \begin{array}{l} t_1 := \left(y + x\right) - \left(\left(z - t\right) \cdot \frac{1}{a - t}\right) \cdot y\\ t_2 := \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}\\ \mathbf{if}\;t\_2 < -1.3664970889390727 \cdot 10^{-7}:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;t\_2 < 1.4754293444577233 \cdot 10^{-239}:\\ \;\;\;\;\frac{y \cdot \left(a - z\right) - x \cdot t}{a - t}\\ \mathbf{else}:\\ \;\;\;\;t\_1\\ \end{array} \end{array} \]
                                          (FPCore (x y z t a)
                                           :precision binary64
                                           (let* ((t_1 (- (+ y x) (* (* (- z t) (/ 1.0 (- a t))) y)))
                                                  (t_2 (- (+ x y) (/ (* (- z t) y) (- a t)))))
                                             (if (< t_2 -1.3664970889390727e-7)
                                               t_1
                                               (if (< t_2 1.4754293444577233e-239)
                                                 (/ (- (* y (- a z)) (* x t)) (- a t))
                                                 t_1))))
                                          double code(double x, double y, double z, double t, double a) {
                                          	double t_1 = (y + x) - (((z - t) * (1.0 / (a - t))) * y);
                                          	double t_2 = (x + y) - (((z - t) * y) / (a - t));
                                          	double tmp;
                                          	if (t_2 < -1.3664970889390727e-7) {
                                          		tmp = t_1;
                                          	} else if (t_2 < 1.4754293444577233e-239) {
                                          		tmp = ((y * (a - z)) - (x * t)) / (a - t);
                                          	} else {
                                          		tmp = t_1;
                                          	}
                                          	return tmp;
                                          }
                                          
                                          module fmin_fmax_functions
                                              implicit none
                                              private
                                              public fmax
                                              public fmin
                                          
                                              interface fmax
                                                  module procedure fmax88
                                                  module procedure fmax44
                                                  module procedure fmax84
                                                  module procedure fmax48
                                              end interface
                                              interface fmin
                                                  module procedure fmin88
                                                  module procedure fmin44
                                                  module procedure fmin84
                                                  module procedure fmin48
                                              end interface
                                          contains
                                              real(8) function fmax88(x, y) result (res)
                                                  real(8), intent (in) :: x
                                                  real(8), intent (in) :: y
                                                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                              end function
                                              real(4) function fmax44(x, y) result (res)
                                                  real(4), intent (in) :: x
                                                  real(4), intent (in) :: y
                                                  res = merge(y, merge(x, max(x, y), y /= y), x /= x)
                                              end function
                                              real(8) function fmax84(x, y) result(res)
                                                  real(8), intent (in) :: x
                                                  real(4), intent (in) :: y
                                                  res = merge(dble(y), merge(x, max(x, dble(y)), y /= y), x /= x)
                                              end function
                                              real(8) function fmax48(x, y) result(res)
                                                  real(4), intent (in) :: x
                                                  real(8), intent (in) :: y
                                                  res = merge(y, merge(dble(x), max(dble(x), y), y /= y), x /= x)
                                              end function
                                              real(8) function fmin88(x, y) result (res)
                                                  real(8), intent (in) :: x
                                                  real(8), intent (in) :: y
                                                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                              end function
                                              real(4) function fmin44(x, y) result (res)
                                                  real(4), intent (in) :: x
                                                  real(4), intent (in) :: y
                                                  res = merge(y, merge(x, min(x, y), y /= y), x /= x)
                                              end function
                                              real(8) function fmin84(x, y) result(res)
                                                  real(8), intent (in) :: x
                                                  real(4), intent (in) :: y
                                                  res = merge(dble(y), merge(x, min(x, dble(y)), y /= y), x /= x)
                                              end function
                                              real(8) function fmin48(x, y) result(res)
                                                  real(4), intent (in) :: x
                                                  real(8), intent (in) :: y
                                                  res = merge(y, merge(dble(x), min(dble(x), y), y /= y), x /= x)
                                              end function
                                          end module
                                          
                                          real(8) function code(x, y, z, t, a)
                                          use fmin_fmax_functions
                                              real(8), intent (in) :: x
                                              real(8), intent (in) :: y
                                              real(8), intent (in) :: z
                                              real(8), intent (in) :: t
                                              real(8), intent (in) :: a
                                              real(8) :: t_1
                                              real(8) :: t_2
                                              real(8) :: tmp
                                              t_1 = (y + x) - (((z - t) * (1.0d0 / (a - t))) * y)
                                              t_2 = (x + y) - (((z - t) * y) / (a - t))
                                              if (t_2 < (-1.3664970889390727d-7)) then
                                                  tmp = t_1
                                              else if (t_2 < 1.4754293444577233d-239) then
                                                  tmp = ((y * (a - z)) - (x * t)) / (a - t)
                                              else
                                                  tmp = t_1
                                              end if
                                              code = tmp
                                          end function
                                          
                                          public static double code(double x, double y, double z, double t, double a) {
                                          	double t_1 = (y + x) - (((z - t) * (1.0 / (a - t))) * y);
                                          	double t_2 = (x + y) - (((z - t) * y) / (a - t));
                                          	double tmp;
                                          	if (t_2 < -1.3664970889390727e-7) {
                                          		tmp = t_1;
                                          	} else if (t_2 < 1.4754293444577233e-239) {
                                          		tmp = ((y * (a - z)) - (x * t)) / (a - t);
                                          	} else {
                                          		tmp = t_1;
                                          	}
                                          	return tmp;
                                          }
                                          
                                          def code(x, y, z, t, a):
                                          	t_1 = (y + x) - (((z - t) * (1.0 / (a - t))) * y)
                                          	t_2 = (x + y) - (((z - t) * y) / (a - t))
                                          	tmp = 0
                                          	if t_2 < -1.3664970889390727e-7:
                                          		tmp = t_1
                                          	elif t_2 < 1.4754293444577233e-239:
                                          		tmp = ((y * (a - z)) - (x * t)) / (a - t)
                                          	else:
                                          		tmp = t_1
                                          	return tmp
                                          
                                          function code(x, y, z, t, a)
                                          	t_1 = Float64(Float64(y + x) - Float64(Float64(Float64(z - t) * Float64(1.0 / Float64(a - t))) * y))
                                          	t_2 = Float64(Float64(x + y) - Float64(Float64(Float64(z - t) * y) / Float64(a - t)))
                                          	tmp = 0.0
                                          	if (t_2 < -1.3664970889390727e-7)
                                          		tmp = t_1;
                                          	elseif (t_2 < 1.4754293444577233e-239)
                                          		tmp = Float64(Float64(Float64(y * Float64(a - z)) - Float64(x * t)) / Float64(a - t));
                                          	else
                                          		tmp = t_1;
                                          	end
                                          	return tmp
                                          end
                                          
                                          function tmp_2 = code(x, y, z, t, a)
                                          	t_1 = (y + x) - (((z - t) * (1.0 / (a - t))) * y);
                                          	t_2 = (x + y) - (((z - t) * y) / (a - t));
                                          	tmp = 0.0;
                                          	if (t_2 < -1.3664970889390727e-7)
                                          		tmp = t_1;
                                          	elseif (t_2 < 1.4754293444577233e-239)
                                          		tmp = ((y * (a - z)) - (x * t)) / (a - t);
                                          	else
                                          		tmp = t_1;
                                          	end
                                          	tmp_2 = tmp;
                                          end
                                          
                                          code[x_, y_, z_, t_, a_] := Block[{t$95$1 = N[(N[(y + x), $MachinePrecision] - N[(N[(N[(z - t), $MachinePrecision] * N[(1.0 / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * y), $MachinePrecision]), $MachinePrecision]}, Block[{t$95$2 = N[(N[(x + y), $MachinePrecision] - N[(N[(N[(z - t), $MachinePrecision] * y), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]}, If[Less[t$95$2, -1.3664970889390727e-7], t$95$1, If[Less[t$95$2, 1.4754293444577233e-239], N[(N[(N[(y * N[(a - z), $MachinePrecision]), $MachinePrecision] - N[(x * t), $MachinePrecision]), $MachinePrecision] / N[(a - t), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
                                          
                                          \begin{array}{l}
                                          
                                          \\
                                          \begin{array}{l}
                                          t_1 := \left(y + x\right) - \left(\left(z - t\right) \cdot \frac{1}{a - t}\right) \cdot y\\
                                          t_2 := \left(x + y\right) - \frac{\left(z - t\right) \cdot y}{a - t}\\
                                          \mathbf{if}\;t\_2 < -1.3664970889390727 \cdot 10^{-7}:\\
                                          \;\;\;\;t\_1\\
                                          
                                          \mathbf{elif}\;t\_2 < 1.4754293444577233 \cdot 10^{-239}:\\
                                          \;\;\;\;\frac{y \cdot \left(a - z\right) - x \cdot t}{a - t}\\
                                          
                                          \mathbf{else}:\\
                                          \;\;\;\;t\_1\\
                                          
                                          
                                          \end{array}
                                          \end{array}
                                          

                                          Reproduce

                                          ?
                                          herbie shell --seed 2025017 
                                          (FPCore (x y z t a)
                                            :name "Graphics.Rendering.Plot.Render.Plot.Axis:renderAxisTick from plot-0.2.3.4, B"
                                            :precision binary64
                                          
                                            :alt
                                            (! :herbie-platform default (if (< (- (+ x y) (/ (* (- z t) y) (- a t))) -13664970889390727/100000000000000000000000) (- (+ y x) (* (* (- z t) (/ 1 (- a t))) y)) (if (< (- (+ x y) (/ (* (- z t) y) (- a t))) 14754293444577233/1000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000) (/ (- (* y (- a z)) (* x t)) (- a t)) (- (+ y x) (* (* (- z t) (/ 1 (- a t))) y)))))
                                          
                                            (- (+ x y) (/ (* (- z t) y) (- a t))))