- Split input into 4 regimes
if (- im) < -1.57800062106739e+138
Initial program 57.2
\[\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}\]
Taylor expanded around 0 6.9
\[\leadsto \color{blue}{\frac{\log im}{\log base}}\]
if -1.57800062106739e+138 < (- im) < -3.515003298199428e-285 or 6.334346309973972e-282 < (- im) < 1.5092936986322766e+115
Initial program 19.9
\[\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-sqrt19.9
\[\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-identity19.9
\[\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-frac19.9
\[\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}}}\]
Applied simplify19.9
\[\leadsto \color{blue}{\frac{1}{\sqrt{\log base \cdot \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}}\]
Applied simplify19.9
\[\leadsto \frac{1}{\sqrt{\log base \cdot \log base}} \cdot \color{blue}{\frac{\log base \cdot \log \left(\sqrt{im \cdot im + re \cdot re}\right)}{\sqrt{\log base \cdot \log base}}}\]
if -3.515003298199428e-285 < (- im) < 6.334346309973972e-282
Initial program 34.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}\]
Taylor expanded around -inf 28.7
\[\leadsto \frac{\log \color{blue}{\left(-1 \cdot re\right)} \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\log base \cdot \log base + 0 \cdot 0}\]
Applied simplify28.7
\[\leadsto \color{blue}{\frac{\log \left(-re\right)}{\log base}}\]
if 1.5092936986322766e+115 < (- im)
Initial program 53.7
\[\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 flip3-+53.7
\[\leadsto \frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{\color{blue}{\frac{{\left(\log base \cdot \log base\right)}^{3} + {\left(0 \cdot 0\right)}^{3}}{\left(\log base \cdot \log base\right) \cdot \left(\log base \cdot \log base\right) + \left(\left(0 \cdot 0\right) \cdot \left(0 \cdot 0\right) - \left(\log base \cdot \log base\right) \cdot \left(0 \cdot 0\right)\right)}}}\]
Applied associate-/r/53.7
\[\leadsto \color{blue}{\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0}{{\left(\log base \cdot \log base\right)}^{3} + {\left(0 \cdot 0\right)}^{3}} \cdot \left(\left(\log base \cdot \log base\right) \cdot \left(\log base \cdot \log base\right) + \left(\left(0 \cdot 0\right) \cdot \left(0 \cdot 0\right) - \left(\log base \cdot \log base\right) \cdot \left(0 \cdot 0\right)\right)\right)}\]
Applied simplify53.7
\[\leadsto \color{blue}{\frac{\log \left(\sqrt{im \cdot im + re \cdot re}\right)}{{\left(\log base\right)}^{3} \cdot \left(\log base \cdot \log base\right)}} \cdot \left(\left(\log base \cdot \log base\right) \cdot \left(\log base \cdot \log base\right) + \left(\left(0 \cdot 0\right) \cdot \left(0 \cdot 0\right) - \left(\log base \cdot \log base\right) \cdot \left(0 \cdot 0\right)\right)\right)\]
Taylor expanded around -inf 8.7
\[\leadsto \frac{\log \color{blue}{\left(-1 \cdot im\right)}}{{\left(\log base\right)}^{3} \cdot \left(\log base \cdot \log base\right)} \cdot \left(\left(\log base \cdot \log base\right) \cdot \left(\log base \cdot \log base\right) + \left(\left(0 \cdot 0\right) \cdot \left(0 \cdot 0\right) - \left(\log base \cdot \log base\right) \cdot \left(0 \cdot 0\right)\right)\right)\]
Applied simplify8.5
\[\leadsto \color{blue}{\frac{\log \left(-im\right)}{\frac{\log base}{1}}}\]
- Recombined 4 regimes into one program.
Applied simplify16.6
\[\leadsto \color{blue}{\begin{array}{l}
\mathbf{if}\;-im \le -1.57800062106739 \cdot 10^{+138}:\\
\;\;\;\;\frac{\log im}{\log base}\\
\mathbf{if}\;-im \le -3.515003298199428 \cdot 10^{-285}:\\
\;\;\;\;\frac{1}{\sqrt{\log base \cdot \log base}} \cdot \frac{\log \left(\sqrt{im \cdot im + re \cdot re}\right) \cdot \log base}{\sqrt{\log base \cdot \log base}}\\
\mathbf{if}\;-im \le 6.334346309973972 \cdot 10^{-282}:\\
\;\;\;\;\frac{\log \left(-re\right)}{\log base}\\
\mathbf{if}\;-im \le 1.5092936986322766 \cdot 10^{+115}:\\
\;\;\;\;\frac{1}{\sqrt{\log base \cdot \log base}} \cdot \frac{\log \left(\sqrt{im \cdot im + re \cdot re}\right) \cdot \log base}{\sqrt{\log base \cdot \log base}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\log \left(-im\right)}{\log base}\\
\end{array}}\]