\[\tan \left(x + \varepsilon\right) - \tan x\]
Test:
NMSE problem 3.3.2
Bits:
128 bits
Bits error versus x
Bits error versus eps
Time: 21.1 s
Input Error: 16.7
Output Error: 7.4
Log:
Profile: 🕒
\(\begin{cases} \sqrt[3]{{\left(\tan \left(x + \varepsilon\right) - \tan x\right)}^3} & \text{when } \tan \left(x + \varepsilon\right) - \tan x \le -0.0050464487f0 \\ \left((\left(\frac{\varepsilon}{\cos x}\right) * \left(\frac{\sin x}{\frac{\cos x}{\sin x}}\right) + \left(\sin x \cdot \frac{{\varepsilon}^2}{\cos x}\right))_* + (\left(\frac{{\varepsilon}^2}{{\left(\cos x\right)}^3}\right) * \left({\left(\sin x\right)}^3\right) + \left(\frac{1}{3} \cdot {\varepsilon}^3\right))_*\right) + (\left(\frac{{\varepsilon}^3}{{\left(\cos x\right)}^{4}}\right) * \left({\left(\sin x\right)}^{4}\right) + \left((\left(\frac{\frac{4}{3}}{\cos x}\right) * \left(\frac{\sin x \cdot \sin x}{\frac{\cos x}{{\varepsilon}^3}}\right) + \varepsilon)_*\right))_* & \text{when } \tan \left(x + \varepsilon\right) - \tan x \le 0.0006144298f0 \\ \tan \left(x + \varepsilon\right) - \log_* (1 + \log \left(e^{(e^{\tan x} - 1)^*}\right)) & \text{otherwise} \end{cases}\)

    if (- (tan (+ x eps)) (tan x)) < -0.0050464487f0

    1. Started with
      \[\tan \left(x + \varepsilon\right) - \tan x\]
      10.4
    2. Using strategy rm
      10.4
    3. Applied add-cbrt-cube to get
      \[\color{red}{\tan \left(x + \varepsilon\right) - \tan x} \leadsto \color{blue}{\sqrt[3]{{\left(\tan \left(x + \varepsilon\right) - \tan x\right)}^3}}\]
      10.4

    if -0.0050464487f0 < (- (tan (+ x eps)) (tan x)) < 0.0006144298f0

    1. Started with
      \[\tan \left(x + \varepsilon\right) - \tan x\]
      21.7
    2. Using strategy rm
      21.7
    3. Applied tan-cotan to get
      \[\color{red}{\tan \left(x + \varepsilon\right)} - \tan x \leadsto \color{blue}{\frac{1}{\cot \left(x + \varepsilon\right)}} - \tan x\]
      21.8
    4. Using strategy rm
      21.8
    5. Applied add-cube-cbrt to get
      \[\color{red}{\frac{1}{\cot \left(x + \varepsilon\right)} - \tan x} \leadsto \color{blue}{{\left(\sqrt[3]{\frac{1}{\cot \left(x + \varepsilon\right)} - \tan x}\right)}^3}\]
      22.0
    6. Applied taylor to get
      \[{\left(\sqrt[3]{\frac{1}{\cot \left(x + \varepsilon\right)} - \tan x}\right)}^3 \leadsto \frac{\varepsilon \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \left(\frac{{\varepsilon}^2 \cdot \sin x}{\cos x} + \left(\frac{{\varepsilon}^2 \cdot {\left(\sin x\right)}^{3}}{{\left(\cos x\right)}^{3}} + \left(\frac{1}{3} \cdot {\varepsilon}^{3} + \left(\varepsilon + \left(\frac{4}{3} \cdot \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^{4}}{{\left(\cos x\right)}^{4}}\right)\right)\right)\right)\right)\]
      4.8
    7. Taylor expanded around 0 to get
      \[\color{red}{\frac{\varepsilon \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \left(\frac{{\varepsilon}^2 \cdot \sin x}{\cos x} + \left(\frac{{\varepsilon}^2 \cdot {\left(\sin x\right)}^{3}}{{\left(\cos x\right)}^{3}} + \left(\frac{1}{3} \cdot {\varepsilon}^{3} + \left(\varepsilon + \left(\frac{4}{3} \cdot \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^{4}}{{\left(\cos x\right)}^{4}}\right)\right)\right)\right)\right)} \leadsto \color{blue}{\frac{\varepsilon \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \left(\frac{{\varepsilon}^2 \cdot \sin x}{\cos x} + \left(\frac{{\varepsilon}^2 \cdot {\left(\sin x\right)}^{3}}{{\left(\cos x\right)}^{3}} + \left(\frac{1}{3} \cdot {\varepsilon}^{3} + \left(\varepsilon + \left(\frac{4}{3} \cdot \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^{4}}{{\left(\cos x\right)}^{4}}\right)\right)\right)\right)\right)}\]
      4.8
    8. Applied simplify to get
      \[\frac{\varepsilon \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \left(\frac{{\varepsilon}^2 \cdot \sin x}{\cos x} + \left(\frac{{\varepsilon}^2 \cdot {\left(\sin x\right)}^{3}}{{\left(\cos x\right)}^{3}} + \left(\frac{1}{3} \cdot {\varepsilon}^{3} + \left(\varepsilon + \left(\frac{4}{3} \cdot \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^2}{{\left(\cos x\right)}^2} + \frac{{\varepsilon}^{3} \cdot {\left(\sin x\right)}^{4}}{{\left(\cos x\right)}^{4}}\right)\right)\right)\right)\right) \leadsto \left((\left(\frac{\varepsilon}{\cos x}\right) * \left(\frac{\sin x}{\frac{\cos x}{\sin x}}\right) + \left(\sin x \cdot \frac{{\varepsilon}^2}{\cos x}\right))_* + (\left(\frac{{\varepsilon}^2}{{\left(\cos x\right)}^3}\right) * \left({\left(\sin x\right)}^3\right) + \left(\frac{1}{3} \cdot {\varepsilon}^3\right))_*\right) + (\left(\frac{{\varepsilon}^3}{{\left(\cos x\right)}^{4}}\right) * \left({\left(\sin x\right)}^{4}\right) + \left((\left(\frac{\frac{4}{3}}{\cos x}\right) * \left(\frac{\sin x \cdot \sin x}{\frac{\cos x}{{\varepsilon}^3}}\right) + \varepsilon)_*\right))_*\]
      4.9

    9. Applied final simplification

    if 0.0006144298f0 < (- (tan (+ x eps)) (tan x))

    1. Started with
      \[\tan \left(x + \varepsilon\right) - \tan x\]
      10.5
    2. Using strategy rm
      10.5
    3. Applied log1p-expm1-u to get
      \[\tan \left(x + \varepsilon\right) - \color{red}{\tan x} \leadsto \tan \left(x + \varepsilon\right) - \color{blue}{\log_* (1 + (e^{\tan x} - 1)^*)}\]
      10.6
    4. Using strategy rm
      10.6
    5. Applied add-log-exp to get
      \[\tan \left(x + \varepsilon\right) - \log_* (1 + \color{red}{(e^{\tan x} - 1)^*}) \leadsto \tan \left(x + \varepsilon\right) - \log_* (1 + \color{blue}{\log \left(e^{(e^{\tan x} - 1)^*}\right)})\]
      10.7

  1. Removed slow pow expressions

Original test:


(lambda ((x default) (eps default))
  #:name "NMSE problem 3.3.2"
  (- (tan (+ x eps)) (tan x))
  #:target
  (/ (sin eps) (* (cos x) (cos (+ x eps)))))