\left(\frac{\pi}{2} \cdot \frac{1}{b \cdot b - a \cdot a}\right) \cdot \left(\frac{1}{a} - \frac{1}{b}\right)\frac{\frac{\left(\frac{\pi}{2} \cdot 1\right) \cdot \frac{\left(b - a\right) \cdot 1}{b + a}}{a \cdot b}}{b - a}double f(double a, double b) {
double r78563 = atan2(1.0, 0.0);
double r78564 = 2.0;
double r78565 = r78563 / r78564;
double r78566 = 1.0;
double r78567 = b;
double r78568 = r78567 * r78567;
double r78569 = a;
double r78570 = r78569 * r78569;
double r78571 = r78568 - r78570;
double r78572 = r78566 / r78571;
double r78573 = r78565 * r78572;
double r78574 = r78566 / r78569;
double r78575 = r78566 / r78567;
double r78576 = r78574 - r78575;
double r78577 = r78573 * r78576;
return r78577;
}
double f(double a, double b) {
double r78578 = atan2(1.0, 0.0);
double r78579 = 2.0;
double r78580 = r78578 / r78579;
double r78581 = 1.0;
double r78582 = r78580 * r78581;
double r78583 = b;
double r78584 = a;
double r78585 = r78583 - r78584;
double r78586 = r78585 * r78581;
double r78587 = r78583 + r78584;
double r78588 = r78586 / r78587;
double r78589 = r78582 * r78588;
double r78590 = r78584 * r78583;
double r78591 = r78589 / r78590;
double r78592 = r78591 / r78585;
return r78592;
}



Bits error versus a



Bits error versus b
Results
Initial program 14.1
rmApplied difference-of-squares9.2
Applied *-un-lft-identity9.2
Applied times-frac8.7
Applied associate-*r*8.7
Simplified8.7
rmApplied associate-*r/8.6
Applied associate-*l/0.3
rmApplied frac-sub0.3
Applied associate-*r/0.3
Simplified0.3
rmApplied div-inv0.3
Applied associate-*l*0.3
Simplified0.2
Final simplification0.2
herbie shell --seed 2019303 +o rules:numerics
(FPCore (a b)
:name "NMSE Section 6.1 mentioned, B"
:precision binary64
(* (* (/ PI 2) (/ 1 (- (* b b) (* a a)))) (- (/ 1 a) (/ 1 b))))