Average Error: 58.6 → 2.9
Time: 1.2m
Precision: 64
Internal Precision: 2432
\[\frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\left(e^{a \cdot \varepsilon} - 1\right) \cdot \left(e^{b \cdot \varepsilon} - 1\right)}\]
↓
\[\begin{array}{l}
\mathbf{if}\;\sqrt[3]{\frac{1}{b} + \frac{1}{a}} \le -8.15986298835217 \cdot 10^{-52}:\\
\;\;\;\;\frac{1}{b} + \frac{1}{a}\\
\mathbf{if}\;\sqrt[3]{\frac{1}{b} + \frac{1}{a}} \le 4.39360750616087 \cdot 10^{-87}:\\
\;\;\;\;\frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\log \left(e^{e^{a \cdot \varepsilon} - 1}\right) \cdot \left(e^{b \cdot \varepsilon} - 1\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{b} + \frac{1}{a}\\
\end{array}\]
Target
| Original | 58.6 |
|---|
| Target | 14.2 |
|---|
| Herbie | 2.9 |
|---|
\[\frac{a + b}{a \cdot b}\]
Derivation
- Split input into 2 regimes
if (cbrt (+ (/ 1 b) (/ 1 a))) < -8.15986298835217e-52 or 4.39360750616087e-87 < (cbrt (+ (/ 1 b) (/ 1 a)))
Initial program 59.7
\[\frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\left(e^{a \cdot \varepsilon} - 1\right) \cdot \left(e^{b \cdot \varepsilon} - 1\right)}\]
Taylor expanded around 0 2.3
\[\leadsto \color{blue}{\frac{1}{b} + \frac{1}{a}}\]
if -8.15986298835217e-52 < (cbrt (+ (/ 1 b) (/ 1 a))) < 4.39360750616087e-87
Initial program 21.7
\[\frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\left(e^{a \cdot \varepsilon} - 1\right) \cdot \left(e^{b \cdot \varepsilon} - 1\right)}\]
- Using strategy
rm Applied add-log-exp21.7
\[\leadsto \frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\color{blue}{\log \left(e^{e^{a \cdot \varepsilon} - 1}\right)} \cdot \left(e^{b \cdot \varepsilon} - 1\right)}\]
- Recombined 2 regimes into one program.
Runtime
herbie shell --seed '#(1070991898 1055468627 4280279443 640792587 928206309 3646738750)'
(FPCore (a b eps)
:name "expq3 (problem 3.4.2)"
:pre (and (< -1 eps) (< eps 1))
:herbie-target
(/ (+ a b) (* a b))
(/ (* eps (- (exp (* (+ a b) eps)) 1)) (* (- (exp (* a eps)) 1) (- (exp (* b eps)) 1))))