\[\tan^{-1} \left(N + 1\right) - \tan^{-1} N\]
Test:
NMSE example 3.5
Bits:
128 bits
Bits error versus N
Time: 3.4 s
Input Error: 14.6
Output Error: 0.4
Log: ⚲
Profile: 🕒
\(\tan^{-1}_* \frac{1}{\left(1 + N\right) + N \cdot N}\)
  1. Started with
    \[\tan^{-1} \left(N + 1\right) - \tan^{-1} N\]
    14.6
  2. Using strategy rm
    14.6
  3. Applied diff-atan to get
    \[\color{red}{\tan^{-1} \left(N + 1\right) - \tan^{-1} N} \leadsto \color{blue}{\tan^{-1}_* \frac{\left(N + 1\right) - N}{1 + \left(N + 1\right) \cdot N}}\]
    13.6
  4. Applied simplify to get
    \[\tan^{-1}_* \frac{\color{red}{\left(N + 1\right) - N}}{1 + \left(N + 1\right) \cdot N} \leadsto \tan^{-1}_* \frac{\color{blue}{1 - 0}}{1 + \left(N + 1\right) \cdot N}\]
    0.4
  5. Using strategy rm
    0.4
  6. Applied add-cbrt-cube to get
    \[\color{red}{\tan^{-1}_* \frac{1 - 0}{1 + \left(N + 1\right) \cdot N}} \leadsto \color{blue}{\sqrt[3]{{\left(\tan^{-1}_* \frac{1 - 0}{1 + \left(N + 1\right) \cdot N}\right)}^3}}\]
    10.1
  7. Applied taylor to get
    \[\sqrt[3]{{\left(\tan^{-1}_* \frac{1 - 0}{1 + \left(N + 1\right) \cdot N}\right)}^3} \leadsto \tan^{-1}_* \frac{1}{1 + \left(N + {N}^2\right)}\]
    0.4
  8. Taylor expanded around 0 to get
    \[\color{red}{\tan^{-1}_* \frac{1}{1 + \left(N + {N}^2\right)}} \leadsto \color{blue}{\tan^{-1}_* \frac{1}{1 + \left(N + {N}^2\right)}}\]
    0.4
  9. Applied simplify to get
    \[\tan^{-1}_* \frac{1}{1 + \left(N + {N}^2\right)} \leadsto \tan^{-1}_* \frac{1}{\left(1 + N\right) + N \cdot N}\]
    0.4
  10. Applied final simplification

Original test:


(lambda ((N default))
  #:name "NMSE example 3.5"
  (- (atan (+ N 1)) (atan N))
  #:target
  (atan (/ 1 (+ 1 (* N (+ N 1))))))