\[e^{a \cdot x} - 1\]
Test:
NMSE section 3.5
Bits:
128 bits
Bits error versus a
Bits error versus x
Time: 6.8 s
Input Error: 14.8
Output Error: 0.6
Log:
Profile: 🕒
\(\begin{cases} e^{a \cdot x} - 1 & \text{when } a \cdot x \le -0.0036532518f0 \\ \left(\left(\frac{1}{2} \cdot \left(x \cdot a\right) + 1\right) \cdot x\right) \cdot a & \text{otherwise} \end{cases}\)

    if (* a x) < -0.0036532518f0

    1. Started with
      \[e^{a \cdot x} - 1\]
      0.1

    if -0.0036532518f0 < (* a x)

    1. Started with
      \[e^{a \cdot x} - 1\]
      21.3
    2. Applied taylor to get
      \[e^{a \cdot x} - 1 \leadsto \left(\frac{1}{2} \cdot \left({a}^2 \cdot {x}^2\right) + \left(1 + a \cdot x\right)\right) - 1\]
      20.0
    3. Taylor expanded around 0 to get
      \[\color{red}{\left(\frac{1}{2} \cdot \left({a}^2 \cdot {x}^2\right) + \left(1 + a \cdot x\right)\right)} - 1 \leadsto \color{blue}{\left(\frac{1}{2} \cdot \left({a}^2 \cdot {x}^2\right) + \left(1 + a \cdot x\right)\right)} - 1\]
      20.0
    4. Applied simplify to get
      \[\color{red}{\left(\frac{1}{2} \cdot \left({a}^2 \cdot {x}^2\right) + \left(1 + a \cdot x\right)\right) - 1} \leadsto \color{blue}{\left(\frac{1}{2} \cdot \left(x \cdot a\right)\right) \cdot \left(x \cdot a\right) + x \cdot a}\]
      0.1
    5. Using strategy rm
      0.1
    6. Applied distribute-lft1-in to get
      \[\color{red}{\left(\frac{1}{2} \cdot \left(x \cdot a\right)\right) \cdot \left(x \cdot a\right) + x \cdot a} \leadsto \color{blue}{\left(\frac{1}{2} \cdot \left(x \cdot a\right) + 1\right) \cdot \left(x \cdot a\right)}\]
      0.1
    7. Using strategy rm
      0.1
    8. Applied associate-*r* to get
      \[\color{red}{\left(\frac{1}{2} \cdot \left(x \cdot a\right) + 1\right) \cdot \left(x \cdot a\right)} \leadsto \color{blue}{\left(\left(\frac{1}{2} \cdot \left(x \cdot a\right) + 1\right) \cdot x\right) \cdot a}\]
      0.8

  1. Removed slow pow expressions

Original test:


(lambda ((a default) (x default))
  #:name "NMSE section 3.5"
  (- (exp (* a x)) 1)
  #:target
  (if (< (fabs (* a x)) 1/10) (* (* a x) (+ 1 (+ (/ (* a x) 2) (/ (sqr (* a x)) 6)))) (- (exp (* a x)) 1)))