\[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
Test:
NMSE problem 3.3.3
Bits:
128 bits
Bits error versus x
Time: 14.1 s
Input Error: 4.0
Output Error: 0.1
Log:
Profile: 🕒
\(\begin{cases} \frac{(\left(-\left(1 + \frac{1}{x}\right)\right) * \left(-\left(\frac{1}{x} + (2 * \left(\frac{-1}{x}\right) + 2)_*\right)\right) + \left(\frac{\frac{1}{x}}{x} - \frac{1}{x}\right))_*}{\left(x - 1\right) \cdot (x * x + x)_*} & \text{when } x \le -2.252093f0 \\ \frac{x - (2 * x + 2)_*}{(x * x + x)_*} + \frac{1}{x - 1} & \text{when } x \le 0.47897726f0 \\ \frac{(\left(-\left(1 + \frac{1}{x}\right)\right) * \left(-\left(\frac{1}{x} + (2 * \left(\frac{-1}{x}\right) + 2)_*\right)\right) + \left(\frac{\frac{1}{x}}{x} - \frac{1}{x}\right))_*}{\left(x - 1\right) \cdot (x * x + x)_*} & \text{otherwise} \end{cases}\)

    if x < -2.252093f0 or 0.47897726f0 < x

    1. Started with
      \[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
      8.0
    2. Using strategy rm
      8.0
    3. Applied frac-sub to get
      \[\color{red}{\left(\frac{1}{x + 1} - \frac{2}{x}\right)} + \frac{1}{x - 1} \leadsto \color{blue}{\frac{1 \cdot x - \left(x + 1\right) \cdot 2}{\left(x + 1\right) \cdot x}} + \frac{1}{x - 1}\]
      22.8
    4. Applied frac-add to get
      \[\color{red}{\frac{1 \cdot x - \left(x + 1\right) \cdot 2}{\left(x + 1\right) \cdot x} + \frac{1}{x - 1}} \leadsto \color{blue}{\frac{\left(1 \cdot x - \left(x + 1\right) \cdot 2\right) \cdot \left(x - 1\right) + \left(\left(x + 1\right) \cdot x\right) \cdot 1}{\left(\left(x + 1\right) \cdot x\right) \cdot \left(x - 1\right)}}\]
      22.6
    5. Applied simplify to get
      \[\frac{\color{red}{\left(1 \cdot x - \left(x + 1\right) \cdot 2\right) \cdot \left(x - 1\right) + \left(\left(x + 1\right) \cdot x\right) \cdot 1}}{\left(\left(x + 1\right) \cdot x\right) \cdot \left(x - 1\right)} \leadsto \frac{\color{blue}{(\left(x - 1\right) * \left(x - (2 * x + 2)_*\right) + \left(x \cdot x + x\right))_*}}{\left(\left(x + 1\right) \cdot x\right) \cdot \left(x - 1\right)}\]
      23.5
    6. Applied simplify to get
      \[\frac{(\left(x - 1\right) * \left(x - (2 * x + 2)_*\right) + \left(x \cdot x + x\right))_*}{\color{red}{\left(\left(x + 1\right) \cdot x\right) \cdot \left(x - 1\right)}} \leadsto \frac{(\left(x - 1\right) * \left(x - (2 * x + 2)_*\right) + \left(x \cdot x + x\right))_*}{\color{blue}{\left(x - 1\right) \cdot (x * x + x)_*}}\]
      27.9
    7. Applied taylor to get
      \[\frac{(\left(x - 1\right) * \left(x - (2 * x + 2)_*\right) + \left(x \cdot x + x\right))_*}{\left(x - 1\right) \cdot (x * x + x)_*} \leadsto \frac{(\left(-\left(1 + \frac{1}{x}\right)\right) * \left(-\left(\frac{1}{x} + (2 * \left(\frac{-1}{x}\right) + 2)_*\right)\right) + \left(\frac{1}{{x}^2} - \frac{1}{x}\right))_*}{\left(x - 1\right) \cdot (x * x + x)_*}\]
      0.1
    8. Taylor expanded around -inf to get
      \[\frac{\color{red}{(\left(-\left(1 + \frac{1}{x}\right)\right) * \left(-\left(\frac{1}{x} + (2 * \left(\frac{-1}{x}\right) + 2)_*\right)\right) + \left(\frac{1}{{x}^2} - \frac{1}{x}\right))_*}}{\left(x - 1\right) \cdot (x * x + x)_*} \leadsto \frac{\color{blue}{(\left(-\left(1 + \frac{1}{x}\right)\right) * \left(-\left(\frac{1}{x} + (2 * \left(\frac{-1}{x}\right) + 2)_*\right)\right) + \left(\frac{1}{{x}^2} - \frac{1}{x}\right))_*}}{\left(x - 1\right) \cdot (x * x + x)_*}\]
      0.1
    9. Applied simplify to get
      \[\frac{(\left(-\left(1 + \frac{1}{x}\right)\right) * \left(-\left(\frac{1}{x} + (2 * \left(\frac{-1}{x}\right) + 2)_*\right)\right) + \left(\frac{1}{{x}^2} - \frac{1}{x}\right))_*}{\left(x - 1\right) \cdot (x * x + x)_*} \leadsto \frac{(\left(-\left(1 + \frac{1}{x}\right)\right) * \left(-\left(\frac{1}{x} + (2 * \left(\frac{-1}{x}\right) + 2)_*\right)\right) + \left(\frac{\frac{1}{x}}{x} - \frac{1}{x}\right))_*}{\left(x - 1\right) \cdot (x * x + x)_*}\]
      0.1

    10. Applied final simplification

    if -2.252093f0 < x < 0.47897726f0

    1. Started with
      \[\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\]
      0.1
    2. Using strategy rm
      0.1
    3. Applied frac-sub to get
      \[\color{red}{\left(\frac{1}{x + 1} - \frac{2}{x}\right)} + \frac{1}{x - 1} \leadsto \color{blue}{\frac{1 \cdot x - \left(x + 1\right) \cdot 2}{\left(x + 1\right) \cdot x}} + \frac{1}{x - 1}\]
      0.1
    4. Applied simplify to get
      \[\frac{\color{red}{1 \cdot x - \left(x + 1\right) \cdot 2}}{\left(x + 1\right) \cdot x} + \frac{1}{x - 1} \leadsto \frac{\color{blue}{x - (2 * x + 2)_*}}{\left(x + 1\right) \cdot x} + \frac{1}{x - 1}\]
      0.0
    5. Applied simplify to get
      \[\frac{x - (2 * x + 2)_*}{\color{red}{\left(x + 1\right) \cdot x}} + \frac{1}{x - 1} \leadsto \frac{x - (2 * x + 2)_*}{\color{blue}{(x * x + x)_*}} + \frac{1}{x - 1}\]
      0.1

  1. Removed slow pow expressions

Original test:


(lambda ((x default))
  #:name "NMSE problem 3.3.3"
  (+ (- (/ 1 (+ x 1)) (/ 2 x)) (/ 1 (- x 1)))
  #:target
  (/ 2 (* x (- (sqr x) 1))))