\[\frac{e^{x}}{e^{x} - 1}\]
Test:
NMSE section 3.11
Bits:
128 bits
Bits error versus x
Time: 4.9 s
Input Error: 45.3
Output Error: 0.1
Log: ⚲
Profile: 🕒
\(\begin{cases} \frac{e^{x}}{e^{x} - 1} & \text{when } x \le -2.0926544674404998 \cdot 10^{-09} \\ \frac{1}{2} + \left(\frac{1}{x} + \frac{1}{12} \cdot x\right) & \text{when } x \le 6.840282922734168 \\ \frac{1}{1 - e^{-x}} & \text{otherwise} \end{cases}\)

    if x < -2.0926544674404998e-09

    1. Started with
      \[\frac{e^{x}}{e^{x} - 1}\]
      0.3

    if -2.0926544674404998e-09 < x < 6.840282922734168

    1. Started with
      \[\frac{e^{x}}{e^{x} - 1}\]
      60.8
    2. Applied taylor to get
      \[\frac{e^{x}}{e^{x} - 1} \leadsto \frac{1}{2} + \left(\frac{1}{x} + \frac{1}{12} \cdot x\right)\]
      0.0
    3. Taylor expanded around 0 to get
      \[\color{red}{\frac{1}{2} + \left(\frac{1}{x} + \frac{1}{12} \cdot x\right)} \leadsto \color{blue}{\frac{1}{2} + \left(\frac{1}{x} + \frac{1}{12} \cdot x\right)}\]
      0.0

    if 6.840282922734168 < x

    1. Started with
      \[\frac{e^{x}}{e^{x} - 1}\]
      61.4
    2. Using strategy rm
      61.4
    3. Applied clear-num to get
      \[\color{red}{\frac{e^{x}}{e^{x} - 1}} \leadsto \color{blue}{\frac{1}{\frac{e^{x} - 1}{e^{x}}}}\]
      61.4
    4. Applied simplify to get
      \[\frac{1}{\color{red}{\frac{e^{x} - 1}{e^{x}}}} \leadsto \frac{1}{\color{blue}{1 - e^{-x}}}\]
      0.0
  1. Removed slow pow expressions

Original test:


(lambda ((x default))
  #:name "NMSE section 3.11"
  (/ (exp x) (- (exp x) 1))
  #:target
  (/ 1 (- 1 (exp (- x)))))