- Split input into 2 regimes
if a < -1.004642425211476 or 1.013453287205224 < a
Initial program 0.5
\[\left({\left(a \cdot a + b \cdot b\right)}^{2} + 4 \cdot \left(b \cdot b\right)\right) - 1\]
Initial simplification0.5
\[\leadsto (\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + \left((\left(4 \cdot b\right) \cdot b + -1)_*\right))_*\]
Taylor expanded around -inf 0.9
\[\leadsto \color{blue}{{b}^{4} + \left(2 \cdot \left({a}^{2} \cdot {b}^{2}\right) + {a}^{4}\right)}\]
Simplified0.9
\[\leadsto \color{blue}{(2 \cdot \left(\left(a \cdot b\right) \cdot \left(a \cdot b\right)\right) + \left({a}^{4} + {b}^{4}\right))_*}\]
if -1.004642425211476 < a < 1.013453287205224
Initial program 0.1
\[\left({\left(a \cdot a + b \cdot b\right)}^{2} + 4 \cdot \left(b \cdot b\right)\right) - 1\]
Initial simplification0.1
\[\leadsto (\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + \left((\left(4 \cdot b\right) \cdot b + -1)_*\right))_*\]
- Using strategy
rm Applied add-cbrt-cube3.9
\[\leadsto (\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \color{blue}{\left(\sqrt[3]{\left((b \cdot b + \left(a \cdot a\right))_* \cdot (b \cdot b + \left(a \cdot a\right))_*\right) \cdot (b \cdot b + \left(a \cdot a\right))_*}\right)} + \left((\left(4 \cdot b\right) \cdot b + -1)_*\right))_*\]
Taylor expanded around -inf 0.3
\[\leadsto \color{blue}{\left({b}^{4} + \left(2 \cdot \left({a}^{2} \cdot {b}^{2}\right) + 4 \cdot {b}^{2}\right)\right) - 1}\]
Simplified0.3
\[\leadsto \color{blue}{(\left(b \cdot b\right) \cdot \left((a \cdot \left(2 \cdot a\right) + 4)_*\right) + \left({b}^{4} + -1\right))_*}\]
- Recombined 2 regimes into one program.
Final simplification0.4
\[\leadsto \begin{array}{l}
\mathbf{if}\;a \le -1.004642425211476 \lor \neg \left(a \le 1.013453287205224\right):\\
\;\;\;\;(2 \cdot \left(\left(b \cdot a\right) \cdot \left(b \cdot a\right)\right) + \left({a}^{4} + {b}^{4}\right))_*\\
\mathbf{else}:\\
\;\;\;\;(\left(b \cdot b\right) \cdot \left((a \cdot \left(2 \cdot a\right) + 4)_*\right) + \left(-1 + {b}^{4}\right))_*\\
\end{array}\]