\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(\left(\tan^{-1}_* \frac{\sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)} \cdot \left(\sqrt[3]{e^{\log \left(\sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)} \cdot \sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}\right)}} \cdot \left(\sqrt[3]{\sqrt{e^{\log \left(\sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)} \cdot \sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}\right)}} \cdot \sqrt{e^{\log \left(\sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)} \cdot \sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}\right)}}} \cdot \sqrt[3]{e^{\log \left(\sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)} \cdot \sqrt[3]{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}\right)}}\right)\right)}{\tan^{-1} a}\right) \bmod a\right)\right|double f(double a) {
double r876618 = a;
double r876619 = expm1(r876618);
double r876620 = sin(r876619);
double r876621 = expm1(r876620);
double r876622 = atan(r876618);
double r876623 = atan2(r876621, r876622);
double r876624 = fmod(r876623, r876618);
double r876625 = fabs(r876624);
return r876625;
}
double f(double a) {
double r876626 = a;
double r876627 = expm1(r876626);
double r876628 = sin(r876627);
double r876629 = expm1(r876628);
double r876630 = cbrt(r876629);
double r876631 = r876630 * r876630;
double r876632 = log(r876631);
double r876633 = exp(r876632);
double r876634 = cbrt(r876633);
double r876635 = sqrt(r876633);
double r876636 = r876635 * r876635;
double r876637 = cbrt(r876636);
double r876638 = r876637 * r876634;
double r876639 = r876634 * r876638;
double r876640 = r876630 * r876639;
double r876641 = atan(r876626);
double r876642 = atan2(r876640, r876641);
double r876643 = fmod(r876642, r876626);
double r876644 = fabs(r876643);
return r876644;
}



Bits error versus a
Initial program 34.1
rmApplied add-cube-cbrt34.1
rmApplied add-exp-log34.1
rmApplied add-cube-cbrt34.1
rmApplied add-sqr-sqrt34.1
Final simplification34.1
herbie shell --seed 2019192
(FPCore (a)
:name "Random Jason Timeout Test 006"
(fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))