0.5 \cdot \sqrt{2 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\begin{array}{l}
\mathbf{if}\;re \le -1.32924863909638652 \cdot 10^{154}:\\
\;\;\;\;\frac{\sqrt{\left(im \cdot im\right) \cdot 2}}{\sqrt{\left(-re\right) - re}} \cdot 0.5\\
\mathbf{elif}\;re \le 9.9898197352700734 \cdot 10^{-90}:\\
\;\;\;\;0.5 \cdot \frac{\sqrt{2} \cdot \left|im\right|}{\sqrt{\sqrt{re \cdot re + im \cdot im} - re}}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(2 \cdot re\right)}\\
\end{array}double f(double re, double im) {
double r306136 = 0.5;
double r306137 = 2.0;
double r306138 = re;
double r306139 = r306138 * r306138;
double r306140 = im;
double r306141 = r306140 * r306140;
double r306142 = r306139 + r306141;
double r306143 = sqrt(r306142);
double r306144 = r306143 + r306138;
double r306145 = r306137 * r306144;
double r306146 = sqrt(r306145);
double r306147 = r306136 * r306146;
return r306147;
}
double f(double re, double im) {
double r306148 = re;
double r306149 = -1.3292486390963865e+154;
bool r306150 = r306148 <= r306149;
double r306151 = im;
double r306152 = r306151 * r306151;
double r306153 = 2.0;
double r306154 = r306152 * r306153;
double r306155 = sqrt(r306154);
double r306156 = -r306148;
double r306157 = r306156 - r306148;
double r306158 = sqrt(r306157);
double r306159 = r306155 / r306158;
double r306160 = 0.5;
double r306161 = r306159 * r306160;
double r306162 = 9.989819735270073e-90;
bool r306163 = r306148 <= r306162;
double r306164 = sqrt(r306153);
double r306165 = fabs(r306151);
double r306166 = r306164 * r306165;
double r306167 = r306148 * r306148;
double r306168 = r306167 + r306152;
double r306169 = sqrt(r306168);
double r306170 = r306169 - r306148;
double r306171 = sqrt(r306170);
double r306172 = r306166 / r306171;
double r306173 = r306160 * r306172;
double r306174 = 2.0;
double r306175 = r306174 * r306148;
double r306176 = r306153 * r306175;
double r306177 = sqrt(r306176);
double r306178 = r306160 * r306177;
double r306179 = r306163 ? r306173 : r306178;
double r306180 = r306150 ? r306161 : r306179;
return r306180;
}




Bits error versus re




Bits error versus im
Results
| Original | 38.2 |
|---|---|
| Target | 33.2 |
| Herbie | 22.1 |
if re < -1.3292486390963865e+154Initial program 64.0
rmApplied flip-+64.0
Applied associate-*r/64.0
Applied sqrt-div64.0
Simplified51.3
Taylor expanded around -inf 21.3
Simplified21.3
if -1.3292486390963865e+154 < re < 9.989819735270073e-90Initial program 35.2
rmApplied flip-+37.3
Applied associate-*r/37.3
Applied sqrt-div37.6
Simplified30.4
rmApplied sqrt-prod30.5
Simplified23.8
if 9.989819735270073e-90 < re Initial program 33.8
rmApplied add-cube-cbrt34.1
Taylor expanded around inf 19.7
Final simplification22.1
herbie shell --seed 2020045
(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)))))