\left|\left(\left(\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}\right) \bmod a\right)\right|\left|\left(\sqrt[3]{\left(\left(\left(\log \left(e^{\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}}\right) \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \bmod a\right)} \cdot \sqrt[3]{\left(\left(\left(\log \left(e^{\sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}}\right) \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \cdot \sqrt[3]{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right) \bmod a\right)}\right) \cdot \sqrt[3]{\left(\left(\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}\right) \bmod a\right)}\right|double f(double a) {
double r12759 = a;
double r12760 = expm1(r12759);
double r12761 = sin(r12760);
double r12762 = expm1(r12761);
double r12763 = atan(r12759);
double r12764 = atan2(r12762, r12763);
double r12765 = fmod(r12764, r12759);
double r12766 = fabs(r12765);
return r12766;
}
double f(double a) {
double r12767 = a;
double r12768 = expm1(r12767);
double r12769 = sin(r12768);
double r12770 = expm1(r12769);
double r12771 = atan(r12767);
double r12772 = atan2(r12770, r12771);
double r12773 = cbrt(r12772);
double r12774 = exp(r12773);
double r12775 = log(r12774);
double r12776 = r12775 * r12773;
double r12777 = r12776 * r12773;
double r12778 = fmod(r12777, r12767);
double r12779 = cbrt(r12778);
double r12780 = r12779 * r12779;
double r12781 = fmod(r12772, r12767);
double r12782 = cbrt(r12781);
double r12783 = r12780 * r12782;
double r12784 = fabs(r12783);
return r12784;
}



Bits error versus a
Initial program 33.7
rmApplied add-cube-cbrt33.8
rmApplied add-log-exp33.8
rmApplied add-cube-cbrt33.8
Taylor expanded around 0 33.7
Final simplification33.7
herbie shell --seed 2019353
(FPCore (a)
:name "Random Jason Timeout Test 006"
:precision binary64
(fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))