math.log10 on complex, real part

Average Error: 32.3 → 0.3

Time: 5.2s

Precision: 64

Math

\[\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right)}{\log 10}\]

↓

\[\frac{1}{\sqrt{\log 10}} \cdot \log \left({\left(\mathsf{hypot}\left(re, im\right)\right)}^{\left(\frac{1}{\sqrt{\log 10}}\right)}\right)\]

C

double f(double re, double im) {
        double r36990 = re;
        double r36991 = r36990 * r36990;
        double r36992 = im;
        double r36993 = r36992 * r36992;
        double r36994 = r36991 + r36993;
        double r36995 = sqrt(r36994);
        double r36996 = log(r36995);
        double r36997 = 10.0;
        double r36998 = log(r36997);
        double r36999 = r36996 / r36998;
        return r36999;
}

↓

double f(double re, double im) {
        double r37000 = 1.0;
        double r37001 = 10.0;
        double r37002 = log(r37001);
        double r37003 = sqrt(r37002);
        double r37004 = r37000 / r37003;
        double r37005 = re;
        double r37006 = im;
        double r37007 = hypot(r37005, r37006);
        double r37008 = pow(r37007, r37004);
        double r37009 = log(r37008);
        double r37010 = r37004 * r37009;
        return r37010;
}

Error

Bits error versus re

Bits error versus im

Derivation

1. Initial program 32.3

   \[\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right)}{\log 10}\]
2. Using strategy rm

3. Applied *-un-lft-identity 32.3

   \[\leadsto \frac{\log \left(\sqrt{\color{blue}{1 \cdot \left(re \cdot re + im \cdot im\right)}}\right)}{\log 10}\]

4. Applied sqrt-prod 32.3

   \[\leadsto \frac{\log \color{blue}{\left(\sqrt{1} \cdot \sqrt{re \cdot re + im \cdot im}\right)}}{\log 10}\]

5. Simplified 32.3

   \[\leadsto \frac{\log \left(\color{blue}{1} \cdot \sqrt{re \cdot re + im \cdot im}\right)}{\log 10}\]

6. Simplified 0.6

   \[\leadsto \frac{\log \left(1 \cdot \color{blue}{\mathsf{hypot}\left(re, im\right)}\right)}{\log 10}\]
7. Using strategy rm

8. Applied add-sqr-sqrt 0.6

   \[\leadsto \frac{\log \left(1 \cdot \mathsf{hypot}\left(re, im\right)\right)}{\color{blue}{\sqrt{\log 10} \cdot \sqrt{\log 10}}}\]

9. Applied pow1 0.6

   \[\leadsto \frac{\log \left(1 \cdot \color{blue}{{\left(\mathsf{hypot}\left(re, im\right)\right)}^{1}}\right)}{\sqrt{\log 10} \cdot \sqrt{\log 10}}\]

10. Applied pow1 0.6

    \[\leadsto \frac{\log \left(\color{blue}{{1}^{1}} \cdot {\left(\mathsf{hypot}\left(re, im\right)\right)}^{1}\right)}{\sqrt{\log 10} \cdot \sqrt{\log 10}}\]

11. Applied pow-prod-down 0.6

    \[\leadsto \frac{\log \color{blue}{\left({\left(1 \cdot \mathsf{hypot}\left(re, im\right)\right)}^{1}\right)}}{\sqrt{\log 10} \cdot \sqrt{\log 10}}\]

12. Applied log-pow 0.6

    \[\leadsto \frac{\color{blue}{1 \cdot \log \left(1 \cdot \mathsf{hypot}\left(re, im\right)\right)}}{\sqrt{\log 10} \cdot \sqrt{\log 10}}\]

13. Applied times-frac 0.5

    \[\leadsto \color{blue}{\frac{1}{\sqrt{\log 10}} \cdot \frac{\log \left(1 \cdot \mathsf{hypot}\left(re, im\right)\right)}{\sqrt{\log 10}}}\]
14. Using strategy rm

15. Applied add-log-exp 0.5

    \[\leadsto \frac{1}{\sqrt{\log 10}} \cdot \color{blue}{\log \left(e^{\frac{\log \left(1 \cdot \mathsf{hypot}\left(re, im\right)\right)}{\sqrt{\log 10}}}\right)}\]

16. Simplified 0.3

    \[\leadsto \frac{1}{\sqrt{\log 10}} \cdot \log \color{blue}{\left({\left(\mathsf{hypot}\left(re, im\right)\right)}^{\left(\frac{1}{\sqrt{\log 10}}\right)}\right)}\]

17. Final simplification 0.3

    \[\leadsto \frac{1}{\sqrt{\log 10}} \cdot \log \left({\left(\mathsf{hypot}\left(re, im\right)\right)}^{\left(\frac{1}{\sqrt{\log 10}}\right)}\right)\]

Reproduce

herbie shell --seed 2020083 +o rules:numerics
(FPCore (re im)
  :name "math.log10 on complex, real part"
  :precision binary64
  (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)))