- Split input into 3 regimes
if (- im) < -1.4625607182931016e+137
Initial program 58.3
\[\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\log base \cdot \log base + 0 \cdot 0}\]
- Using strategy
rm Applied add-sqr-sqrt58.3
\[\leadsto \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\color{blue}{\sqrt{\log base \cdot \log base + 0 \cdot 0} \cdot \sqrt{\log base \cdot \log base + 0 \cdot 0}}}\]
Applied *-un-lft-identity58.3
\[\leadsto \frac{\color{blue}{1 \cdot \left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right)}}{\sqrt{\log base \cdot \log base + 0 \cdot 0} \cdot \sqrt{\log base \cdot \log base + 0 \cdot 0}}\]
Applied times-frac58.3
\[\leadsto \color{blue}{\frac{1}{\sqrt{\log base \cdot \log base + 0 \cdot 0}} \cdot \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\sqrt{\log base \cdot \log base + 0 \cdot 0}}}\]
Simplified60.8
\[\leadsto \color{blue}{\frac{1}{\log base}} \cdot \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\sqrt{\log base \cdot \log base + 0 \cdot 0}}\]
Simplified58.3
\[\leadsto \frac{1}{\log base} \cdot \color{blue}{\frac{\log \left(\sqrt{im \cdot im + re \cdot re}\right) \cdot \log base}{\log base}}\]
Taylor expanded around inf 7.4
\[\leadsto \frac{1}{\log base} \cdot \frac{\log \color{blue}{im} \cdot \log base}{\log base}\]
if -1.4625607182931016e+137 < (- im) < 9.569706975988477e+105
Initial program 21.0
\[\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\log base \cdot \log base + 0 \cdot 0}\]
- Using strategy
rm Applied add-cbrt-cube21.1
\[\leadsto \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\color{blue}{\sqrt[3]{\left(\left(\log base \cdot \log base + 0 \cdot 0\right) \cdot \left(\log base \cdot \log base + 0 \cdot 0\right)\right) \cdot \left(\log base \cdot \log base + 0 \cdot 0\right)}}}\]
Applied add-cbrt-cube21.2
\[\leadsto \frac{\color{blue}{\sqrt[3]{\left(\left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right) \cdot \left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right)\right) \cdot \left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right)}}}{\sqrt[3]{\left(\left(\log base \cdot \log base + 0 \cdot 0\right) \cdot \left(\log base \cdot \log base + 0 \cdot 0\right)\right) \cdot \left(\log base \cdot \log base + 0 \cdot 0\right)}}\]
Applied cbrt-undiv21.1
\[\leadsto \color{blue}{\sqrt[3]{\frac{\left(\left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right) \cdot \left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right)\right) \cdot \left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right)}{\left(\left(\log base \cdot \log base + 0 \cdot 0\right) \cdot \left(\log base \cdot \log base + 0 \cdot 0\right)\right) \cdot \left(\log base \cdot \log base + 0 \cdot 0\right)}}}\]
Simplified21.2
\[\leadsto \sqrt[3]{\color{blue}{{\left(\frac{\log base \cdot \log \left(\sqrt{im \cdot im + re \cdot re}\right)}{\log base \cdot \log base}\right)}^{3}}}\]
if 9.569706975988477e+105 < (- im)
Initial program 51.4
\[\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\log base \cdot \log base + 0 \cdot 0}\]
- Using strategy
rm Applied add-sqr-sqrt51.4
\[\leadsto \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\color{blue}{\sqrt{\log base \cdot \log base + 0 \cdot 0} \cdot \sqrt{\log base \cdot \log base + 0 \cdot 0}}}\]
Applied *-un-lft-identity51.4
\[\leadsto \frac{\color{blue}{1 \cdot \left(\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0\right)}}{\sqrt{\log base \cdot \log base + 0 \cdot 0} \cdot \sqrt{\log base \cdot \log base + 0 \cdot 0}}\]
Applied times-frac51.3
\[\leadsto \color{blue}{\frac{1}{\sqrt{\log base \cdot \log base + 0 \cdot 0}} \cdot \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\sqrt{\log base \cdot \log base + 0 \cdot 0}}}\]
Simplified57.5
\[\leadsto \color{blue}{\frac{1}{\log base}} \cdot \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\sqrt{\log base \cdot \log base + 0 \cdot 0}}\]
Simplified51.3
\[\leadsto \frac{1}{\log base} \cdot \color{blue}{\frac{\log \left(\sqrt{im \cdot im + re \cdot re}\right) \cdot \log base}{\log base}}\]
Taylor expanded around -inf 62.8
\[\leadsto \color{blue}{-1 \cdot \frac{\log \left(\frac{-1}{im}\right)}{\log -1 - \log \left(\frac{-1}{base}\right)}}\]
Simplified8.4
\[\leadsto \color{blue}{\frac{\log \left(\frac{im}{-1}\right)}{\log \left(\frac{-1}{\frac{-1}{base}}\right)}}\]
- Recombined 3 regimes into one program.
Final simplification17.1
\[\leadsto \begin{array}{l}
\mathbf{if}\;-im \le -1.4625607182931016 \cdot 10^{+137}:\\
\;\;\;\;\frac{\log im \cdot \log base}{\log base} \cdot \frac{1}{\log base}\\
\mathbf{elif}\;-im \le 9.569706975988477 \cdot 10^{+105}:\\
\;\;\;\;\sqrt[3]{{\left(\frac{\log base \cdot \log \left(\sqrt{im \cdot im + re \cdot re}\right)}{\log base \cdot \log base}\right)}^{3}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\log \left(\frac{im}{-1}\right)}{\log \left(\frac{-1}{\frac{-1}{base}}\right)}\\
\end{array}\]