Average Error: 32.3 → 0.6
Time: 5.6s
Precision: 64
\[\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0.0}{\log base \cdot \log base + 0.0 \cdot 0.0}\]
↓
\[\frac{\frac{\mathsf{fma}\left(\log \left(\mathsf{hypot}\left(im, re\right)\right), \log base, \tan^{-1}_* \frac{im}{re} \cdot 0.0\right) \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0\right)}{\mathsf{fma}\left(0.0, 0.0, {\left(\log base\right)}^{2}\right)}}{\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0}\]
\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0.0}{\log base \cdot \log base + 0.0 \cdot 0.0}
↓
\frac{\frac{\mathsf{fma}\left(\log \left(\mathsf{hypot}\left(im, re\right)\right), \log base, \tan^{-1}_* \frac{im}{re} \cdot 0.0\right) \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0\right)}{\mathsf{fma}\left(0.0, 0.0, {\left(\log base\right)}^{2}\right)}}{\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0}
double code(double re, double im, double base) {
	return (((log(sqrt(((re * re) + (im * im)))) * log(base)) + (atan2(im, re) * 0.0)) / ((log(base) * log(base)) + (0.0 * 0.0)));
}
↓
double code(double re, double im, double base) {
	return (((fma(log(hypot(im, re)), log(base), (atan2(im, re) * 0.0)) * ((log(hypot(im, re)) * log(base)) - (atan2(im, re) * 0.0))) / fma(0.0, 0.0, pow(log(base), 2.0))) / ((log(hypot(im, re)) * log(base)) - (atan2(im, re) * 0.0)));
}

Error

Bits error versus re

Bits error versus im

Bits error versus base

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 32.3

    \[\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0.0}{\log base \cdot \log base + 0.0 \cdot 0.0}\]
  2. Using strategy rm

  3. Applied +-commutative32.3

    \[\leadsto \frac{\log \left(\sqrt{\color{blue}{im \cdot im + re \cdot re}}\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0.0}{\log base \cdot \log base + 0.0 \cdot 0.0}\]

  4. Applied hypot-def0.5

    \[\leadsto \frac{\log \color{blue}{\left(\mathsf{hypot}\left(im, re\right)\right)} \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0.0}{\log base \cdot \log base + 0.0 \cdot 0.0}\]
  5. Using strategy rm

  6. Applied clear-num0.5

    \[\leadsto \color{blue}{\frac{1}{\frac{\log base \cdot \log base + 0.0 \cdot 0.0}{\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base + \tan^{-1}_* \frac{im}{re} \cdot 0.0}}}\]
  7. Using strategy rm

  8. Applied flip-+0.6

    \[\leadsto \frac{1}{\frac{\log base \cdot \log base + 0.0 \cdot 0.0}{\color{blue}{\frac{\left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base\right) \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base\right) - \left(\tan^{-1}_* \frac{im}{re} \cdot 0.0\right) \cdot \left(\tan^{-1}_* \frac{im}{re} \cdot 0.0\right)}{\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0}}}}\]

  9. Applied associate-/r/0.6

    \[\leadsto \frac{1}{\color{blue}{\frac{\log base \cdot \log base + 0.0 \cdot 0.0}{\left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base\right) \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base\right) - \left(\tan^{-1}_* \frac{im}{re} \cdot 0.0\right) \cdot \left(\tan^{-1}_* \frac{im}{re} \cdot 0.0\right)} \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0\right)}}\]

  10. Applied associate-/r*0.6

    \[\leadsto \color{blue}{\frac{\frac{1}{\frac{\log base \cdot \log base + 0.0 \cdot 0.0}{\left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base\right) \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base\right) - \left(\tan^{-1}_* \frac{im}{re} \cdot 0.0\right) \cdot \left(\tan^{-1}_* \frac{im}{re} \cdot 0.0\right)}}}{\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0}}\]

  11. Simplified0.6

    \[\leadsto \frac{\color{blue}{\frac{\mathsf{fma}\left(\log \left(\mathsf{hypot}\left(im, re\right)\right), \log base, \tan^{-1}_* \frac{im}{re} \cdot 0.0\right) \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0\right)}{\mathsf{fma}\left(0.0, 0.0, {\left(\log base\right)}^{2}\right)}}}{\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0}\]

  12. Final simplification0.6

    \[\leadsto \frac{\frac{\mathsf{fma}\left(\log \left(\mathsf{hypot}\left(im, re\right)\right), \log base, \tan^{-1}_* \frac{im}{re} \cdot 0.0\right) \cdot \left(\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0\right)}{\mathsf{fma}\left(0.0, 0.0, {\left(\log base\right)}^{2}\right)}}{\log \left(\mathsf{hypot}\left(im, re\right)\right) \cdot \log base - \tan^{-1}_* \frac{im}{re} \cdot 0.0}\]

Reproduce

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