double code(double re, double im) {
return ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))) + re))))))));
}
double code(double re, double im) {
double VAR;
if ((im <= -2.4849948128403756e-150)) {
VAR = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (im * ((double) (im / ((double) (((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))) - re))))))))))));
} else {
double VAR_1;
if ((im <= 9.700144651592025e-181)) {
VAR_1 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (re + re))))))));
} else {
double VAR_2;
if ((im <= 1.4225952660417887e-100)) {
VAR_2 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (im * ((double) (im / ((double) (((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))) - re))))))))))));
} else {
double VAR_3;
if ((im <= 1.049793563727917e-26)) {
VAR_3 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (re + re))))))));
} else {
VAR_3 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (im + re))))))));
}
VAR_2 = VAR_3;
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
return VAR;
}




Bits error versus re




Bits error versus im
Results
| Original | 38.7 |
|---|---|
| Target | 33.7 |
| Herbie | 31.0 |
if im < -2.4849948128403756e-150 or 9.7001446515920246e-181 < im < 1.42259526604178867e-100Initial program 36.5
rmApplied flip-+42.8
Simplified37.6
rmApplied *-un-lft-identity37.6
Applied times-frac36.8
Simplified36.8
if -2.4849948128403756e-150 < im < 9.7001446515920246e-181 or 1.42259526604178867e-100 < im < 1.049793563727917e-26Initial program 40.6
Taylor expanded around inf 37.1
if 1.049793563727917e-26 < im Initial program 40.1
Taylor expanded around 0 15.8
Final simplification31.0
herbie shell --seed 2020192
(FPCore (re im)
:name "math.sqrt on complex, real part"
:precision binary64
:herbie-target
(if (< re 0.0) (* 0.5 (* (sqrt 2.0) (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)))))