\frac{a \cdot c + b \cdot d}{c \cdot c + d \cdot d}\frac{1}{c \cdot c + d \cdot d} \cdot \left(b \cdot d + a \cdot c\right)double f(double a, double b, double c, double d) {
double r6570499 = a;
double r6570500 = c;
double r6570501 = r6570499 * r6570500;
double r6570502 = b;
double r6570503 = d;
double r6570504 = r6570502 * r6570503;
double r6570505 = r6570501 + r6570504;
double r6570506 = r6570500 * r6570500;
double r6570507 = r6570503 * r6570503;
double r6570508 = r6570506 + r6570507;
double r6570509 = r6570505 / r6570508;
return r6570509;
}
double f(double a, double b, double c, double d) {
double r6570510 = 1.0;
double r6570511 = c;
double r6570512 = r6570511 * r6570511;
double r6570513 = d;
double r6570514 = r6570513 * r6570513;
double r6570515 = r6570512 + r6570514;
double r6570516 = r6570510 / r6570515;
double r6570517 = b;
double r6570518 = r6570517 * r6570513;
double r6570519 = a;
double r6570520 = r6570519 * r6570511;
double r6570521 = r6570518 + r6570520;
double r6570522 = r6570516 * r6570521;
return r6570522;
}




Bits error versus a




Bits error versus b




Bits error versus c




Bits error versus d
Results
| Original | 25.6 |
|---|---|
| Target | 0.4 |
| Herbie | 25.7 |
Initial program 25.6
rmApplied div-inv25.7
Final simplification25.7
herbie shell --seed 2019162
(FPCore (a b c d)
:name "Complex division, real part"
:herbie-target
(if (< (fabs d) (fabs c)) (/ (+ a (* b (/ d c))) (+ c (* d (/ d c)))) (/ (+ b (* a (/ c d))) (+ d (* c (/ c d)))))
(/ (+ (* a c) (* b d)) (+ (* c c) (* d d))))