\left(\left(2 \cdot \left({b}^{2} - {a}^{2}\right)\right) \cdot \sin \left(\pi \cdot \frac{angle}{180}\right)\right) \cdot \cos \left(\pi \cdot \frac{angle}{180}\right)\left(2 \cdot \left(\left(\sin \left(\pi \cdot \frac{angle}{180}\right) \cdot \left(b + a\right)\right) \cdot \left(b - a\right)\right)\right) \cdot \cos \left(\left(\pi \cdot \left(\sqrt[3]{\frac{angle}{180}} \cdot \sqrt[3]{\frac{angle}{180}}\right)\right) \cdot \frac{\sqrt[3]{angle}}{\sqrt[3]{180}}\right)(FPCore (a b angle) :precision binary64 (* (* (* 2.0 (- (pow b 2.0) (pow a 2.0))) (sin (* PI (/ angle 180.0)))) (cos (* PI (/ angle 180.0)))))
(FPCore (a b angle)
:precision binary64
(*
(* 2.0 (* (* (sin (* PI (/ angle 180.0))) (+ b a)) (- b a)))
(cos
(*
(* PI (* (cbrt (/ angle 180.0)) (cbrt (/ angle 180.0))))
(/ (cbrt angle) (cbrt 180.0))))))double code(double a, double b, double angle) {
return ((2.0 * (pow(b, 2.0) - pow(a, 2.0))) * sin(((double) M_PI) * (angle / 180.0))) * cos(((double) M_PI) * (angle / 180.0));
}
double code(double a, double b, double angle) {
return (2.0 * ((sin(((double) M_PI) * (angle / 180.0)) * (b + a)) * (b - a))) * cos((((double) M_PI) * (cbrt(angle / 180.0) * cbrt(angle / 180.0))) * (cbrt(angle) / cbrt(180.0)));
}



Bits error versus a



Bits error versus b



Bits error versus angle
Results
Initial program 31.3
rmApplied associate-*l*_binary64_36031.3
Simplified31.3
rmApplied difference-of-squares_binary64_38831.3
Applied associate-*r*_binary64_35920.9
rmApplied add-cube-cbrt_binary64_45421.0
Applied associate-*r*_binary64_35921.0
rmApplied cbrt-div_binary64_45121.0
Final simplification21.0
herbie shell --seed 2021007
(FPCore (a b angle)
:name "ab-angle->ABCF B"
:precision binary64
(* (* (* 2.0 (- (pow b 2.0) (pow a 2.0))) (sin (* PI (/ angle 180.0)))) (cos (* PI (/ angle 180.0)))))