\[\frac{e^{x} - 1}{x}\]
Test:
Kahan's exp quotient
Bits:
128 bits
Bits error versus x
Time: 2.2 s
Input Error: 16.9
Output Error: 0.0
Log: ⚲
Profile: 🕒
\(\frac{(e^{x} - 1)^*}{x}\)
  1. Started with
    \[\frac{e^{x} - 1}{x}\]
    16.9
  2. Applied simplify to get
    \[\color{red}{\frac{e^{x} - 1}{x}} \leadsto \color{blue}{\frac{(e^{x} - 1)^*}{x}}\]
    0.0
  3. Removed slow pow expressions

Original test:


(lambda ((x default))
  #:name "Kahan's exp quotient"
  (/ (- (exp x) 1) x)
  #:target
  (if (and (< x 1) (> x -1)) (/ (- (exp x) 1) (log (exp x))) (/ (- (exp x) 1) x)))