0.5 \cdot \sqrt{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\begin{array}{l}
\mathbf{if}\;re \le -1.0974932438808633 \cdot 10^{+26}:\\
\;\;\;\;\frac{\sqrt{\left(im \cdot im\right) \cdot 2.0}}{\sqrt{\sqrt{im \cdot im + re \cdot re} - re}} \cdot 0.5\\
\mathbf{elif}\;re \le -4.4945327826415316 \cdot 10^{-20}:\\
\;\;\;\;\sqrt{\left(re + im\right) \cdot 2.0} \cdot 0.5\\
\mathbf{elif}\;re \le -7.961223836723572 \cdot 10^{-96}:\\
\;\;\;\;0.5 \cdot \sqrt{2.0 \cdot \frac{im \cdot im}{\sqrt{im \cdot im + re \cdot re} - re}}\\
\mathbf{elif}\;re \le -2.538815066158378 \cdot 10^{-267}:\\
\;\;\;\;\sqrt{\left(re + im\right) \cdot 2.0} \cdot 0.5\\
\mathbf{elif}\;re \le 1.8791426213625292 \cdot 10^{+66}:\\
\;\;\;\;\sqrt{\left(re + \sqrt{im \cdot im + re \cdot re}\right) \cdot 2.0} \cdot 0.5\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\left(re + re\right) \cdot 2.0} \cdot 0.5\\
\end{array}double f(double re, double im) {
double r7101815 = 0.5;
double r7101816 = 2.0;
double r7101817 = re;
double r7101818 = r7101817 * r7101817;
double r7101819 = im;
double r7101820 = r7101819 * r7101819;
double r7101821 = r7101818 + r7101820;
double r7101822 = sqrt(r7101821);
double r7101823 = r7101822 + r7101817;
double r7101824 = r7101816 * r7101823;
double r7101825 = sqrt(r7101824);
double r7101826 = r7101815 * r7101825;
return r7101826;
}
double f(double re, double im) {
double r7101827 = re;
double r7101828 = -1.0974932438808633e+26;
bool r7101829 = r7101827 <= r7101828;
double r7101830 = im;
double r7101831 = r7101830 * r7101830;
double r7101832 = 2.0;
double r7101833 = r7101831 * r7101832;
double r7101834 = sqrt(r7101833);
double r7101835 = r7101827 * r7101827;
double r7101836 = r7101831 + r7101835;
double r7101837 = sqrt(r7101836);
double r7101838 = r7101837 - r7101827;
double r7101839 = sqrt(r7101838);
double r7101840 = r7101834 / r7101839;
double r7101841 = 0.5;
double r7101842 = r7101840 * r7101841;
double r7101843 = -4.4945327826415316e-20;
bool r7101844 = r7101827 <= r7101843;
double r7101845 = r7101827 + r7101830;
double r7101846 = r7101845 * r7101832;
double r7101847 = sqrt(r7101846);
double r7101848 = r7101847 * r7101841;
double r7101849 = -7.961223836723572e-96;
bool r7101850 = r7101827 <= r7101849;
double r7101851 = r7101831 / r7101838;
double r7101852 = r7101832 * r7101851;
double r7101853 = sqrt(r7101852);
double r7101854 = r7101841 * r7101853;
double r7101855 = -2.538815066158378e-267;
bool r7101856 = r7101827 <= r7101855;
double r7101857 = 1.8791426213625292e+66;
bool r7101858 = r7101827 <= r7101857;
double r7101859 = r7101827 + r7101837;
double r7101860 = r7101859 * r7101832;
double r7101861 = sqrt(r7101860);
double r7101862 = r7101861 * r7101841;
double r7101863 = r7101827 + r7101827;
double r7101864 = r7101863 * r7101832;
double r7101865 = sqrt(r7101864);
double r7101866 = r7101865 * r7101841;
double r7101867 = r7101858 ? r7101862 : r7101866;
double r7101868 = r7101856 ? r7101848 : r7101867;
double r7101869 = r7101850 ? r7101854 : r7101868;
double r7101870 = r7101844 ? r7101848 : r7101869;
double r7101871 = r7101829 ? r7101842 : r7101870;
return r7101871;
}




Bits error versus re




Bits error versus im
Results
| Original | 37.3 |
|---|---|
| Target | 32.5 |
| Herbie | 26.9 |
if re < -1.0974932438808633e+26Initial program 56.7
rmApplied add-exp-log59.1
rmApplied flip-+59.1
Applied associate-*r/59.1
Applied sqrt-div59.1
Simplified39.5
Simplified38.8
if -1.0974932438808633e+26 < re < -4.4945327826415316e-20 or -7.961223836723572e-96 < re < -2.538815066158378e-267Initial program 33.8
Taylor expanded around 0 38.9
if -4.4945327826415316e-20 < re < -7.961223836723572e-96Initial program 38.9
rmApplied flip-+38.9
Simplified28.1
if -2.538815066158378e-267 < re < 1.8791426213625292e+66Initial program 21.6
if 1.8791426213625292e+66 < re Initial program 45.6
Taylor expanded around inf 11.6
Final simplification26.9
herbie shell --seed 2019163
(FPCore (re im)
:name "math.sqrt on complex, real part"
:herbie-target
(if (< re 0) (* 0.5 (* (sqrt 2) (sqrt (/ (* im im) (- (sqrt (+ (* re re) (* im im))) re))))) (* 0.5 (sqrt (* 2.0 (+ (sqrt (+ (* re re) (* im im))) re)))))
(* 0.5 (sqrt (* 2.0 (+ (sqrt (+ (* re re) (* im im))) re)))))