\frac{\tan^{-1}_* \frac{im}{re}}{\log 10}\left(\frac{\tan^{-1}_* \frac{im}{re} \cdot \sqrt{\frac{1}{\sqrt{\log 10}}}}{\sqrt{\log 10}} \cdot \sqrt{\frac{1}{\sqrt[3]{\sqrt{\log 10}}}}\right) \cdot \sqrt{\frac{1}{\sqrt[3]{\sqrt{\log 10}} \cdot \sqrt[3]{\sqrt{\log 10}}}}double f(double re, double im) {
double r38174 = im;
double r38175 = re;
double r38176 = atan2(r38174, r38175);
double r38177 = 10.0;
double r38178 = log(r38177);
double r38179 = r38176 / r38178;
return r38179;
}
double f(double re, double im) {
double r38180 = im;
double r38181 = re;
double r38182 = atan2(r38180, r38181);
double r38183 = 1.0;
double r38184 = 10.0;
double r38185 = log(r38184);
double r38186 = sqrt(r38185);
double r38187 = r38183 / r38186;
double r38188 = sqrt(r38187);
double r38189 = r38182 * r38188;
double r38190 = r38189 / r38186;
double r38191 = cbrt(r38186);
double r38192 = r38183 / r38191;
double r38193 = sqrt(r38192);
double r38194 = r38190 * r38193;
double r38195 = r38191 * r38191;
double r38196 = r38183 / r38195;
double r38197 = sqrt(r38196);
double r38198 = r38194 * r38197;
return r38198;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.9
rmApplied add-sqr-sqrt0.9
Applied *-un-lft-identity0.9
Applied times-frac0.8
rmApplied div-inv0.8
rmApplied add-sqr-sqrt0.8
Applied associate-*l*0.8
Simplified0.9
rmApplied add-cube-cbrt0.1
Applied add-sqr-sqrt0.1
Applied times-frac0.1
Applied sqrt-prod0.1
Applied associate-*l*0.1
Final simplification0.1
herbie shell --seed 2019323
(FPCore (re im)
:name "math.log10 on complex, imaginary part"
:precision binary64
(/ (atan2 im re) (log 10)))