Average Error: 30.3 → 0.4
Time: 1.1m
Precision: 64
Internal Precision: 128
\[\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(\sqrt{re^2 + im^2}^*\right)}{\log base}\]

Error

Bits error versus re

Bits error versus im

Bits error versus base

Derivation

  1. Initial program 30.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}\]
  2. Simplified0.4

    \[\leadsto \color{blue}{\frac{\log \left(\sqrt{re^2 + im^2}^*\right)}{\log base}}\]
  3. Using strategy rm
  4. Applied *-un-lft-identity0.4

    \[\leadsto \frac{\color{blue}{1 \cdot \log \left(\sqrt{re^2 + im^2}^*\right)}}{\log base}\]
  5. Applied associate-/l*0.4

    \[\leadsto \color{blue}{\frac{1}{\frac{\log base}{\log \left(\sqrt{re^2 + im^2}^*\right)}}}\]
  6. Using strategy rm
  7. Applied pow10.4

    \[\leadsto \frac{1}{\frac{\log base}{\log \color{blue}{\left({\left(\sqrt{re^2 + im^2}^*\right)}^{1}\right)}}}\]
  8. Applied log-pow0.4

    \[\leadsto \frac{1}{\frac{\log base}{\color{blue}{1 \cdot \log \left(\sqrt{re^2 + im^2}^*\right)}}}\]
  9. Applied *-un-lft-identity0.4

    \[\leadsto \frac{1}{\frac{\color{blue}{1 \cdot \log base}}{1 \cdot \log \left(\sqrt{re^2 + im^2}^*\right)}}\]
  10. Applied times-frac0.4

    \[\leadsto \frac{1}{\color{blue}{\frac{1}{1} \cdot \frac{\log base}{\log \left(\sqrt{re^2 + im^2}^*\right)}}}\]
  11. Applied add-cube-cbrt0.4

    \[\leadsto \frac{\color{blue}{\left(\sqrt[3]{1} \cdot \sqrt[3]{1}\right) \cdot \sqrt[3]{1}}}{\frac{1}{1} \cdot \frac{\log base}{\log \left(\sqrt{re^2 + im^2}^*\right)}}\]
  12. Applied times-frac0.4

    \[\leadsto \color{blue}{\frac{\sqrt[3]{1} \cdot \sqrt[3]{1}}{\frac{1}{1}} \cdot \frac{\sqrt[3]{1}}{\frac{\log base}{\log \left(\sqrt{re^2 + im^2}^*\right)}}}\]
  13. Simplified0.4

    \[\leadsto \color{blue}{1} \cdot \frac{\sqrt[3]{1}}{\frac{\log base}{\log \left(\sqrt{re^2 + im^2}^*\right)}}\]
  14. Simplified0.4

    \[\leadsto 1 \cdot \color{blue}{\frac{\log \left(\sqrt{re^2 + im^2}^*\right)}{\log base}}\]
  15. Final simplification0.4

    \[\leadsto \frac{\log \left(\sqrt{re^2 + im^2}^*\right)}{\log base}\]

Reproduce

herbie shell --seed 2019091 +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))))