Average Error: 58.4 → 3.1
Time: 1.2m
Precision: 64
Internal Precision: 2368
\[\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}\;\frac{1}{b} + \frac{1}{a} \le -1.207270435829667 \cdot 10^{-118}:\\
\;\;\;\;\frac{1}{b} + \frac{1}{a}\\
\mathbf{if}\;\frac{1}{b} + \frac{1}{a} \le 4.154194795328148 \cdot 10^{-180}:\\
\;\;\;\;\frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\left(e^{a \cdot \varepsilon} - 1\right) \cdot \left(\left(\sqrt{e^{b \cdot \varepsilon}} + 1\right) \cdot \left(\sqrt{e^{b \cdot \varepsilon}} - 1\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{b} + \frac{1}{a}\\
\end{array}\]
Target
| Original | 58.4 |
|---|
| Target | 14.5 |
|---|
| Herbie | 3.1 |
|---|
\[\frac{a + b}{a \cdot b}\]
Derivation
- Split input into 2 regimes
if (+ (/ 1 b) (/ 1 a)) < -1.207270435829667e-118 or 4.154194795328148e-180 < (+ (/ 1 b) (/ 1 a))
Initial program 60.2
\[\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 1.9
\[\leadsto \color{blue}{\frac{1}{b} + \frac{1}{a}}\]
if -1.207270435829667e-118 < (+ (/ 1 b) (/ 1 a)) < 4.154194795328148e-180
Initial program 25.8
\[\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-sqr-sqrt25.9
\[\leadsto \frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\left(e^{a \cdot \varepsilon} - 1\right) \cdot \left(\color{blue}{\sqrt{e^{b \cdot \varepsilon}} \cdot \sqrt{e^{b \cdot \varepsilon}}} - 1\right)}\]
Applied difference-of-sqr-125.9
\[\leadsto \frac{\varepsilon \cdot \left(e^{\left(a + b\right) \cdot \varepsilon} - 1\right)}{\left(e^{a \cdot \varepsilon} - 1\right) \cdot \color{blue}{\left(\left(\sqrt{e^{b \cdot \varepsilon}} + 1\right) \cdot \left(\sqrt{e^{b \cdot \varepsilon}} - 1\right)\right)}}\]
- Recombined 2 regimes into one program.
Runtime
herbie shell --seed '#(1071119240 1686926585 3481876196 78132896 2080707795 3185793749)'
(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))))