\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(\log \left(e^{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right) \bmod a\right)} \cdot \sqrt[3]{\sqrt[3]{\left(\left(\log \left(e^{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right) \bmod a\right)} \cdot \left(\sqrt[3]{\left(\left(\log \left(e^{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right) \bmod a\right)} \cdot \sqrt[3]{\left(\left(\log \left(e^{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right) \bmod a\right)}\right)}\right) \cdot \sqrt[3]{\sqrt[3]{\left(\left(\log \left(e^{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right) \bmod a\right)} \cdot \left(\sqrt[3]{\left(\left(\log \left(e^{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right) \bmod a\right)} \cdot \sqrt[3]{\left(\left(\log \left(e^{\tan^{-1}_* \frac{\mathsf{expm1}\left(\sin \left(\mathsf{expm1}\left(a\right)\right)\right)}{\tan^{-1} a}}\right)\right) \bmod a\right)}\right)}\right|double f(double a) {
double r918449 = a;
double r918450 = expm1(r918449);
double r918451 = sin(r918450);
double r918452 = expm1(r918451);
double r918453 = atan(r918449);
double r918454 = atan2(r918452, r918453);
double r918455 = fmod(r918454, r918449);
double r918456 = fabs(r918455);
return r918456;
}
double f(double a) {
double r918457 = a;
double r918458 = expm1(r918457);
double r918459 = sin(r918458);
double r918460 = expm1(r918459);
double r918461 = atan(r918457);
double r918462 = atan2(r918460, r918461);
double r918463 = exp(r918462);
double r918464 = log(r918463);
double r918465 = fmod(r918464, r918457);
double r918466 = cbrt(r918465);
double r918467 = r918466 * r918466;
double r918468 = r918466 * r918467;
double r918469 = cbrt(r918468);
double r918470 = r918466 * r918469;
double r918471 = r918470 * r918469;
double r918472 = fabs(r918471);
return r918472;
}



Bits error versus a
Initial program 33.3
rmApplied add-log-exp33.4
rmApplied add-cube-cbrt33.4
rmApplied add-cube-cbrt33.4
rmApplied add-cube-cbrt33.4
Final simplification33.4
herbie shell --seed 2019169 +o rules:numerics
(FPCore (a)
:name "Random Jason Timeout Test 006"
(fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))