\frac{\tan^{-1}_* \frac{im}{re}}{\log 10}\frac{1}{\left(\sqrt[3]{\frac{\log 10}{\tan^{-1}_* \frac{im}{re}}} \cdot \sqrt[3]{\frac{\log 10}{\tan^{-1}_* \frac{im}{re}}}\right) \cdot \left(\sqrt[3]{\sqrt[3]{\log 10} \cdot \sqrt[3]{\log 10}} \cdot \sqrt[3]{\frac{\sqrt[3]{\log 10}}{\tan^{-1}_* \frac{im}{re}}}\right)}double f(double re, double im) {
double r32716 = im;
double r32717 = re;
double r32718 = atan2(r32716, r32717);
double r32719 = 10.0;
double r32720 = log(r32719);
double r32721 = r32718 / r32720;
return r32721;
}
double f(double re, double im) {
double r32722 = 1.0;
double r32723 = 10.0;
double r32724 = log(r32723);
double r32725 = im;
double r32726 = re;
double r32727 = atan2(r32725, r32726);
double r32728 = r32724 / r32727;
double r32729 = cbrt(r32728);
double r32730 = r32729 * r32729;
double r32731 = cbrt(r32724);
double r32732 = r32731 * r32731;
double r32733 = cbrt(r32732);
double r32734 = r32731 / r32727;
double r32735 = cbrt(r32734);
double r32736 = r32733 * r32735;
double r32737 = r32730 * r32736;
double r32738 = r32722 / r32737;
return r32738;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.8
rmApplied pow10.8
Applied log-pow0.8
Applied *-un-lft-identity0.8
Applied times-frac0.8
Simplified0.8
rmApplied clear-num1.0
rmApplied add-cube-cbrt0.8
rmApplied *-un-lft-identity0.8
Applied add-cube-cbrt0.9
Applied times-frac0.9
Applied cbrt-prod0.8
Simplified0.8
Final simplification0.8
herbie shell --seed 2020046 +o rules:numerics
(FPCore (re im)
:name "math.log10 on complex, imaginary part"
:precision binary64
(/ (atan2 im re) (log 10)))