Average Error: 0.8 → 0.2
Time: 3.5s
Precision: 64
\[\frac{\tan^{-1}_* \frac{im}{re}}{\log 10}\]
↓
\[\sqrt{\frac{\sqrt{1}}{\sqrt[3]{\sqrt{\log 10}} \cdot \sqrt[3]{\sqrt{\log 10}}}} \cdot \left(\sqrt{\frac{1}{\sqrt[3]{\sqrt{\log 10}}}} \cdot \left(\sqrt{\frac{1}{\sqrt{\log 10}}} \cdot \left(\tan^{-1}_* \frac{im}{re} \cdot \sqrt{\frac{1}{\log 10}}\right)\right)\right)\]
\frac{\tan^{-1}_* \frac{im}{re}}{\log 10}
↓
\sqrt{\frac{\sqrt{1}}{\sqrt[3]{\sqrt{\log 10}} \cdot \sqrt[3]{\sqrt{\log 10}}}} \cdot \left(\sqrt{\frac{1}{\sqrt[3]{\sqrt{\log 10}}}} \cdot \left(\sqrt{\frac{1}{\sqrt{\log 10}}} \cdot \left(\tan^{-1}_* \frac{im}{re} \cdot \sqrt{\frac{1}{\log 10}}\right)\right)\right)
double f(double re, double im) {
        double r86529 = im;
        double r86530 = re;
        double r86531 = atan2(r86529, r86530);
        double r86532 = 10.0;
        double r86533 = log(r86532);
        double r86534 = r86531 / r86533;
        return r86534;
}
↓
double f(double re, double im) {
        double r86535 = 1.0;
        double r86536 = sqrt(r86535);
        double r86537 = 10.0;
        double r86538 = log(r86537);
        double r86539 = sqrt(r86538);
        double r86540 = cbrt(r86539);
        double r86541 = r86540 * r86540;
        double r86542 = r86536 / r86541;
        double r86543 = sqrt(r86542);
        double r86544 = r86535 / r86540;
        double r86545 = sqrt(r86544);
        double r86546 = r86535 / r86539;
        double r86547 = sqrt(r86546);
        double r86548 = im;
        double r86549 = re;
        double r86550 = atan2(r86548, r86549);
        double r86551 = r86535 / r86538;
        double r86552 = sqrt(r86551);
        double r86553 = r86550 * r86552;
        double r86554 = r86547 * r86553;
        double r86555 = r86545 * r86554;
        double r86556 = r86543 * r86555;
        return r86556;
}

Error

Bits error versus re

Bits error versus im

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 0.8

    \[\frac{\tan^{-1}_* \frac{im}{re}}{\log 10}\]
  2. Using strategy rm

  3. Applied add-sqr-sqrt0.8

    \[\leadsto \frac{\tan^{-1}_* \frac{im}{re}}{\color{blue}{\sqrt{\log 10} \cdot \sqrt{\log 10}}}\]

  4. Applied *-un-lft-identity0.8

    \[\leadsto \frac{\color{blue}{1 \cdot \tan^{-1}_* \frac{im}{re}}}{\sqrt{\log 10} \cdot \sqrt{\log 10}}\]

  5. Applied times-frac0.8

    \[\leadsto \color{blue}{\frac{1}{\sqrt{\log 10}} \cdot \frac{\tan^{-1}_* \frac{im}{re}}{\sqrt{\log 10}}}\]

  6. Taylor expanded around 0 0.8

    \[\leadsto \frac{1}{\sqrt{\log 10}} \cdot \color{blue}{\left(\tan^{-1}_* \frac{im}{re} \cdot \sqrt{\frac{1}{\log 10}}\right)}\]
  7. Using strategy rm

  8. Applied add-sqr-sqrt0.8

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

  9. Applied associate-*l*0.8

    \[\leadsto \color{blue}{\sqrt{\frac{1}{\sqrt{\log 10}}} \cdot \left(\sqrt{\frac{1}{\sqrt{\log 10}}} \cdot \left(\tan^{-1}_* \frac{im}{re} \cdot \sqrt{\frac{1}{\log 10}}\right)\right)}\]
  10. Using strategy rm

  11. Applied add-cube-cbrt0.1

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

  12. Applied add-sqr-sqrt0.1

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

  13. Applied times-frac0.1

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

  14. Applied sqrt-prod0.1

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

  15. Applied associate-*l*0.2

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

  16. Simplified0.2

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

  17. Final simplification0.2

    \[\leadsto \sqrt{\frac{\sqrt{1}}{\sqrt[3]{\sqrt{\log 10}} \cdot \sqrt[3]{\sqrt{\log 10}}}} \cdot \left(\sqrt{\frac{1}{\sqrt[3]{\sqrt{\log 10}}}} \cdot \left(\sqrt{\frac{1}{\sqrt{\log 10}}} \cdot \left(\tan^{-1}_* \frac{im}{re} \cdot \sqrt{\frac{1}{\log 10}}\right)\right)\right)\]

Reproduce

herbie shell --seed 2019346 
(FPCore (re im)
  :name "math.log10 on complex, imaginary part"
  :precision binary64
  (/ (atan2 im re) (log 10)))