- Split input into 2 regimes
if x < -0.0018546157771360632
Initial program 0.0
\[\frac{e^{x}}{e^{x} - 1}\]
- Using strategy
rm Applied flip3--0.0
\[\leadsto \frac{e^{x}}{\color{blue}{\frac{{\left(e^{x}\right)}^{3} - {1}^{3}}{e^{x} \cdot e^{x} + \left(1 \cdot 1 + e^{x} \cdot 1\right)}}}\]
Applied associate-/r/0.0
\[\leadsto \color{blue}{\frac{e^{x}}{{\left(e^{x}\right)}^{3} - {1}^{3}} \cdot \left(e^{x} \cdot e^{x} + \left(1 \cdot 1 + e^{x} \cdot 1\right)\right)}\]
Simplified0.0
\[\leadsto \frac{e^{x}}{{\left(e^{x}\right)}^{3} - {1}^{3}} \cdot \color{blue}{\left(e^{x + x} + \left(1 + e^{x}\right)\right)}\]
if -0.0018546157771360632 < x
Initial program 60.3
\[\frac{e^{x}}{e^{x} - 1}\]
Taylor expanded around 0 0.8
\[\leadsto \color{blue}{\frac{1}{12} \cdot x + \left(\frac{1}{x} + \frac{1}{2}\right)}\]
- Using strategy
rm Applied add-cube-cbrt0.8
\[\leadsto \color{blue}{\left(\sqrt[3]{\frac{1}{12} \cdot x} \cdot \sqrt[3]{\frac{1}{12} \cdot x}\right) \cdot \sqrt[3]{\frac{1}{12} \cdot x}} + \left(\frac{1}{x} + \frac{1}{2}\right)\]
- Using strategy
rm Applied add-exp-log0.8
\[\leadsto \color{blue}{e^{\log \left(\sqrt[3]{\frac{1}{12} \cdot x} \cdot \sqrt[3]{\frac{1}{12} \cdot x}\right)}} \cdot \sqrt[3]{\frac{1}{12} \cdot x} + \left(\frac{1}{x} + \frac{1}{2}\right)\]
- Using strategy
rm Applied *-un-lft-identity0.8
\[\leadsto e^{\color{blue}{1 \cdot \log \left(\sqrt[3]{\frac{1}{12} \cdot x} \cdot \sqrt[3]{\frac{1}{12} \cdot x}\right)}} \cdot \sqrt[3]{\frac{1}{12} \cdot x} + \left(\frac{1}{x} + \frac{1}{2}\right)\]
Applied exp-prod0.8
\[\leadsto \color{blue}{{\left(e^{1}\right)}^{\left(\log \left(\sqrt[3]{\frac{1}{12} \cdot x} \cdot \sqrt[3]{\frac{1}{12} \cdot x}\right)\right)}} \cdot \sqrt[3]{\frac{1}{12} \cdot x} + \left(\frac{1}{x} + \frac{1}{2}\right)\]
Simplified0.8
\[\leadsto {\color{blue}{e}}^{\left(\log \left(\sqrt[3]{\frac{1}{12} \cdot x} \cdot \sqrt[3]{\frac{1}{12} \cdot x}\right)\right)} \cdot \sqrt[3]{\frac{1}{12} \cdot x} + \left(\frac{1}{x} + \frac{1}{2}\right)\]
- Recombined 2 regimes into one program.
Final simplification0.5
\[\leadsto \begin{array}{l}
\mathbf{if}\;x \le -0.0018546157771360632:\\
\;\;\;\;\frac{e^{x}}{{\left(e^{x}\right)}^{3} - 1} \cdot \left(\left(e^{x} + 1\right) + e^{x + x}\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{2} + \frac{1}{x}\right) + \sqrt[3]{x \cdot \frac{1}{12}} \cdot {e}^{\left(\log \left(\sqrt[3]{x \cdot \frac{1}{12}} \cdot \sqrt[3]{x \cdot \frac{1}{12}}\right)\right)}\\
\end{array}\]