\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(\log \left(e^{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}} \cdot \sqrt[3]{{\left(\log \left(e^{\left(\left(\cosh a\right) \bmod \left(a \cdot a\right)\right)}\right)\right)}^{\left(\mathsf{log1p}\left(a\right)\right)}}\right) \cdot \sqrt[3]{{\left(\log \left(e^{\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 r4830 = a;
double r4831 = cosh(r4830);
double r4832 = r4830 * r4830;
double r4833 = fmod(r4831, r4832);
double r4834 = log1p(r4830);
double r4835 = pow(r4833, r4834);
double r4836 = acos(r4835);
return r4836;
}
double f(double a) {
double r4837 = a;
double r4838 = cosh(r4837);
double r4839 = r4837 * r4837;
double r4840 = fmod(r4838, r4839);
double r4841 = exp(r4840);
double r4842 = log(r4841);
double r4843 = log1p(r4837);
double r4844 = pow(r4842, r4843);
double r4845 = cbrt(r4844);
double r4846 = r4845 * r4845;
double r4847 = r4846 * r4845;
double r4848 = acos(r4847);
return r4848;
}



Bits error versus a
Initial program 61.2
rmApplied add-log-exp60.3
rmApplied add-cube-cbrt60.3
Final simplification60.3
herbie shell --seed 2020047
(FPCore (a)
:name "Random Jason Timeout Test 012"
:precision binary64
(acos (pow (fmod (cosh a) (* a a)) (log1p a))))