0.5 \cdot \sqrt{2 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\begin{array}{l}
\mathbf{if}\;re \le -1.68133238957017115 \cdot 10^{161}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \frac{{im}^{1}}{\frac{-2 \cdot re}{im}}}\\
\mathbf{elif}\;re \le 1.4937844730964523 \cdot 10^{-255}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(\frac{{im}^{1}}{\sqrt{re \cdot re + im \cdot im} - re} \cdot im\right)}\\
\mathbf{elif}\;re \le 2.37750825737911996 \cdot 10^{102}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(e^{\log \left(\sqrt{re \cdot re + im \cdot im}\right)} + re\right)}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(2 \cdot re\right)}\\
\end{array}double f(double re, double im) {
double r235135 = 0.5;
double r235136 = 2.0;
double r235137 = re;
double r235138 = r235137 * r235137;
double r235139 = im;
double r235140 = r235139 * r235139;
double r235141 = r235138 + r235140;
double r235142 = sqrt(r235141);
double r235143 = r235142 + r235137;
double r235144 = r235136 * r235143;
double r235145 = sqrt(r235144);
double r235146 = r235135 * r235145;
return r235146;
}
double f(double re, double im) {
double r235147 = re;
double r235148 = -1.6813323895701712e+161;
bool r235149 = r235147 <= r235148;
double r235150 = 0.5;
double r235151 = 2.0;
double r235152 = im;
double r235153 = 1.0;
double r235154 = pow(r235152, r235153);
double r235155 = -2.0;
double r235156 = r235155 * r235147;
double r235157 = r235156 / r235152;
double r235158 = r235154 / r235157;
double r235159 = r235151 * r235158;
double r235160 = sqrt(r235159);
double r235161 = r235150 * r235160;
double r235162 = 1.4937844730964523e-255;
bool r235163 = r235147 <= r235162;
double r235164 = r235147 * r235147;
double r235165 = r235152 * r235152;
double r235166 = r235164 + r235165;
double r235167 = sqrt(r235166);
double r235168 = r235167 - r235147;
double r235169 = r235154 / r235168;
double r235170 = r235169 * r235152;
double r235171 = r235151 * r235170;
double r235172 = sqrt(r235171);
double r235173 = r235150 * r235172;
double r235174 = 2.37750825737912e+102;
bool r235175 = r235147 <= r235174;
double r235176 = log(r235167);
double r235177 = exp(r235176);
double r235178 = r235177 + r235147;
double r235179 = r235151 * r235178;
double r235180 = sqrt(r235179);
double r235181 = r235150 * r235180;
double r235182 = 2.0;
double r235183 = r235182 * r235147;
double r235184 = r235151 * r235183;
double r235185 = sqrt(r235184);
double r235186 = r235150 * r235185;
double r235187 = r235175 ? r235181 : r235186;
double r235188 = r235163 ? r235173 : r235187;
double r235189 = r235149 ? r235161 : r235188;
return r235189;
}




Bits error versus re




Bits error versus im
Results
| Original | 38.6 |
|---|---|
| Target | 33.8 |
| Herbie | 23.2 |
if re < -1.6813323895701712e+161Initial program 64.0
rmApplied flip-+64.0
Simplified51.6
rmApplied sqr-pow51.6
Applied associate-/l*51.2
Simplified51.2
Taylor expanded around -inf 23.4
if -1.6813323895701712e+161 < re < 1.4937844730964523e-255Initial program 38.9
rmApplied flip-+38.9
Simplified31.0
rmApplied sqr-pow31.0
Applied associate-/l*29.3
Simplified29.3
rmApplied associate-/r/29.3
Simplified29.3
if 1.4937844730964523e-255 < re < 2.37750825737912e+102Initial program 19.3
rmApplied add-exp-log21.6
if 2.37750825737912e+102 < re Initial program 52.7
Taylor expanded around inf 10.4
Final simplification23.2
herbie shell --seed 2020060
(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)))))