0.5 \cdot \sqrt{2 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\begin{array}{l}
\mathbf{if}\;re \le -6.68221814765511261 \cdot 10^{-264}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \frac{im \cdot im + 0}{\sqrt{re \cdot re + im \cdot im} + -1 \cdot re}}\\
\mathbf{elif}\;re \le 1.01436135168732259 \cdot 10^{-237}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(re + im\right)}\\
\mathbf{elif}\;re \le 2.97128001067495674 \cdot 10^{26}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(\sqrt{\sqrt{re \cdot re + im \cdot im}} \cdot \sqrt{\sqrt{re \cdot re + im \cdot im}} + re\right)}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(2 \cdot re\right)}\\
\end{array}double f(double re, double im) {
double r190925 = 0.5;
double r190926 = 2.0;
double r190927 = re;
double r190928 = r190927 * r190927;
double r190929 = im;
double r190930 = r190929 * r190929;
double r190931 = r190928 + r190930;
double r190932 = sqrt(r190931);
double r190933 = r190932 + r190927;
double r190934 = r190926 * r190933;
double r190935 = sqrt(r190934);
double r190936 = r190925 * r190935;
return r190936;
}
double f(double re, double im) {
double r190937 = re;
double r190938 = -6.682218147655113e-264;
bool r190939 = r190937 <= r190938;
double r190940 = 0.5;
double r190941 = 2.0;
double r190942 = im;
double r190943 = r190942 * r190942;
double r190944 = 0.0;
double r190945 = r190943 + r190944;
double r190946 = r190937 * r190937;
double r190947 = r190946 + r190943;
double r190948 = sqrt(r190947);
double r190949 = -1.0;
double r190950 = r190949 * r190937;
double r190951 = r190948 + r190950;
double r190952 = r190945 / r190951;
double r190953 = r190941 * r190952;
double r190954 = sqrt(r190953);
double r190955 = r190940 * r190954;
double r190956 = 1.0143613516873226e-237;
bool r190957 = r190937 <= r190956;
double r190958 = r190937 + r190942;
double r190959 = r190941 * r190958;
double r190960 = sqrt(r190959);
double r190961 = r190940 * r190960;
double r190962 = 2.9712800106749567e+26;
bool r190963 = r190937 <= r190962;
double r190964 = sqrt(r190948);
double r190965 = r190964 * r190964;
double r190966 = r190965 + r190937;
double r190967 = r190941 * r190966;
double r190968 = sqrt(r190967);
double r190969 = r190940 * r190968;
double r190970 = 2.0;
double r190971 = r190970 * r190937;
double r190972 = r190941 * r190971;
double r190973 = sqrt(r190972);
double r190974 = r190940 * r190973;
double r190975 = r190963 ? r190969 : r190974;
double r190976 = r190957 ? r190961 : r190975;
double r190977 = r190939 ? r190955 : r190976;
return r190977;
}




Bits error versus re




Bits error versus im
Results
| Original | 38.4 |
|---|---|
| Target | 33.4 |
| Herbie | 27.0 |
if re < -6.682218147655113e-264Initial program 46.8
rmApplied add-sqr-sqrt46.8
Applied sqrt-prod47.4
rmApplied flip-+47.3
Simplified35.9
Simplified35.9
if -6.682218147655113e-264 < re < 1.0143613516873226e-237Initial program 29.7
rmApplied add-sqr-sqrt29.7
Applied sqrt-prod29.8
rmApplied add-exp-log31.2
rmApplied pow1/231.2
Applied log-pow31.2
Applied exp-prod31.4
Taylor expanded around 0 32.8
if 1.0143613516873226e-237 < re < 2.9712800106749567e+26Initial program 19.8
rmApplied add-sqr-sqrt19.8
Applied sqrt-prod19.9
if 2.9712800106749567e+26 < re Initial program 42.2
Taylor expanded around inf 13.2
Final simplification27.0
herbie shell --seed 2020021
(FPCore (re im)
:name "math.sqrt on complex, real part"
:precision binary64
:herbie-target
(if (< re 0.0) (* 0.5 (* (sqrt 2) (sqrt (/ (* im im) (- (sqrt (+ (* re re) (* im im))) re))))) (* 0.5 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re)))))
(* 0.5 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re)))))