\[\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}\]

↓

\[\frac{\log \left((e^{\log_* (1 + \sqrt{re^2 + im^2}^*)} - 1)^*\right)}{\log base}\]

Error

The X axis uses an exponential scale — Bits error versus `re`

Try it out

In
Out

Enter valid numbers for all inputs

Derivation

Initial program 30.8
\[\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}\]
Simplified0.4
\[\leadsto \color{blue}{\frac{\log \left(\sqrt{re^2 + im^2}^*\right)}{\log base}}\]
Using strategy rm
Applied expm1-log1p-u0.4
\[\leadsto \frac{\log \color{blue}{\left((e^{\log_* (1 + \sqrt{re^2 + im^2}^*)} - 1)^*\right)}}{\log base}\]
Final simplification0.4
\[\leadsto \frac{\log \left((e^{\log_* (1 + \sqrt{re^2 + im^2}^*)} - 1)^*\right)}{\log base}\]

Reproduce

herbie shell --seed 2019030 +o rules:numerics
(FPCore (re im base)
  :name "math.log/2 on complex, real part"
  (/ (+ (* (log (sqrt (+ (* re re) (* im im)))) (log base)) (* (atan2 im re) 0)) (+ (* (log base) (log base)) (* 0 0))))