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.2805350559242801 \cdot 10^{+154}:\\
\;\;\;\;\frac{\sqrt{2.0 \cdot \left(im \cdot im\right)}}{\sqrt{-2 \cdot re}} \cdot 0.5\\
\mathbf{elif}\;re \le -3.933782877011124 \cdot 10^{-208}:\\
\;\;\;\;0.5 \cdot \left(\frac{\left|im\right|}{\sqrt{\sqrt{re \cdot re + im \cdot im} - re}} \cdot \sqrt{2.0}\right)\\
\mathbf{elif}\;re \le 8.853592150803574 \cdot 10^{+83}:\\
\;\;\;\;\sqrt{2.0 \cdot \left(re + \sqrt{\sqrt[3]{re \cdot re + im \cdot im} \cdot \sqrt[3]{re \cdot re + im \cdot im}} \cdot \sqrt{\sqrt[3]{\sqrt{re \cdot re + im \cdot im}} \cdot \sqrt[3]{\sqrt{re \cdot re + im \cdot im}}}\right)} \cdot 0.5\\
\mathbf{else}:\\
\;\;\;\;\sqrt{2.0 \cdot \left(re + re\right)} \cdot 0.5\\
\end{array}double f(double re, double im) {
double r4665137 = 0.5;
double r4665138 = 2.0;
double r4665139 = re;
double r4665140 = r4665139 * r4665139;
double r4665141 = im;
double r4665142 = r4665141 * r4665141;
double r4665143 = r4665140 + r4665142;
double r4665144 = sqrt(r4665143);
double r4665145 = r4665144 + r4665139;
double r4665146 = r4665138 * r4665145;
double r4665147 = sqrt(r4665146);
double r4665148 = r4665137 * r4665147;
return r4665148;
}
double f(double re, double im) {
double r4665149 = re;
double r4665150 = -1.2805350559242801e+154;
bool r4665151 = r4665149 <= r4665150;
double r4665152 = 2.0;
double r4665153 = im;
double r4665154 = r4665153 * r4665153;
double r4665155 = r4665152 * r4665154;
double r4665156 = sqrt(r4665155);
double r4665157 = -2.0;
double r4665158 = r4665157 * r4665149;
double r4665159 = sqrt(r4665158);
double r4665160 = r4665156 / r4665159;
double r4665161 = 0.5;
double r4665162 = r4665160 * r4665161;
double r4665163 = -3.933782877011124e-208;
bool r4665164 = r4665149 <= r4665163;
double r4665165 = fabs(r4665153);
double r4665166 = r4665149 * r4665149;
double r4665167 = r4665166 + r4665154;
double r4665168 = sqrt(r4665167);
double r4665169 = r4665168 - r4665149;
double r4665170 = sqrt(r4665169);
double r4665171 = r4665165 / r4665170;
double r4665172 = sqrt(r4665152);
double r4665173 = r4665171 * r4665172;
double r4665174 = r4665161 * r4665173;
double r4665175 = 8.853592150803574e+83;
bool r4665176 = r4665149 <= r4665175;
double r4665177 = cbrt(r4665167);
double r4665178 = r4665177 * r4665177;
double r4665179 = sqrt(r4665178);
double r4665180 = cbrt(r4665168);
double r4665181 = r4665180 * r4665180;
double r4665182 = sqrt(r4665181);
double r4665183 = r4665179 * r4665182;
double r4665184 = r4665149 + r4665183;
double r4665185 = r4665152 * r4665184;
double r4665186 = sqrt(r4665185);
double r4665187 = r4665186 * r4665161;
double r4665188 = r4665149 + r4665149;
double r4665189 = r4665152 * r4665188;
double r4665190 = sqrt(r4665189);
double r4665191 = r4665190 * r4665161;
double r4665192 = r4665176 ? r4665187 : r4665191;
double r4665193 = r4665164 ? r4665174 : r4665192;
double r4665194 = r4665151 ? r4665162 : r4665193;
return r4665194;
}




Bits error versus re




Bits error versus im
Results
| Original | 37.8 |
|---|---|
| Target | 32.8 |
| Herbie | 18.8 |
if re < -1.2805350559242801e+154Initial program 62.3
rmApplied flip-+62.3
Applied associate-*r/62.3
Applied sqrt-div62.3
Simplified48.8
Taylor expanded around -inf 19.3
if -1.2805350559242801e+154 < re < -3.933782877011124e-208Initial program 42.4
rmApplied flip-+42.4
Applied associate-*r/42.4
Applied sqrt-div42.5
Simplified28.9
rmApplied *-un-lft-identity28.9
Applied sqrt-prod29.0
Applied times-frac29.0
Simplified29.0
Simplified18.5
if -3.933782877011124e-208 < re < 8.853592150803574e+83Initial program 22.3
rmApplied add-cube-cbrt22.6
Applied sqrt-prod22.6
rmApplied add-sqr-sqrt22.6
Applied cbrt-prod22.6
if 8.853592150803574e+83 < re Initial program 47.8
Taylor expanded around inf 10.8
Final simplification18.8
herbie shell --seed 2019142
(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)))))