\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|{e}^{\left(\log \left(\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)} \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)\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 r613440 = a;
double r613441 = expm1(r613440);
double r613442 = sin(r613441);
double r613443 = expm1(r613442);
double r613444 = atan(r613440);
double r613445 = atan2(r613443, r613444);
double r613446 = fmod(r613445, r613440);
double r613447 = fabs(r613446);
return r613447;
}
double f(double a) {
double r613448 = exp(1.0);
double r613449 = a;
double r613450 = expm1(r613449);
double r613451 = sin(r613450);
double r613452 = expm1(r613451);
double r613453 = atan(r613449);
double r613454 = atan2(r613452, r613453);
double r613455 = fmod(r613454, r613449);
double r613456 = cbrt(r613455);
double r613457 = r613456 * r613456;
double r613458 = log(r613457);
double r613459 = pow(r613448, r613458);
double r613460 = r613459 * r613456;
double r613461 = fabs(r613460);
return r613461;
}



Bits error versus a
Initial program 32.8
rmApplied add-cube-cbrt32.8
rmApplied add-exp-log32.8
rmApplied *-un-lft-identity32.8
Applied exp-prod32.8
Simplified32.8
Final simplification32.8
herbie shell --seed 2019143 +o rules:numerics
(FPCore (a)
:name "Random Jason Timeout Test 006"
(fabs (fmod (atan2 (expm1 (sin (expm1 a))) (atan a)) a)))