\[\frac{1 - \cos x}{{x}^2}\]
Test:
NMSE problem 3.4.1
Bits:
128 bits
Bits error versus x
Time: 12.1 s
Input Error: 14.7
Output Error: 0.2
Log: ⚲
Profile: 🕒
\(\begin{cases} \frac{1}{x} \cdot \frac{1 - \cos x}{x} & \text{when } x \le -0.31132668f0 \\ \left(\frac{1}{720} \cdot {x}^{4} + \frac{1}{2}\right) - \frac{1}{24} \cdot {x}^2 & \text{when } x \le 0.20837773f0 \\ \frac{1}{x} \cdot \frac{1 - \cos x}{x} & \text{otherwise} \end{cases}\)

    if x < -0.31132668f0 or 0.20837773f0 < x

    1. Started with
      \[\frac{1 - \cos x}{{x}^2}\]
      1.2
    2. Using strategy rm
      1.2
    3. Applied square-mult to get
      \[\frac{1 - \cos x}{\color{red}{{x}^2}} \leadsto \frac{1 - \cos x}{\color{blue}{x \cdot x}}\]
      1.2
    4. Applied *-un-lft-identity to get
      \[\frac{\color{red}{1 - \cos x}}{x \cdot x} \leadsto \frac{\color{blue}{1 \cdot \left(1 - \cos x\right)}}{x \cdot x}\]
      1.2
    5. Applied times-frac to get
      \[\color{red}{\frac{1 \cdot \left(1 - \cos x\right)}{x \cdot x}} \leadsto \color{blue}{\frac{1}{x} \cdot \frac{1 - \cos x}{x}}\]
      0.4

    if -0.31132668f0 < x < 0.20837773f0

    1. Started with
      \[\frac{1 - \cos x}{{x}^2}\]
      28.6
    2. Applied taylor to get
      \[\frac{1 - \cos x}{{x}^2} \leadsto \left(\frac{1}{720} \cdot {x}^{4} + \frac{1}{2}\right) - \frac{1}{24} \cdot {x}^2\]
      0
    3. Taylor expanded around 0 to get
      \[\color{red}{\left(\frac{1}{720} \cdot {x}^{4} + \frac{1}{2}\right) - \frac{1}{24} \cdot {x}^2} \leadsto \color{blue}{\left(\frac{1}{720} \cdot {x}^{4} + \frac{1}{2}\right) - \frac{1}{24} \cdot {x}^2}\]
      0
  1. Removed slow pow expressions

Original test:


(lambda ((x default))
  #:name "NMSE problem 3.4.1"
  (/ (- 1 (cos x)) (sqr x)))