Initial program 0.2
\[\left({\left(a \cdot a + b \cdot b\right)}^{2} + 4 \cdot \left(\left(a \cdot a\right) \cdot \left(1 + a\right) + \left(b \cdot b\right) \cdot \left(1 - 3 \cdot a\right)\right)\right) - 1\]
Simplified0.2
\[\leadsto \color{blue}{(\left((\left(b \cdot b\right) \cdot \left((-3 \cdot a + 1)_*\right) + \left((\left(a \cdot a\right) \cdot a + \left(a \cdot a\right))_*\right))_*\right) \cdot 4 + \left((\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*\right))_*}\]
- Using strategy
rm Applied add-cube-cbrt0.5
\[\leadsto (\left((\left(b \cdot b\right) \cdot \left((-3 \cdot a + 1)_*\right) + \left((\left(a \cdot a\right) \cdot a + \left(a \cdot a\right))_*\right))_*\right) \cdot 4 + \color{blue}{\left(\left(\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*} \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}\right) \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}\right)})_*\]
- Using strategy
rm Applied add-cube-cbrt0.5
\[\leadsto (\left((\left(b \cdot b\right) \cdot \left((-3 \cdot a + 1)_*\right) + \left((\left(a \cdot a\right) \cdot a + \left(a \cdot a\right))_*\right))_*\right) \cdot 4 + \left(\left(\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*} \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}\right) \cdot \sqrt[3]{\color{blue}{\left(\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*} \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}\right) \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}}}\right))_*\]
Applied cbrt-prod0.5
\[\leadsto (\left((\left(b \cdot b\right) \cdot \left((-3 \cdot a + 1)_*\right) + \left((\left(a \cdot a\right) \cdot a + \left(a \cdot a\right))_*\right))_*\right) \cdot 4 + \left(\left(\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*} \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}\right) \cdot \color{blue}{\left(\sqrt[3]{\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*} \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}} \cdot \sqrt[3]{\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}}\right)}\right))_*\]
Final simplification0.5
\[\leadsto (\left((\left(b \cdot b\right) \cdot \left((-3 \cdot a + 1)_*\right) + \left((\left(a \cdot a\right) \cdot a + \left(a \cdot a\right))_*\right))_*\right) \cdot 4 + \left(\left(\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*} \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}\right) \cdot \left(\sqrt[3]{\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*} \cdot \sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}} \cdot \sqrt[3]{\sqrt[3]{(\left((b \cdot b + \left(a \cdot a\right))_*\right) \cdot \left((b \cdot b + \left(a \cdot a\right))_*\right) + -1)_*}}\right)\right))_*\]