\cos^{-1} \left({\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}\right)\cos^{-1} \left({\left(\sqrt[3]{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}\right)}^{\left(\mathsf{log1p}\left(a\right)\right)} \cdot {\left(\log \left(\sqrt{e^{\sqrt[3]{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)} \cdot \sqrt[3]{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}}}\right) + \log \left(\sqrt{e^{\sqrt[3]{\log \left(e^{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}\right)} \cdot \sqrt[3]{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}}}\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}\right)double f(double a) {
double r5001 = a;
double r5002 = cosh(r5001);
double r5003 = r5001 * r5001;
double r5004 = fmod(r5002, r5003);
double r5005 = log1p(r5001);
double r5006 = pow(r5004, r5005);
double r5007 = acos(r5006);
return r5007;
}
double f(double a) {
double r5008 = a;
double r5009 = cosh(r5008);
double r5010 = r5008 * r5008;
double r5011 = fmod(r5009, r5010);
double r5012 = cbrt(r5011);
double r5013 = log1p(r5008);
double r5014 = pow(r5012, r5013);
double r5015 = r5012 * r5012;
double r5016 = exp(r5015);
double r5017 = sqrt(r5016);
double r5018 = log(r5017);
double r5019 = exp(r5011);
double r5020 = log(r5019);
double r5021 = cbrt(r5020);
double r5022 = r5021 * r5012;
double r5023 = exp(r5022);
double r5024 = sqrt(r5023);
double r5025 = log(r5024);
double r5026 = r5018 + r5025;
double r5027 = pow(r5026, r5013);
double r5028 = r5014 * r5027;
double r5029 = acos(r5028);
return r5029;
}



Bits error versus a
Initial program 61.3
rmApplied add-log-exp60.4
rmApplied add-cube-cbrt60.4
Applied exp-prod60.4
Applied log-pow60.2
Applied unpow-prod-down60.2
rmApplied add-sqr-sqrt60.3
Applied log-prod60.3
rmApplied add-log-exp60.3
Final simplification60.3
herbie shell --seed 2020033 +o rules:numerics
(FPCore (a)
:name "Random Jason Timeout Test 012"
:precision binary64
(acos (pow (fmod (cosh a) (* a a)) (log1p a))))