tan-example (used to crash)

Percentage Accurate: 79.7% → 99.7%
Time: 28.4s
Alternatives: 10
Speedup: 1.0×

Specification

?
\[\left(\left(\left(x = 0 \lor 0.5884142 \leq x \land x \leq 505.5909\right) \land \left(-1.796658 \cdot 10^{+308} \leq y \land y \leq -9.425585 \cdot 10^{-310} \lor 1.284938 \cdot 10^{-309} \leq y \land y \leq 1.751224 \cdot 10^{+308}\right)\right) \land \left(-1.776707 \cdot 10^{+308} \leq z \land z \leq -8.599796 \cdot 10^{-310} \lor 3.293145 \cdot 10^{-311} \leq z \land z \leq 1.725154 \cdot 10^{+308}\right)\right) \land \left(-1.796658 \cdot 10^{+308} \leq a \land a \leq -9.425585 \cdot 10^{-310} \lor 1.284938 \cdot 10^{-309} \leq a \land a \leq 1.751224 \cdot 10^{+308}\right)\]
\[\begin{array}{l} \\ x + \left(\tan \left(y + z\right) - \tan a\right) \end{array} \]
(FPCore (x y z a) :precision binary64 (+ x (- (tan (+ y z)) (tan a))))
double code(double x, double y, double z, double a) {
	return x + (tan((y + z)) - tan(a));
}
real(8) function code(x, y, z, a)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: a
    code = x + (tan((y + z)) - tan(a))
end function
public static double code(double x, double y, double z, double a) {
	return x + (Math.tan((y + z)) - Math.tan(a));
}
def code(x, y, z, a):
	return x + (math.tan((y + z)) - math.tan(a))
function code(x, y, z, a)
	return Float64(x + Float64(tan(Float64(y + z)) - tan(a)))
end
function tmp = code(x, y, z, a)
	tmp = x + (tan((y + z)) - tan(a));
end
code[x_, y_, z_, a_] := N[(x + N[(N[Tan[N[(y + z), $MachinePrecision]], $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
x + \left(\tan \left(y + z\right) - \tan a\right)
\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: 79.7% accurate, 1.0× speedup?

\[\begin{array}{l} \\ x + \left(\tan \left(y + z\right) - \tan a\right) \end{array} \]
(FPCore (x y z a) :precision binary64 (+ x (- (tan (+ y z)) (tan a))))
double code(double x, double y, double z, double a) {
	return x + (tan((y + z)) - tan(a));
}
real(8) function code(x, y, z, a)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: a
    code = x + (tan((y + z)) - tan(a))
end function
public static double code(double x, double y, double z, double a) {
	return x + (Math.tan((y + z)) - Math.tan(a));
}
def code(x, y, z, a):
	return x + (math.tan((y + z)) - math.tan(a))
function code(x, y, z, a)
	return Float64(x + Float64(tan(Float64(y + z)) - tan(a)))
end
function tmp = code(x, y, z, a)
	tmp = x + (tan((y + z)) - tan(a));
end
code[x_, y_, z_, a_] := N[(x + N[(N[Tan[N[(y + z), $MachinePrecision]], $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}

\\
x + \left(\tan \left(y + z\right) - \tan a\right)
\end{array}

Alternative 1: 99.7% accurate, 0.2× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \mathsf{fma}\left(-\tan z, \tan y, 1\right)\\ \mathsf{fma}\left(\cos a \cdot \left(\tan y + \tan z\right) - \sin a \cdot t\_0, \frac{1}{t\_0 \cdot \cos a}, x\right) \end{array} \end{array} \]
(FPCore (x y z a)
 :precision binary64
 (let* ((t_0 (fma (- (tan z)) (tan y) 1.0)))
   (fma
    (- (* (cos a) (+ (tan y) (tan z))) (* (sin a) t_0))
    (/ 1.0 (* t_0 (cos a)))
    x)))
double code(double x, double y, double z, double a) {
	double t_0 = fma(-tan(z), tan(y), 1.0);
	return fma(((cos(a) * (tan(y) + tan(z))) - (sin(a) * t_0)), (1.0 / (t_0 * cos(a))), x);
}
function code(x, y, z, a)
	t_0 = fma(Float64(-tan(z)), tan(y), 1.0)
	return fma(Float64(Float64(cos(a) * Float64(tan(y) + tan(z))) - Float64(sin(a) * t_0)), Float64(1.0 / Float64(t_0 * cos(a))), x)
end
code[x_, y_, z_, a_] := Block[{t$95$0 = N[((-N[Tan[z], $MachinePrecision]) * N[Tan[y], $MachinePrecision] + 1.0), $MachinePrecision]}, N[(N[(N[(N[Cos[a], $MachinePrecision] * N[(N[Tan[y], $MachinePrecision] + N[Tan[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[Sin[a], $MachinePrecision] * t$95$0), $MachinePrecision]), $MachinePrecision] * N[(1.0 / N[(t$95$0 * N[Cos[a], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \mathsf{fma}\left(-\tan z, \tan y, 1\right)\\
\mathsf{fma}\left(\cos a \cdot \left(\tan y + \tan z\right) - \sin a \cdot t\_0, \frac{1}{t\_0 \cdot \cos a}, x\right)
\end{array}
\end{array}
Derivation
  1. Initial program 78.5%

    \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-+.f64N/A

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

      \[\leadsto \color{blue}{\left(\tan \left(y + z\right) - \tan a\right) + x} \]
    3. lift--.f64N/A

      \[\leadsto \color{blue}{\left(\tan \left(y + z\right) - \tan a\right)} + x \]
    4. lift-tan.f64N/A

      \[\leadsto \left(\color{blue}{\tan \left(y + z\right)} - \tan a\right) + x \]
    5. lift-+.f64N/A

      \[\leadsto \left(\tan \color{blue}{\left(y + z\right)} - \tan a\right) + x \]
    6. tan-sumN/A

      \[\leadsto \left(\color{blue}{\frac{\tan y + \tan z}{1 - \tan y \cdot \tan z}} - \tan a\right) + x \]
    7. lift-tan.f64N/A

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

      \[\leadsto \left(\frac{\tan y + \tan z}{1 - \tan y \cdot \tan z} - \color{blue}{\frac{\sin a}{\cos a}}\right) + x \]
    9. frac-subN/A

      \[\leadsto \color{blue}{\frac{\left(\tan y + \tan z\right) \cdot \cos a - \left(1 - \tan y \cdot \tan z\right) \cdot \sin a}{\left(1 - \tan y \cdot \tan z\right) \cdot \cos a}} + x \]
    10. div-invN/A

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

      \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\tan y + \tan z\right) \cdot \cos a - \left(1 - \tan y \cdot \tan z\right) \cdot \sin a, \frac{1}{\left(1 - \tan y \cdot \tan z\right) \cdot \cos a}, x\right)} \]
  4. Applied rewrites99.7%

    \[\leadsto \color{blue}{\mathsf{fma}\left(\left(\tan z + \tan y\right) \cdot \cos a - \mathsf{fma}\left(-\tan z, \tan y, 1\right) \cdot \sin a, \frac{1}{\mathsf{fma}\left(-\tan z, \tan y, 1\right) \cdot \cos a}, x\right)} \]
  5. Final simplification99.7%

    \[\leadsto \mathsf{fma}\left(\cos a \cdot \left(\tan y + \tan z\right) - \sin a \cdot \mathsf{fma}\left(-\tan z, \tan y, 1\right), \frac{1}{\mathsf{fma}\left(-\tan z, \tan y, 1\right) \cdot \cos a}, x\right) \]
  6. Add Preprocessing

Alternative 2: 99.7% accurate, 0.4× speedup?

\[\begin{array}{l} \\ \left(\frac{\tan y + \tan z}{\mathsf{fma}\left(-\tan z, \tan y, 1\right)} - \tan a\right) + x \end{array} \]
(FPCore (x y z a)
 :precision binary64
 (+ (- (/ (+ (tan y) (tan z)) (fma (- (tan z)) (tan y) 1.0)) (tan a)) x))
double code(double x, double y, double z, double a) {
	return (((tan(y) + tan(z)) / fma(-tan(z), tan(y), 1.0)) - tan(a)) + x;
}
function code(x, y, z, a)
	return Float64(Float64(Float64(Float64(tan(y) + tan(z)) / fma(Float64(-tan(z)), tan(y), 1.0)) - tan(a)) + x)
end
code[x_, y_, z_, a_] := N[(N[(N[(N[(N[Tan[y], $MachinePrecision] + N[Tan[z], $MachinePrecision]), $MachinePrecision] / N[((-N[Tan[z], $MachinePrecision]) * N[Tan[y], $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}

\\
\left(\frac{\tan y + \tan z}{\mathsf{fma}\left(-\tan z, \tan y, 1\right)} - \tan a\right) + x
\end{array}
Derivation
  1. Initial program 78.5%

    \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-tan.f64N/A

      \[\leadsto x + \left(\color{blue}{\tan \left(y + z\right)} - \tan a\right) \]
    2. lift-+.f64N/A

      \[\leadsto x + \left(\tan \color{blue}{\left(y + z\right)} - \tan a\right) \]
    3. tan-sumN/A

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

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

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

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

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

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

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

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\left(\mathsf{neg}\left(\color{blue}{\tan z \cdot \tan y}\right)\right) + 1} - \tan a\right) \]
    12. distribute-lft-neg-inN/A

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

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

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\color{blue}{\tan z}, \tan y, 1\right)} - \tan a\right) \]
    16. lower-tan.f6499.7

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\tan z, \color{blue}{\tan y}, 1\right)} - \tan a\right) \]
  4. Applied rewrites99.7%

    \[\leadsto x + \left(\color{blue}{\frac{\tan z + \tan y}{\mathsf{fma}\left(-\tan z, \tan y, 1\right)}} - \tan a\right) \]
  5. Final simplification99.7%

    \[\leadsto \left(\frac{\tan y + \tan z}{\mathsf{fma}\left(-\tan z, \tan y, 1\right)} - \tan a\right) + x \]
  6. Add Preprocessing

Alternative 3: 99.7% accurate, 0.4× speedup?

\[\begin{array}{l} \\ \left(\frac{\tan y + \tan z}{1 - \tan y \cdot \tan z} - \tan a\right) + x \end{array} \]
(FPCore (x y z a)
 :precision binary64
 (+ (- (/ (+ (tan y) (tan z)) (- 1.0 (* (tan y) (tan z)))) (tan a)) x))
double code(double x, double y, double z, double a) {
	return (((tan(y) + tan(z)) / (1.0 - (tan(y) * tan(z)))) - tan(a)) + x;
}
real(8) function code(x, y, z, a)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    real(8), intent (in) :: a
    code = (((tan(y) + tan(z)) / (1.0d0 - (tan(y) * tan(z)))) - tan(a)) + x
end function
public static double code(double x, double y, double z, double a) {
	return (((Math.tan(y) + Math.tan(z)) / (1.0 - (Math.tan(y) * Math.tan(z)))) - Math.tan(a)) + x;
}
def code(x, y, z, a):
	return (((math.tan(y) + math.tan(z)) / (1.0 - (math.tan(y) * math.tan(z)))) - math.tan(a)) + x
function code(x, y, z, a)
	return Float64(Float64(Float64(Float64(tan(y) + tan(z)) / Float64(1.0 - Float64(tan(y) * tan(z)))) - tan(a)) + x)
end
function tmp = code(x, y, z, a)
	tmp = (((tan(y) + tan(z)) / (1.0 - (tan(y) * tan(z)))) - tan(a)) + x;
end
code[x_, y_, z_, a_] := N[(N[(N[(N[(N[Tan[y], $MachinePrecision] + N[Tan[z], $MachinePrecision]), $MachinePrecision] / N[(1.0 - N[(N[Tan[y], $MachinePrecision] * N[Tan[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]
\begin{array}{l}

\\
\left(\frac{\tan y + \tan z}{1 - \tan y \cdot \tan z} - \tan a\right) + x
\end{array}
Derivation
  1. Initial program 78.5%

    \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
  2. Add Preprocessing
  3. Step-by-step derivation
    1. lift-tan.f64N/A

      \[\leadsto x + \left(\color{blue}{\tan \left(y + z\right)} - \tan a\right) \]
    2. lift-+.f64N/A

      \[\leadsto x + \left(\tan \color{blue}{\left(y + z\right)} - \tan a\right) \]
    3. tan-sumN/A

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

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

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

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

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

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

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

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\left(\mathsf{neg}\left(\color{blue}{\tan z \cdot \tan y}\right)\right) + 1} - \tan a\right) \]
    12. distribute-lft-neg-inN/A

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

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

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\color{blue}{\tan z}, \tan y, 1\right)} - \tan a\right) \]
    16. lower-tan.f6499.7

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\tan z, \color{blue}{\tan y}, 1\right)} - \tan a\right) \]
  4. Applied rewrites99.7%

    \[\leadsto x + \left(\color{blue}{\frac{\tan z + \tan y}{\mathsf{fma}\left(-\tan z, \tan y, 1\right)}} - \tan a\right) \]
  5. Step-by-step derivation
    1. lift-fma.f64N/A

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\color{blue}{1 + \left(-\tan z\right) \cdot \tan y}} - \tan a\right) \]
    3. lift-neg.f64N/A

      \[\leadsto x + \left(\frac{\tan z + \tan y}{1 + \color{blue}{\left(\mathsf{neg}\left(\tan z\right)\right)} \cdot \tan y} - \tan a\right) \]
    4. cancel-sign-sub-invN/A

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{1 - \color{blue}{\tan z} \cdot \tan y} - \tan a\right) \]
    6. lift-tan.f64N/A

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\color{blue}{1 - \tan z \cdot \tan y}} - \tan a\right) \]
    8. lift-tan.f64N/A

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

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{1 - \color{blue}{\tan y \cdot \tan z}} - \tan a\right) \]
    11. lower-*.f6499.7

      \[\leadsto x + \left(\frac{\tan z + \tan y}{1 - \color{blue}{\tan y \cdot \tan z}} - \tan a\right) \]
  6. Applied rewrites99.7%

    \[\leadsto x + \left(\frac{\tan z + \tan y}{\color{blue}{1 - \tan y \cdot \tan z}} - \tan a\right) \]
  7. Final simplification99.7%

    \[\leadsto \left(\frac{\tan y + \tan z}{1 - \tan y \cdot \tan z} - \tan a\right) + x \]
  8. Add Preprocessing

Alternative 4: 89.8% accurate, 0.5× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \tan y + \tan z\\ t_1 := \left(\frac{t\_0}{1} - \tan a\right) + x\\ \mathbf{if}\;a \leq -9 \cdot 10^{-5}:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;a \leq 0.00335:\\ \;\;\;\;\mathsf{fma}\left(t\_0, \frac{-1}{\mathsf{fma}\left(\tan y, \tan z, -1\right)}, -\left(a - x\right)\right)\\ \mathbf{else}:\\ \;\;\;\;t\_1\\ \end{array} \end{array} \]
(FPCore (x y z a)
 :precision binary64
 (let* ((t_0 (+ (tan y) (tan z))) (t_1 (+ (- (/ t_0 1.0) (tan a)) x)))
   (if (<= a -9e-5)
     t_1
     (if (<= a 0.00335)
       (fma t_0 (/ -1.0 (fma (tan y) (tan z) -1.0)) (- (- a x)))
       t_1))))
double code(double x, double y, double z, double a) {
	double t_0 = tan(y) + tan(z);
	double t_1 = ((t_0 / 1.0) - tan(a)) + x;
	double tmp;
	if (a <= -9e-5) {
		tmp = t_1;
	} else if (a <= 0.00335) {
		tmp = fma(t_0, (-1.0 / fma(tan(y), tan(z), -1.0)), -(a - x));
	} else {
		tmp = t_1;
	}
	return tmp;
}
function code(x, y, z, a)
	t_0 = Float64(tan(y) + tan(z))
	t_1 = Float64(Float64(Float64(t_0 / 1.0) - tan(a)) + x)
	tmp = 0.0
	if (a <= -9e-5)
		tmp = t_1;
	elseif (a <= 0.00335)
		tmp = fma(t_0, Float64(-1.0 / fma(tan(y), tan(z), -1.0)), Float64(-Float64(a - x)));
	else
		tmp = t_1;
	end
	return tmp
end
code[x_, y_, z_, a_] := Block[{t$95$0 = N[(N[Tan[y], $MachinePrecision] + N[Tan[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(t$95$0 / 1.0), $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]}, If[LessEqual[a, -9e-5], t$95$1, If[LessEqual[a, 0.00335], N[(t$95$0 * N[(-1.0 / N[(N[Tan[y], $MachinePrecision] * N[Tan[z], $MachinePrecision] + -1.0), $MachinePrecision]), $MachinePrecision] + (-N[(a - x), $MachinePrecision])), $MachinePrecision], t$95$1]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \tan y + \tan z\\
t_1 := \left(\frac{t\_0}{1} - \tan a\right) + x\\
\mathbf{if}\;a \leq -9 \cdot 10^{-5}:\\
\;\;\;\;t\_1\\

\mathbf{elif}\;a \leq 0.00335:\\
\;\;\;\;\mathsf{fma}\left(t\_0, \frac{-1}{\mathsf{fma}\left(\tan y, \tan z, -1\right)}, -\left(a - x\right)\right)\\

\mathbf{else}:\\
\;\;\;\;t\_1\\


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if a < -9.00000000000000057e-5 or 0.00335000000000000011 < a

    1. Initial program 81.7%

      \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
    2. Add Preprocessing
    3. Step-by-step derivation
      1. lift-tan.f64N/A

        \[\leadsto x + \left(\color{blue}{\tan \left(y + z\right)} - \tan a\right) \]
      2. lift-+.f64N/A

        \[\leadsto x + \left(\tan \color{blue}{\left(y + z\right)} - \tan a\right) \]
      3. tan-sumN/A

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

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

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

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

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

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

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

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

        \[\leadsto x + \left(\frac{\tan z + \tan y}{\left(\mathsf{neg}\left(\color{blue}{\tan z \cdot \tan y}\right)\right) + 1} - \tan a\right) \]
      12. distribute-lft-neg-inN/A

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

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

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

        \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\color{blue}{\tan z}, \tan y, 1\right)} - \tan a\right) \]
      16. lower-tan.f6499.6

        \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\tan z, \color{blue}{\tan y}, 1\right)} - \tan a\right) \]
    4. Applied rewrites99.6%

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

      \[\leadsto x + \left(\frac{\tan z + \tan y}{\color{blue}{1}} - \tan a\right) \]
    6. Step-by-step derivation
      1. Applied rewrites82.4%

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

      if -9.00000000000000057e-5 < a < 0.00335000000000000011

      1. Initial program 75.0%

        \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
      2. Add Preprocessing
      3. Step-by-step derivation
        1. lift-+.f64N/A

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

          \[\leadsto \color{blue}{\left(\tan \left(y + z\right) - \tan a\right) + x} \]
        3. lift--.f64N/A

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

          \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
        5. lower--.f64N/A

          \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
        6. lift-+.f64N/A

          \[\leadsto \tan \color{blue}{\left(y + z\right)} - \left(\tan a - x\right) \]
        7. +-commutativeN/A

          \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
        8. lower-+.f64N/A

          \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
        9. lower--.f6475.0

          \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(\tan a - x\right)} \]
      4. Applied rewrites75.0%

        \[\leadsto \color{blue}{\tan \left(z + y\right) - \left(\tan a - x\right)} \]
      5. Taylor expanded in a around 0

        \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(a - x\right)} \]
      6. Step-by-step derivation
        1. lower--.f6475.0

          \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(a - x\right)} \]
      7. Applied rewrites75.0%

        \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(a - x\right)} \]
      8. Step-by-step derivation
        1. lift--.f64N/A

          \[\leadsto \color{blue}{\tan \left(z + y\right) - \left(a - x\right)} \]
        2. sub-negN/A

          \[\leadsto \color{blue}{\tan \left(z + y\right) + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right)} \]
        3. lift-tan.f64N/A

          \[\leadsto \color{blue}{\tan \left(z + y\right)} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        4. lift-+.f64N/A

          \[\leadsto \tan \color{blue}{\left(z + y\right)} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        5. tan-sumN/A

          \[\leadsto \color{blue}{\frac{\tan z + \tan y}{1 - \tan z \cdot \tan y}} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        6. lift-tan.f64N/A

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

          \[\leadsto \frac{\tan z + \color{blue}{\tan y}}{1 - \tan z \cdot \tan y} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        8. lift-+.f64N/A

          \[\leadsto \frac{\color{blue}{\tan z + \tan y}}{1 - \tan z \cdot \tan y} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        9. div-invN/A

          \[\leadsto \color{blue}{\left(\tan z + \tan y\right) \cdot \frac{1}{1 - \tan z \cdot \tan y}} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        10. lift-tan.f64N/A

          \[\leadsto \left(\tan z + \tan y\right) \cdot \frac{1}{1 - \color{blue}{\tan z} \cdot \tan y} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        11. lift-tan.f64N/A

          \[\leadsto \left(\tan z + \tan y\right) \cdot \frac{1}{1 - \tan z \cdot \color{blue}{\tan y}} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        12. cancel-sign-sub-invN/A

          \[\leadsto \left(\tan z + \tan y\right) \cdot \frac{1}{\color{blue}{1 + \left(\mathsf{neg}\left(\tan z\right)\right) \cdot \tan y}} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        13. lift-neg.f64N/A

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

          \[\leadsto \left(\tan z + \tan y\right) \cdot \frac{1}{\color{blue}{\left(-\tan z\right) \cdot \tan y + 1}} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
        15. lift-fma.f64N/A

          \[\leadsto \left(\tan z + \tan y\right) \cdot \frac{1}{\color{blue}{\mathsf{fma}\left(-\tan z, \tan y, 1\right)}} + \left(\mathsf{neg}\left(\left(a - x\right)\right)\right) \]
      9. Applied rewrites99.8%

        \[\leadsto \color{blue}{\mathsf{fma}\left(\tan y + \tan z, \frac{-1}{\mathsf{fma}\left(\tan y, \tan z, -1\right)}, -\left(a - x\right)\right)} \]
    7. Recombined 2 regimes into one program.
    8. Final simplification90.6%

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

    Alternative 5: 89.8% accurate, 0.5× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \tan y + \tan z\\ t_1 := \left(\frac{t\_0}{1} - \tan a\right) + x\\ \mathbf{if}\;a \leq -9 \cdot 10^{-5}:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;a \leq 0.00335:\\ \;\;\;\;\frac{t\_0}{-\mathsf{fma}\left(\tan y, \tan z, -1\right)} - \left(a - x\right)\\ \mathbf{else}:\\ \;\;\;\;t\_1\\ \end{array} \end{array} \]
    (FPCore (x y z a)
     :precision binary64
     (let* ((t_0 (+ (tan y) (tan z))) (t_1 (+ (- (/ t_0 1.0) (tan a)) x)))
       (if (<= a -9e-5)
         t_1
         (if (<= a 0.00335)
           (- (/ t_0 (- (fma (tan y) (tan z) -1.0))) (- a x))
           t_1))))
    double code(double x, double y, double z, double a) {
    	double t_0 = tan(y) + tan(z);
    	double t_1 = ((t_0 / 1.0) - tan(a)) + x;
    	double tmp;
    	if (a <= -9e-5) {
    		tmp = t_1;
    	} else if (a <= 0.00335) {
    		tmp = (t_0 / -fma(tan(y), tan(z), -1.0)) - (a - x);
    	} else {
    		tmp = t_1;
    	}
    	return tmp;
    }
    
    function code(x, y, z, a)
    	t_0 = Float64(tan(y) + tan(z))
    	t_1 = Float64(Float64(Float64(t_0 / 1.0) - tan(a)) + x)
    	tmp = 0.0
    	if (a <= -9e-5)
    		tmp = t_1;
    	elseif (a <= 0.00335)
    		tmp = Float64(Float64(t_0 / Float64(-fma(tan(y), tan(z), -1.0))) - Float64(a - x));
    	else
    		tmp = t_1;
    	end
    	return tmp
    end
    
    code[x_, y_, z_, a_] := Block[{t$95$0 = N[(N[Tan[y], $MachinePrecision] + N[Tan[z], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$1 = N[(N[(N[(t$95$0 / 1.0), $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]}, If[LessEqual[a, -9e-5], t$95$1, If[LessEqual[a, 0.00335], N[(N[(t$95$0 / (-N[(N[Tan[y], $MachinePrecision] * N[Tan[z], $MachinePrecision] + -1.0), $MachinePrecision])), $MachinePrecision] - N[(a - x), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \tan y + \tan z\\
    t_1 := \left(\frac{t\_0}{1} - \tan a\right) + x\\
    \mathbf{if}\;a \leq -9 \cdot 10^{-5}:\\
    \;\;\;\;t\_1\\
    
    \mathbf{elif}\;a \leq 0.00335:\\
    \;\;\;\;\frac{t\_0}{-\mathsf{fma}\left(\tan y, \tan z, -1\right)} - \left(a - x\right)\\
    
    \mathbf{else}:\\
    \;\;\;\;t\_1\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if a < -9.00000000000000057e-5 or 0.00335000000000000011 < a

      1. Initial program 81.7%

        \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
      2. Add Preprocessing
      3. Step-by-step derivation
        1. lift-tan.f64N/A

          \[\leadsto x + \left(\color{blue}{\tan \left(y + z\right)} - \tan a\right) \]
        2. lift-+.f64N/A

          \[\leadsto x + \left(\tan \color{blue}{\left(y + z\right)} - \tan a\right) \]
        3. tan-sumN/A

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

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

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

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

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

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

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

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

          \[\leadsto x + \left(\frac{\tan z + \tan y}{\left(\mathsf{neg}\left(\color{blue}{\tan z \cdot \tan y}\right)\right) + 1} - \tan a\right) \]
        12. distribute-lft-neg-inN/A

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

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

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

          \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\color{blue}{\tan z}, \tan y, 1\right)} - \tan a\right) \]
        16. lower-tan.f6499.6

          \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\tan z, \color{blue}{\tan y}, 1\right)} - \tan a\right) \]
      4. Applied rewrites99.6%

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

        \[\leadsto x + \left(\frac{\tan z + \tan y}{\color{blue}{1}} - \tan a\right) \]
      6. Step-by-step derivation
        1. Applied rewrites82.4%

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

        if -9.00000000000000057e-5 < a < 0.00335000000000000011

        1. Initial program 75.0%

          \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-+.f64N/A

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

            \[\leadsto \color{blue}{\left(\tan \left(y + z\right) - \tan a\right) + x} \]
          3. lift--.f64N/A

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

            \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
          5. lower--.f64N/A

            \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
          6. lift-+.f64N/A

            \[\leadsto \tan \color{blue}{\left(y + z\right)} - \left(\tan a - x\right) \]
          7. +-commutativeN/A

            \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
          8. lower-+.f64N/A

            \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
          9. lower--.f6475.0

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(\tan a - x\right)} \]
        4. Applied rewrites75.0%

          \[\leadsto \color{blue}{\tan \left(z + y\right) - \left(\tan a - x\right)} \]
        5. Taylor expanded in a around 0

          \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(a - x\right)} \]
        6. Step-by-step derivation
          1. lower--.f6475.0

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(a - x\right)} \]
        7. Applied rewrites75.0%

          \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(a - x\right)} \]
        8. Step-by-step derivation
          1. lift-tan.f64N/A

            \[\leadsto \color{blue}{\tan \left(z + y\right)} - \left(a - x\right) \]
          2. lift-+.f64N/A

            \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(a - x\right) \]
          3. tan-sumN/A

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

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

            \[\leadsto \frac{\tan z + \color{blue}{\tan y}}{1 - \tan z \cdot \tan y} - \left(a - x\right) \]
          6. lift-+.f64N/A

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

            \[\leadsto \color{blue}{\frac{\tan z + \tan y}{1 - \tan z \cdot \tan y}} - \left(a - x\right) \]
          8. lift-+.f64N/A

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

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

            \[\leadsto \frac{\color{blue}{\tan y + \tan z}}{1 - \tan z \cdot \tan y} - \left(a - x\right) \]
          11. lift-tan.f64N/A

            \[\leadsto \frac{\tan y + \tan z}{1 - \color{blue}{\tan z} \cdot \tan y} - \left(a - x\right) \]
          12. lift-tan.f64N/A

            \[\leadsto \frac{\tan y + \tan z}{1 - \tan z \cdot \color{blue}{\tan y}} - \left(a - x\right) \]
          13. cancel-sign-sub-invN/A

            \[\leadsto \frac{\tan y + \tan z}{\color{blue}{1 + \left(\mathsf{neg}\left(\tan z\right)\right) \cdot \tan y}} - \left(a - x\right) \]
          14. lift-neg.f64N/A

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

            \[\leadsto \frac{\tan y + \tan z}{\color{blue}{\left(-\tan z\right) \cdot \tan y + 1}} - \left(a - x\right) \]
          16. lift-neg.f64N/A

            \[\leadsto \frac{\tan y + \tan z}{\color{blue}{\left(\mathsf{neg}\left(\tan z\right)\right)} \cdot \tan y + 1} - \left(a - x\right) \]
          17. distribute-lft-neg-outN/A

            \[\leadsto \frac{\tan y + \tan z}{\color{blue}{\left(\mathsf{neg}\left(\tan z \cdot \tan y\right)\right)} + 1} - \left(a - x\right) \]
          18. lift-tan.f64N/A

            \[\leadsto \frac{\tan y + \tan z}{\left(\mathsf{neg}\left(\color{blue}{\tan z} \cdot \tan y\right)\right) + 1} - \left(a - x\right) \]
          19. lift-tan.f64N/A

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

            \[\leadsto \frac{\tan y + \tan z}{\left(\mathsf{neg}\left(\tan z \cdot \tan y\right)\right) + \color{blue}{\left(\mathsf{neg}\left(-1\right)\right)}} - \left(a - x\right) \]
          21. distribute-neg-inN/A

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

          \[\leadsto \color{blue}{\frac{\tan y + \tan z}{-\mathsf{fma}\left(\tan y, \tan z, -1\right)}} - \left(a - x\right) \]
      7. Recombined 2 regimes into one program.
      8. Final simplification90.6%

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

      Alternative 6: 80.1% accurate, 0.7× speedup?

      \[\begin{array}{l} \\ \left(\frac{\tan y + \tan z}{1} - \tan a\right) + x \end{array} \]
      (FPCore (x y z a)
       :precision binary64
       (+ (- (/ (+ (tan y) (tan z)) 1.0) (tan a)) x))
      double code(double x, double y, double z, double a) {
      	return (((tan(y) + tan(z)) / 1.0) - tan(a)) + x;
      }
      
      real(8) function code(x, y, z, a)
          real(8), intent (in) :: x
          real(8), intent (in) :: y
          real(8), intent (in) :: z
          real(8), intent (in) :: a
          code = (((tan(y) + tan(z)) / 1.0d0) - tan(a)) + x
      end function
      
      public static double code(double x, double y, double z, double a) {
      	return (((Math.tan(y) + Math.tan(z)) / 1.0) - Math.tan(a)) + x;
      }
      
      def code(x, y, z, a):
      	return (((math.tan(y) + math.tan(z)) / 1.0) - math.tan(a)) + x
      
      function code(x, y, z, a)
      	return Float64(Float64(Float64(Float64(tan(y) + tan(z)) / 1.0) - tan(a)) + x)
      end
      
      function tmp = code(x, y, z, a)
      	tmp = (((tan(y) + tan(z)) / 1.0) - tan(a)) + x;
      end
      
      code[x_, y_, z_, a_] := N[(N[(N[(N[(N[Tan[y], $MachinePrecision] + N[Tan[z], $MachinePrecision]), $MachinePrecision] / 1.0), $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]
      
      \begin{array}{l}
      
      \\
      \left(\frac{\tan y + \tan z}{1} - \tan a\right) + x
      \end{array}
      
      Derivation
      1. Initial program 78.5%

        \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
      2. Add Preprocessing
      3. Step-by-step derivation
        1. lift-tan.f64N/A

          \[\leadsto x + \left(\color{blue}{\tan \left(y + z\right)} - \tan a\right) \]
        2. lift-+.f64N/A

          \[\leadsto x + \left(\tan \color{blue}{\left(y + z\right)} - \tan a\right) \]
        3. tan-sumN/A

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

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

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

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

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

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

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

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

          \[\leadsto x + \left(\frac{\tan z + \tan y}{\left(\mathsf{neg}\left(\color{blue}{\tan z \cdot \tan y}\right)\right) + 1} - \tan a\right) \]
        12. distribute-lft-neg-inN/A

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

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

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

          \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\color{blue}{\tan z}, \tan y, 1\right)} - \tan a\right) \]
        16. lower-tan.f6499.7

          \[\leadsto x + \left(\frac{\tan z + \tan y}{\mathsf{fma}\left(-\tan z, \color{blue}{\tan y}, 1\right)} - \tan a\right) \]
      4. Applied rewrites99.7%

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

        \[\leadsto x + \left(\frac{\tan z + \tan y}{\color{blue}{1}} - \tan a\right) \]
      6. Step-by-step derivation
        1. Applied rewrites79.3%

          \[\leadsto x + \left(\frac{\tan z + \tan y}{\color{blue}{1}} - \tan a\right) \]
        2. Final simplification79.3%

          \[\leadsto \left(\frac{\tan y + \tan z}{1} - \tan a\right) + x \]
        3. Add Preprocessing

        Alternative 7: 79.7% accurate, 0.9× speedup?

        \[\begin{array}{l} \\ \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\left(-z\right)\right)\right) - \tan a\right) + x \end{array} \]
        (FPCore (x y z a)
         :precision binary64
         (+ (- (tan (fma y (/ y (- y z)) (- (- z)))) (tan a)) x))
        double code(double x, double y, double z, double a) {
        	return (tan(fma(y, (y / (y - z)), -(-z))) - tan(a)) + x;
        }
        
        function code(x, y, z, a)
        	return Float64(Float64(tan(fma(y, Float64(y / Float64(y - z)), Float64(-Float64(-z)))) - tan(a)) + x)
        end
        
        code[x_, y_, z_, a_] := N[(N[(N[Tan[N[(y * N[(y / N[(y - z), $MachinePrecision]), $MachinePrecision] + (-(-z))), $MachinePrecision]], $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]
        
        \begin{array}{l}
        
        \\
        \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\left(-z\right)\right)\right) - \tan a\right) + x
        \end{array}
        
        Derivation
        1. Initial program 78.5%

          \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-+.f64N/A

            \[\leadsto x + \left(\tan \color{blue}{\left(y + z\right)} - \tan a\right) \]
          2. flip-+N/A

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

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

            \[\leadsto x + \left(\tan \color{blue}{\left(\frac{y \cdot y}{y - z} + \left(\mathsf{neg}\left(\frac{z \cdot z}{y - z}\right)\right)\right)} - \tan a\right) \]
          5. associate-/l*N/A

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

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

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

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

            \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, \color{blue}{-\frac{z \cdot z}{y - z}}\right)\right) - \tan a\right) \]
          10. associate-/l*N/A

            \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\color{blue}{z \cdot \frac{z}{y - z}}\right)\right) - \tan a\right) \]
          11. lower-*.f64N/A

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

            \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -z \cdot \color{blue}{\frac{z}{y - z}}\right)\right) - \tan a\right) \]
          13. lower--.f6478.6

            \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -z \cdot \frac{z}{\color{blue}{y - z}}\right)\right) - \tan a\right) \]
        4. Applied rewrites78.6%

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

          \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\color{blue}{-1 \cdot z}\right)\right) - \tan a\right) \]
        6. Step-by-step derivation
          1. mul-1-negN/A

            \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\color{blue}{\left(\mathsf{neg}\left(z\right)\right)}\right)\right) - \tan a\right) \]
          2. lower-neg.f6478.6

            \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\color{blue}{\left(-z\right)}\right)\right) - \tan a\right) \]
        7. Applied rewrites78.6%

          \[\leadsto x + \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\color{blue}{\left(-z\right)}\right)\right) - \tan a\right) \]
        8. Final simplification78.6%

          \[\leadsto \left(\tan \left(\mathsf{fma}\left(y, \frac{y}{y - z}, -\left(-z\right)\right)\right) - \tan a\right) + x \]
        9. Add Preprocessing

        Alternative 8: 79.7% accurate, 1.0× speedup?

        \[\begin{array}{l} \\ \left(\tan \left(y + z\right) - \tan a\right) + x \end{array} \]
        (FPCore (x y z a) :precision binary64 (+ (- (tan (+ y z)) (tan a)) x))
        double code(double x, double y, double z, double a) {
        	return (tan((y + z)) - tan(a)) + x;
        }
        
        real(8) function code(x, y, z, a)
            real(8), intent (in) :: x
            real(8), intent (in) :: y
            real(8), intent (in) :: z
            real(8), intent (in) :: a
            code = (tan((y + z)) - tan(a)) + x
        end function
        
        public static double code(double x, double y, double z, double a) {
        	return (Math.tan((y + z)) - Math.tan(a)) + x;
        }
        
        def code(x, y, z, a):
        	return (math.tan((y + z)) - math.tan(a)) + x
        
        function code(x, y, z, a)
        	return Float64(Float64(tan(Float64(y + z)) - tan(a)) + x)
        end
        
        function tmp = code(x, y, z, a)
        	tmp = (tan((y + z)) - tan(a)) + x;
        end
        
        code[x_, y_, z_, a_] := N[(N[(N[Tan[N[(y + z), $MachinePrecision]], $MachinePrecision] - N[Tan[a], $MachinePrecision]), $MachinePrecision] + x), $MachinePrecision]
        
        \begin{array}{l}
        
        \\
        \left(\tan \left(y + z\right) - \tan a\right) + x
        \end{array}
        
        Derivation
        1. Initial program 78.5%

          \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
        2. Add Preprocessing
        3. Final simplification78.5%

          \[\leadsto \left(\tan \left(y + z\right) - \tan a\right) + x \]
        4. Add Preprocessing

        Alternative 9: 51.5% accurate, 1.4× speedup?

        \[\begin{array}{l} \\ \tan \left(\mathsf{fma}\left(\frac{z}{z - y}, z, \frac{y}{y - z} \cdot y\right)\right) - \left(-x\right) \end{array} \]
        (FPCore (x y z a)
         :precision binary64
         (- (tan (fma (/ z (- z y)) z (* (/ y (- y z)) y))) (- x)))
        double code(double x, double y, double z, double a) {
        	return tan(fma((z / (z - y)), z, ((y / (y - z)) * y))) - -x;
        }
        
        function code(x, y, z, a)
        	return Float64(tan(fma(Float64(z / Float64(z - y)), z, Float64(Float64(y / Float64(y - z)) * y))) - Float64(-x))
        end
        
        code[x_, y_, z_, a_] := N[(N[Tan[N[(N[(z / N[(z - y), $MachinePrecision]), $MachinePrecision] * z + N[(N[(y / N[(y - z), $MachinePrecision]), $MachinePrecision] * y), $MachinePrecision]), $MachinePrecision]], $MachinePrecision] - (-x)), $MachinePrecision]
        
        \begin{array}{l}
        
        \\
        \tan \left(\mathsf{fma}\left(\frac{z}{z - y}, z, \frac{y}{y - z} \cdot y\right)\right) - \left(-x\right)
        \end{array}
        
        Derivation
        1. Initial program 78.5%

          \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-+.f64N/A

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

            \[\leadsto \color{blue}{\left(\tan \left(y + z\right) - \tan a\right) + x} \]
          3. lift--.f64N/A

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

            \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
          5. lower--.f64N/A

            \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
          6. lift-+.f64N/A

            \[\leadsto \tan \color{blue}{\left(y + z\right)} - \left(\tan a - x\right) \]
          7. +-commutativeN/A

            \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
          8. lower-+.f64N/A

            \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
          9. lower--.f6478.5

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(\tan a - x\right)} \]
        4. Applied rewrites78.5%

          \[\leadsto \color{blue}{\tan \left(z + y\right) - \left(\tan a - x\right)} \]
        5. Taylor expanded in x around inf

          \[\leadsto \tan \left(z + y\right) - \color{blue}{-1 \cdot x} \]
        6. Step-by-step derivation
          1. mul-1-negN/A

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(\mathsf{neg}\left(x\right)\right)} \]
          2. lower-neg.f6448.2

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(-x\right)} \]
        7. Applied rewrites48.2%

          \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(-x\right)} \]
        8. Step-by-step derivation
          1. lift-+.f64N/A

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

            \[\leadsto \tan \color{blue}{\left(y + z\right)} - \left(-x\right) \]
          3. flip-+N/A

            \[\leadsto \tan \color{blue}{\left(\frac{y \cdot y - z \cdot z}{y - z}\right)} - \left(-x\right) \]
          4. lift--.f64N/A

            \[\leadsto \tan \left(\frac{y \cdot y - z \cdot z}{\color{blue}{y - z}}\right) - \left(-x\right) \]
          5. sub-divN/A

            \[\leadsto \tan \color{blue}{\left(\frac{y \cdot y}{y - z} - \frac{z \cdot z}{y - z}\right)} - \left(-x\right) \]
          6. associate-*r/N/A

            \[\leadsto \tan \left(\color{blue}{y \cdot \frac{y}{y - z}} - \frac{z \cdot z}{y - z}\right) - \left(-x\right) \]
          7. lift-/.f64N/A

            \[\leadsto \tan \left(y \cdot \color{blue}{\frac{y}{y - z}} - \frac{z \cdot z}{y - z}\right) - \left(-x\right) \]
          8. associate-*r/N/A

            \[\leadsto \tan \left(y \cdot \frac{y}{y - z} - \color{blue}{z \cdot \frac{z}{y - z}}\right) - \left(-x\right) \]
          9. lift-/.f64N/A

            \[\leadsto \tan \left(y \cdot \frac{y}{y - z} - z \cdot \color{blue}{\frac{z}{y - z}}\right) - \left(-x\right) \]
          10. lift-*.f64N/A

            \[\leadsto \tan \left(y \cdot \frac{y}{y - z} - \color{blue}{z \cdot \frac{z}{y - z}}\right) - \left(-x\right) \]
          11. unsub-negN/A

            \[\leadsto \tan \color{blue}{\left(y \cdot \frac{y}{y - z} + \left(\mathsf{neg}\left(z \cdot \frac{z}{y - z}\right)\right)\right)} - \left(-x\right) \]
          12. lift-neg.f64N/A

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

            \[\leadsto \tan \color{blue}{\left(\left(-z \cdot \frac{z}{y - z}\right) + y \cdot \frac{y}{y - z}\right)} - \left(-x\right) \]
          14. lift-neg.f64N/A

            \[\leadsto \tan \left(\color{blue}{\left(\mathsf{neg}\left(z \cdot \frac{z}{y - z}\right)\right)} + y \cdot \frac{y}{y - z}\right) - \left(-x\right) \]
          15. lift-*.f64N/A

            \[\leadsto \tan \left(\left(\mathsf{neg}\left(\color{blue}{z \cdot \frac{z}{y - z}}\right)\right) + y \cdot \frac{y}{y - z}\right) - \left(-x\right) \]
          16. *-commutativeN/A

            \[\leadsto \tan \left(\left(\mathsf{neg}\left(\color{blue}{\frac{z}{y - z} \cdot z}\right)\right) + y \cdot \frac{y}{y - z}\right) - \left(-x\right) \]
          17. distribute-lft-neg-inN/A

            \[\leadsto \tan \left(\color{blue}{\left(\mathsf{neg}\left(\frac{z}{y - z}\right)\right) \cdot z} + y \cdot \frac{y}{y - z}\right) - \left(-x\right) \]
          18. lower-fma.f64N/A

            \[\leadsto \tan \color{blue}{\left(\mathsf{fma}\left(\mathsf{neg}\left(\frac{z}{y - z}\right), z, y \cdot \frac{y}{y - z}\right)\right)} - \left(-x\right) \]
          19. lift-/.f64N/A

            \[\leadsto \tan \left(\mathsf{fma}\left(\mathsf{neg}\left(\color{blue}{\frac{z}{y - z}}\right), z, y \cdot \frac{y}{y - z}\right)\right) - \left(-x\right) \]
          20. distribute-neg-fracN/A

            \[\leadsto \tan \left(\mathsf{fma}\left(\color{blue}{\frac{\mathsf{neg}\left(z\right)}{y - z}}, z, y \cdot \frac{y}{y - z}\right)\right) - \left(-x\right) \]
          21. lower-/.f64N/A

            \[\leadsto \tan \left(\mathsf{fma}\left(\color{blue}{\frac{\mathsf{neg}\left(z\right)}{y - z}}, z, y \cdot \frac{y}{y - z}\right)\right) - \left(-x\right) \]
          22. lower-neg.f64N/A

            \[\leadsto \tan \left(\mathsf{fma}\left(\frac{\color{blue}{-z}}{y - z}, z, y \cdot \frac{y}{y - z}\right)\right) - \left(-x\right) \]
        9. Applied rewrites48.2%

          \[\leadsto \tan \color{blue}{\left(\mathsf{fma}\left(\frac{-z}{y - z}, z, \frac{y}{y - z} \cdot y\right)\right)} - \left(-x\right) \]
        10. Final simplification48.2%

          \[\leadsto \tan \left(\mathsf{fma}\left(\frac{z}{z - y}, z, \frac{y}{y - z} \cdot y\right)\right) - \left(-x\right) \]
        11. Add Preprocessing

        Alternative 10: 51.5% accurate, 1.9× speedup?

        \[\begin{array}{l} \\ \tan \left(y + z\right) - \left(-x\right) \end{array} \]
        (FPCore (x y z a) :precision binary64 (- (tan (+ y z)) (- x)))
        double code(double x, double y, double z, double a) {
        	return tan((y + z)) - -x;
        }
        
        real(8) function code(x, y, z, a)
            real(8), intent (in) :: x
            real(8), intent (in) :: y
            real(8), intent (in) :: z
            real(8), intent (in) :: a
            code = tan((y + z)) - -x
        end function
        
        public static double code(double x, double y, double z, double a) {
        	return Math.tan((y + z)) - -x;
        }
        
        def code(x, y, z, a):
        	return math.tan((y + z)) - -x
        
        function code(x, y, z, a)
        	return Float64(tan(Float64(y + z)) - Float64(-x))
        end
        
        function tmp = code(x, y, z, a)
        	tmp = tan((y + z)) - -x;
        end
        
        code[x_, y_, z_, a_] := N[(N[Tan[N[(y + z), $MachinePrecision]], $MachinePrecision] - (-x)), $MachinePrecision]
        
        \begin{array}{l}
        
        \\
        \tan \left(y + z\right) - \left(-x\right)
        \end{array}
        
        Derivation
        1. Initial program 78.5%

          \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
        2. Add Preprocessing
        3. Step-by-step derivation
          1. lift-+.f64N/A

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

            \[\leadsto \color{blue}{\left(\tan \left(y + z\right) - \tan a\right) + x} \]
          3. lift--.f64N/A

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

            \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
          5. lower--.f64N/A

            \[\leadsto \color{blue}{\tan \left(y + z\right) - \left(\tan a - x\right)} \]
          6. lift-+.f64N/A

            \[\leadsto \tan \color{blue}{\left(y + z\right)} - \left(\tan a - x\right) \]
          7. +-commutativeN/A

            \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
          8. lower-+.f64N/A

            \[\leadsto \tan \color{blue}{\left(z + y\right)} - \left(\tan a - x\right) \]
          9. lower--.f6478.5

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(\tan a - x\right)} \]
        4. Applied rewrites78.5%

          \[\leadsto \color{blue}{\tan \left(z + y\right) - \left(\tan a - x\right)} \]
        5. Taylor expanded in x around inf

          \[\leadsto \tan \left(z + y\right) - \color{blue}{-1 \cdot x} \]
        6. Step-by-step derivation
          1. mul-1-negN/A

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(\mathsf{neg}\left(x\right)\right)} \]
          2. lower-neg.f6448.2

            \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(-x\right)} \]
        7. Applied rewrites48.2%

          \[\leadsto \tan \left(z + y\right) - \color{blue}{\left(-x\right)} \]
        8. Final simplification48.2%

          \[\leadsto \tan \left(y + z\right) - \left(-x\right) \]
        9. Add Preprocessing

        Reproduce

        ?
        herbie shell --seed 2024332 
        (FPCore (x y z a)
          :name "tan-example (used to crash)"
          :precision binary64
          :pre (and (and (and (or (== x 0.0) (and (<= 0.5884142 x) (<= x 505.5909))) (or (and (<= -1.796658e+308 y) (<= y -9.425585e-310)) (and (<= 1.284938e-309 y) (<= y 1.751224e+308)))) (or (and (<= -1.776707e+308 z) (<= z -8.599796e-310)) (and (<= 3.293145e-311 z) (<= z 1.725154e+308)))) (or (and (<= -1.796658e+308 a) (<= a -9.425585e-310)) (and (<= 1.284938e-309 a) (<= a 1.751224e+308))))
          (+ x (- (tan (+ y z)) (tan a))))