\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 r33425 = im;
double r33426 = re;
double r33427 = atan2(r33425, r33426);
double r33428 = 10.0;
double r33429 = log(r33428);
double r33430 = r33427 / r33429;
return r33430;
}
double f(double re, double im) {
double r33431 = 1.0;
double r33432 = 10.0;
double r33433 = log(r33432);
double r33434 = im;
double r33435 = re;
double r33436 = atan2(r33434, r33435);
double r33437 = r33433 / r33436;
double r33438 = cbrt(r33437);
double r33439 = r33438 * r33438;
double r33440 = cbrt(r33433);
double r33441 = r33440 * r33440;
double r33442 = cbrt(r33441);
double r33443 = r33440 / r33436;
double r33444 = cbrt(r33443);
double r33445 = r33442 * r33444;
double r33446 = r33439 * r33445;
double r33447 = r33431 / r33446;
return r33447;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.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)))