tan-example (used to crash)

Percentage Accurate: 79.7% → 99.7%
Time: 29.1s
Alternatives: 7
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 7 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.4× speedup?

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

\\
x + \left(\frac{\tan y + \tan z}{1 - \tan y \cdot \tan z} - \tan a\right)
\end{array}
Derivation
  1. Initial program 80.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. lower-+.f64N/A

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

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

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

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

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

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

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

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

Alternative 2: 89.1% accurate, 0.3× speedup?

\[\begin{array}{l} \\ \begin{array}{l} t_0 := \tan y + \tan z\\ t_1 := x + \mathsf{fma}\left(1, t\_0, -\tan a\right)\\ \mathbf{if}\;\tan a \leq -0.02:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;\tan a \leq 10^{-14}:\\ \;\;\;\;x + \left(\frac{t\_0}{1 - \tan y \cdot \tan z} - \mathsf{fma}\left(a \cdot a, a \cdot 0.3333333333333333, a\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 (+ x (fma 1.0 t_0 (- (tan a))))))
   (if (<= (tan a) -0.02)
     t_1
     (if (<= (tan a) 1e-14)
       (+
        x
        (-
         (/ t_0 (- 1.0 (* (tan y) (tan z))))
         (fma (* a a) (* a 0.3333333333333333) a)))
       t_1))))
double code(double x, double y, double z, double a) {
	double t_0 = tan(y) + tan(z);
	double t_1 = x + fma(1.0, t_0, -tan(a));
	double tmp;
	if (tan(a) <= -0.02) {
		tmp = t_1;
	} else if (tan(a) <= 1e-14) {
		tmp = x + ((t_0 / (1.0 - (tan(y) * tan(z)))) - fma((a * a), (a * 0.3333333333333333), a));
	} else {
		tmp = t_1;
	}
	return tmp;
}
function code(x, y, z, a)
	t_0 = Float64(tan(y) + tan(z))
	t_1 = Float64(x + fma(1.0, t_0, Float64(-tan(a))))
	tmp = 0.0
	if (tan(a) <= -0.02)
		tmp = t_1;
	elseif (tan(a) <= 1e-14)
		tmp = Float64(x + Float64(Float64(t_0 / Float64(1.0 - Float64(tan(y) * tan(z)))) - fma(Float64(a * a), Float64(a * 0.3333333333333333), a)));
	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[(x + N[(1.0 * t$95$0 + (-N[Tan[a], $MachinePrecision])), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[N[Tan[a], $MachinePrecision], -0.02], t$95$1, If[LessEqual[N[Tan[a], $MachinePrecision], 1e-14], N[(x + N[(N[(t$95$0 / N[(1.0 - N[(N[Tan[y], $MachinePrecision] * N[Tan[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - N[(N[(a * a), $MachinePrecision] * N[(a * 0.3333333333333333), $MachinePrecision] + a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
\begin{array}{l}

\\
\begin{array}{l}
t_0 := \tan y + \tan z\\
t_1 := x + \mathsf{fma}\left(1, t\_0, -\tan a\right)\\
\mathbf{if}\;\tan a \leq -0.02:\\
\;\;\;\;t\_1\\

\mathbf{elif}\;\tan a \leq 10^{-14}:\\
\;\;\;\;x + \left(\frac{t\_0}{1 - \tan y \cdot \tan z} - \mathsf{fma}\left(a \cdot a, a \cdot 0.3333333333333333, a\right)\right)\\

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


\end{array}
\end{array}
Derivation
  1. Split input into 2 regimes
  2. if (tan.f64 a) < -0.0200000000000000004 or 9.99999999999999999e-15 < (tan.f64 a)

    1. Initial program 81.3%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

      \[\leadsto x + \mathsf{fma}\left(\color{blue}{1}, \tan y + \tan z, \mathsf{neg}\left(\tan a\right)\right) \]
    6. Step-by-step derivation
      1. Applied rewrites81.9%

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

      if -0.0200000000000000004 < (tan.f64 a) < 9.99999999999999999e-15

      1. Initial program 80.0%

        \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
      2. Add Preprocessing
      3. Taylor expanded in a around 0

        \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{a \cdot \left(1 + \frac{1}{3} \cdot {a}^{2}\right)}\right) \]
      4. Step-by-step derivation
        1. +-commutativeN/A

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

          \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{\left(a \cdot \left(\frac{1}{3} \cdot {a}^{2}\right) + a \cdot 1\right)}\right) \]
        3. associate-*r*N/A

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

          \[\leadsto x + \left(\tan \left(y + z\right) - \left(\color{blue}{{a}^{2} \cdot \left(a \cdot \frac{1}{3}\right)} + a \cdot 1\right)\right) \]
        5. *-rgt-identityN/A

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

          \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{\mathsf{fma}\left({a}^{2}, a \cdot \frac{1}{3}, a\right)}\right) \]
        7. unpow2N/A

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

          \[\leadsto x + \left(\tan \left(y + z\right) - \mathsf{fma}\left(\color{blue}{a \cdot a}, a \cdot \frac{1}{3}, a\right)\right) \]
        9. lower-*.f6480.0

          \[\leadsto x + \left(\tan \left(y + z\right) - \mathsf{fma}\left(a \cdot a, \color{blue}{a \cdot 0.3333333333333333}, a\right)\right) \]
      5. Applied rewrites80.0%

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

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

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

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

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

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

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

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

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

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

          \[\leadsto x + \left(\frac{\tan y + \tan z}{\color{blue}{1 - \tan y \cdot \tan z}} - \mathsf{fma}\left(a \cdot a, a \cdot \frac{1}{3}, a\right)\right) \]
        11. lift-/.f6499.9

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

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

    Alternative 3: 89.2% accurate, 0.5× speedup?

    \[\begin{array}{l} \\ \begin{array}{l} t_0 := \tan y + \tan z\\ t_1 := x + \mathsf{fma}\left(1, t\_0, -\tan a\right)\\ \mathbf{if}\;a \leq -2 \cdot 10^{-8}:\\ \;\;\;\;t\_1\\ \mathbf{elif}\;a \leq 1.52 \cdot 10^{-12}:\\ \;\;\;\;x + \frac{1}{\left(1 - \tan y \cdot \tan z\right) \cdot \frac{1}{t\_0}}\\ \mathbf{else}:\\ \;\;\;\;t\_1\\ \end{array} \end{array} \]
    (FPCore (x y z a)
     :precision binary64
     (let* ((t_0 (+ (tan y) (tan z))) (t_1 (+ x (fma 1.0 t_0 (- (tan a))))))
       (if (<= a -2e-8)
         t_1
         (if (<= a 1.52e-12)
           (+ x (/ 1.0 (* (- 1.0 (* (tan y) (tan z))) (/ 1.0 t_0))))
           t_1))))
    double code(double x, double y, double z, double a) {
    	double t_0 = tan(y) + tan(z);
    	double t_1 = x + fma(1.0, t_0, -tan(a));
    	double tmp;
    	if (a <= -2e-8) {
    		tmp = t_1;
    	} else if (a <= 1.52e-12) {
    		tmp = x + (1.0 / ((1.0 - (tan(y) * tan(z))) * (1.0 / t_0)));
    	} else {
    		tmp = t_1;
    	}
    	return tmp;
    }
    
    function code(x, y, z, a)
    	t_0 = Float64(tan(y) + tan(z))
    	t_1 = Float64(x + fma(1.0, t_0, Float64(-tan(a))))
    	tmp = 0.0
    	if (a <= -2e-8)
    		tmp = t_1;
    	elseif (a <= 1.52e-12)
    		tmp = Float64(x + Float64(1.0 / Float64(Float64(1.0 - Float64(tan(y) * tan(z))) * Float64(1.0 / t_0))));
    	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[(x + N[(1.0 * t$95$0 + (-N[Tan[a], $MachinePrecision])), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[a, -2e-8], t$95$1, If[LessEqual[a, 1.52e-12], N[(x + N[(1.0 / N[(N[(1.0 - N[(N[Tan[y], $MachinePrecision] * N[Tan[z], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] * N[(1.0 / t$95$0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], t$95$1]]]]
    
    \begin{array}{l}
    
    \\
    \begin{array}{l}
    t_0 := \tan y + \tan z\\
    t_1 := x + \mathsf{fma}\left(1, t\_0, -\tan a\right)\\
    \mathbf{if}\;a \leq -2 \cdot 10^{-8}:\\
    \;\;\;\;t\_1\\
    
    \mathbf{elif}\;a \leq 1.52 \cdot 10^{-12}:\\
    \;\;\;\;x + \frac{1}{\left(1 - \tan y \cdot \tan z\right) \cdot \frac{1}{t\_0}}\\
    
    \mathbf{else}:\\
    \;\;\;\;t\_1\\
    
    
    \end{array}
    \end{array}
    
    Derivation
    1. Split input into 2 regimes
    2. if a < -2e-8 or 1.52e-12 < a

      1. Initial program 81.3%

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        \[\leadsto x + \mathsf{fma}\left(\color{blue}{1}, \tan y + \tan z, \mathsf{neg}\left(\tan a\right)\right) \]
      6. Step-by-step derivation
        1. Applied rewrites81.9%

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

        if -2e-8 < a < 1.52e-12

        1. Initial program 80.0%

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

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

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

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

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

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

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

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

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

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

          \[\leadsto x + \frac{1}{\color{blue}{\frac{\cos \left(y + z\right)}{\sin \left(y + z\right)}}} \]
        6. Step-by-step derivation
          1. lower-/.f64N/A

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

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

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

            \[\leadsto x + \frac{1}{\frac{\cos \left(y + z\right)}{\color{blue}{\sin \left(y + z\right)}}} \]
          5. lower-+.f6479.8

            \[\leadsto x + \frac{1}{\frac{\cos \left(y + z\right)}{\sin \color{blue}{\left(y + z\right)}}} \]
        7. Applied rewrites79.8%

          \[\leadsto x + \frac{1}{\color{blue}{\frac{\cos \left(y + z\right)}{\sin \left(y + z\right)}}} \]
        8. Step-by-step derivation
          1. Applied rewrites99.2%

            \[\leadsto x + \frac{1}{\frac{1}{\tan y + \tan z} \cdot \color{blue}{\left(1 - \tan y \cdot \tan z\right)}} \]
        9. Recombined 2 regimes into one program.
        10. Final simplification90.4%

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

        Alternative 4: 80.1% accurate, 0.7× speedup?

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

          \[\leadsto x + \mathsf{fma}\left(\color{blue}{1}, \tan y + \tan z, \mathsf{neg}\left(\tan a\right)\right) \]
        6. Step-by-step derivation
          1. Applied rewrites81.1%

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

          Alternative 5: 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}
          
          Derivation
          1. Initial program 80.7%

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

          Alternative 6: 50.4% 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 80.7%

            \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
          2. Add Preprocessing
          3. Taylor expanded in a around 0

            \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{a \cdot \left(1 + \frac{1}{3} \cdot {a}^{2}\right)}\right) \]
          4. Step-by-step derivation
            1. +-commutativeN/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{\left(a \cdot \left(\frac{1}{3} \cdot {a}^{2}\right) + a \cdot 1\right)}\right) \]
            3. associate-*r*N/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \left(\color{blue}{{a}^{2} \cdot \left(a \cdot \frac{1}{3}\right)} + a \cdot 1\right)\right) \]
            5. *-rgt-identityN/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{\mathsf{fma}\left({a}^{2}, a \cdot \frac{1}{3}, a\right)}\right) \]
            7. unpow2N/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \mathsf{fma}\left(\color{blue}{a \cdot a}, a \cdot \frac{1}{3}, a\right)\right) \]
            9. lower-*.f6441.0

              \[\leadsto x + \left(\tan \left(y + z\right) - \mathsf{fma}\left(a \cdot a, \color{blue}{a \cdot 0.3333333333333333}, a\right)\right) \]
          5. Applied rewrites41.0%

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

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

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

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

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

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

              \[\leadsto \tan \left(y + z\right) - \color{blue}{\left(\mathsf{fma}\left(a \cdot a, a \cdot 0.3333333333333333, a\right) - x\right)} \]
          7. Applied rewrites41.0%

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

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

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

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

            \[\leadsto \tan \left(y + z\right) - \color{blue}{\left(-x\right)} \]
          11. Add Preprocessing

          Alternative 7: 16.4% accurate, 5.4× speedup?

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

            \[x + \left(\tan \left(y + z\right) - \tan a\right) \]
          2. Add Preprocessing
          3. Taylor expanded in a around 0

            \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{a \cdot \left(1 + \frac{1}{3} \cdot {a}^{2}\right)}\right) \]
          4. Step-by-step derivation
            1. +-commutativeN/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{\left(a \cdot \left(\frac{1}{3} \cdot {a}^{2}\right) + a \cdot 1\right)}\right) \]
            3. associate-*r*N/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \left(\color{blue}{{a}^{2} \cdot \left(a \cdot \frac{1}{3}\right)} + a \cdot 1\right)\right) \]
            5. *-rgt-identityN/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \color{blue}{\mathsf{fma}\left({a}^{2}, a \cdot \frac{1}{3}, a\right)}\right) \]
            7. unpow2N/A

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

              \[\leadsto x + \left(\tan \left(y + z\right) - \mathsf{fma}\left(\color{blue}{a \cdot a}, a \cdot \frac{1}{3}, a\right)\right) \]
            9. lower-*.f6441.0

              \[\leadsto x + \left(\tan \left(y + z\right) - \mathsf{fma}\left(a \cdot a, \color{blue}{a \cdot 0.3333333333333333}, a\right)\right) \]
          5. Applied rewrites41.0%

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

            \[\leadsto x + \left(\color{blue}{\frac{\sin y}{\cos y}} - \mathsf{fma}\left(a \cdot a, a \cdot \frac{1}{3}, a\right)\right) \]
          7. Step-by-step derivation
            1. lower-/.f64N/A

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

              \[\leadsto x + \left(\frac{\color{blue}{\sin y}}{\cos y} - \mathsf{fma}\left(a \cdot a, a \cdot \frac{1}{3}, a\right)\right) \]
            3. lower-cos.f6431.3

              \[\leadsto x + \left(\frac{\sin y}{\color{blue}{\cos y}} - \mathsf{fma}\left(a \cdot a, a \cdot 0.3333333333333333, a\right)\right) \]
          8. Applied rewrites31.3%

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

            \[\leadsto x + \left(y \cdot \color{blue}{\left(1 + \frac{1}{3} \cdot {y}^{2}\right)} - \mathsf{fma}\left(a \cdot a, a \cdot \frac{1}{3}, a\right)\right) \]
          10. Step-by-step derivation
            1. Applied rewrites17.0%

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

              \[\leadsto x + \left(y \cdot \color{blue}{\left(1 + \frac{1}{3} \cdot {y}^{2}\right)} - \mathsf{fma}\left(a \cdot a, a \cdot \frac{1}{3}, a\right)\right) \]
            3. Step-by-step derivation
              1. Applied rewrites17.0%

                \[\leadsto x + \left(\mathsf{fma}\left(y, \color{blue}{0.3333333333333333 \cdot \left(y \cdot y\right)}, y\right) - \mathsf{fma}\left(a \cdot a, a \cdot 0.3333333333333333, a\right)\right) \]
              2. Add Preprocessing

              Reproduce

              ?
              herbie shell --seed 2024219 
              (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))))