\frac{b \cdot c - a \cdot d}{c \cdot c + d \cdot d}\frac{\frac{b \cdot c - a \cdot d}{\sqrt{c \cdot c + d \cdot d}}}{\sqrt{c \cdot c + d \cdot d}}double f(double a, double b, double c, double d) {
double r6175126 = b;
double r6175127 = c;
double r6175128 = r6175126 * r6175127;
double r6175129 = a;
double r6175130 = d;
double r6175131 = r6175129 * r6175130;
double r6175132 = r6175128 - r6175131;
double r6175133 = r6175127 * r6175127;
double r6175134 = r6175130 * r6175130;
double r6175135 = r6175133 + r6175134;
double r6175136 = r6175132 / r6175135;
return r6175136;
}
double f(double a, double b, double c, double d) {
double r6175137 = b;
double r6175138 = c;
double r6175139 = r6175137 * r6175138;
double r6175140 = a;
double r6175141 = d;
double r6175142 = r6175140 * r6175141;
double r6175143 = r6175139 - r6175142;
double r6175144 = r6175138 * r6175138;
double r6175145 = r6175141 * r6175141;
double r6175146 = r6175144 + r6175145;
double r6175147 = sqrt(r6175146);
double r6175148 = r6175143 / r6175147;
double r6175149 = r6175148 / r6175147;
return r6175149;
}




Bits error versus a




Bits error versus b




Bits error versus c




Bits error versus d
Results
| Original | 26.1 |
|---|---|
| Target | 0.4 |
| Herbie | 26.0 |
Initial program 26.1
rmApplied add-sqr-sqrt26.1
Applied associate-/r*26.0
Final simplification26.0
herbie shell --seed 2019179
(FPCore (a b c d)
:name "Complex division, imag part"
:herbie-target
(if (< (fabs d) (fabs c)) (/ (- b (* a (/ d c))) (+ c (* d (/ d c)))) (/ (+ (- a) (* b (/ c d))) (+ d (* c (/ c d)))))
(/ (- (* b c) (* a d)) (+ (* c c) (* d d))))