\frac{\log \left(\sqrt{re \cdot re + im \cdot im}\right)}{\log 10}\left(\sqrt{\frac{1}{\sqrt{\log 10}}} \cdot \sqrt{\frac{1}{\sqrt{\log 10}}}\right) \cdot \left(\frac{1}{\sqrt{\log 10}} \cdot \log \left(\mathsf{hypot}\left(re, im\right)\right)\right)double f(double re, double im) {
double r1297723 = re;
double r1297724 = r1297723 * r1297723;
double r1297725 = im;
double r1297726 = r1297725 * r1297725;
double r1297727 = r1297724 + r1297726;
double r1297728 = sqrt(r1297727);
double r1297729 = log(r1297728);
double r1297730 = 10.0;
double r1297731 = log(r1297730);
double r1297732 = r1297729 / r1297731;
return r1297732;
}
double f(double re, double im) {
double r1297733 = 1.0;
double r1297734 = 10.0;
double r1297735 = log(r1297734);
double r1297736 = sqrt(r1297735);
double r1297737 = r1297733 / r1297736;
double r1297738 = sqrt(r1297737);
double r1297739 = r1297738 * r1297738;
double r1297740 = re;
double r1297741 = im;
double r1297742 = hypot(r1297740, r1297741);
double r1297743 = log(r1297742);
double r1297744 = r1297737 * r1297743;
double r1297745 = r1297739 * r1297744;
return r1297745;
}



Bits error versus re



Bits error versus im
Results
Initial program 31.1
Simplified0.6
rmApplied add-sqr-sqrt0.6
Applied *-un-lft-identity0.6
Applied times-frac0.5
rmApplied div-inv0.4
Applied associate-*r*0.4
rmApplied add-sqr-sqrt0.4
Applied associate-*r*0.5
rmApplied associate-*l*0.4
Final simplification0.4
herbie shell --seed 2019107 +o rules:numerics
(FPCore (re im)
:name "math.log10 on complex, real part"
(/ (log (sqrt (+ (* re re) (* im im)))) (log 10)))