\frac{\cos th}{\sqrt{2}} \cdot \left(a1 \cdot a1\right) + \frac{\cos th}{\sqrt{2}} \cdot \left(a2 \cdot a2\right)\frac{1}{\sqrt[3]{\sqrt[3]{\sqrt{2}}} \cdot \sqrt[3]{\sqrt[3]{\sqrt{2}}}} \cdot \frac{\frac{\cos th \cdot \mathsf{fma}\left(a1, a1, a2 \cdot a2\right)}{\sqrt[3]{\sqrt{2}} \cdot \sqrt[3]{\sqrt{2}}}}{\sqrt[3]{\sqrt[3]{\sqrt{2}}}}double code(double a1, double a2, double th) {
return ((double) (((double) (((double) (((double) cos(th)) / ((double) sqrt(2.0)))) * ((double) (a1 * a1)))) + ((double) (((double) (((double) cos(th)) / ((double) sqrt(2.0)))) * ((double) (a2 * a2))))));
}
double code(double a1, double a2, double th) {
return ((double) (((double) (1.0 / ((double) (((double) cbrt(((double) cbrt(((double) sqrt(2.0)))))) * ((double) cbrt(((double) cbrt(((double) sqrt(2.0)))))))))) * ((double) (((double) (((double) (((double) cos(th)) * ((double) fma(a1, a1, ((double) (a2 * a2)))))) / ((double) (((double) cbrt(((double) sqrt(2.0)))) * ((double) cbrt(((double) sqrt(2.0)))))))) / ((double) cbrt(((double) cbrt(((double) sqrt(2.0))))))))));
}



Bits error versus a1



Bits error versus a2



Bits error versus th
Results
Initial program 0.5
Simplified0.5
rmApplied add-cube-cbrt0.5
Applied associate-/r*0.5
rmApplied add-cube-cbrt0.5
Applied *-un-lft-identity0.5
Applied times-frac0.5
Final simplification0.5
herbie shell --seed 2020123 +o rules:numerics
(FPCore (a1 a2 th)
:name "Migdal et al, Equation (64)"
:precision binary64
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))))