double code(double x) {
return ((double) (((double) (1.0 - ((double) cos(x)))) / ((double) (x * x))));
}
double code(double x) {
double VAR;
if ((x <= -0.036336696848678435)) {
VAR = ((double) (((double) (((double) exp(((double) log(((double) sqrt(((double) (((double) (((double) pow(1.0, 3.0)) - ((double) pow(((double) cos(x)), 3.0)))) / ((double) (((double) (1.0 * 1.0)) + ((double) (((double) cos(x)) * ((double) (1.0 + ((double) cos(x)))))))))))))))) / x)) * ((double) (((double) sqrt(((double) log(((double) exp(((double) (1.0 - ((double) cos(x)))))))))) / x))));
} else {
double VAR_1;
if ((x <= 0.03595994027748503)) {
VAR_1 = ((double) (0.5 + ((double) (((double) (((double) pow(x, 4.0)) * 0.001388888888888889)) + ((double) (x * ((double) (x * -0.041666666666666664))))))));
} else {
VAR_1 = ((double) (((double) (((double) sqrt(((double) log(((double) exp(((double) (1.0 - ((double) cos(x)))))))))) / x)) * ((double) (((double) sqrt(((double) (((double) log(((double) exp(((double) (((double) pow(1.0, 3.0)) - ((double) pow(((double) cos(x)), 3.0)))))))) / ((double) (((double) (1.0 * 1.0)) + ((double) (((double) cos(x)) * ((double) (1.0 + ((double) cos(x)))))))))))) / x))));
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus x
Results
if x < -0.036336696848678435Initial program 1.0
rmApplied add-sqr-sqrt1.1
Applied times-frac0.6
rmApplied add-log-exp0.6
Applied add-log-exp0.6
Applied diff-log0.6
Simplified0.6
rmApplied flip3--0.6
Simplified0.6
rmApplied add-exp-log0.6
if -0.036336696848678435 < x < 0.035959940277485031Initial program 62.3
Taylor expanded around 0 0.0
Simplified0.0
if 0.035959940277485031 < x Initial program 1.3
rmApplied add-sqr-sqrt1.4
Applied times-frac0.6
rmApplied add-log-exp0.6
Applied add-log-exp0.6
Applied diff-log0.6
Simplified0.6
rmApplied flip3--0.6
Simplified0.6
rmApplied add-log-exp0.6
Applied add-log-exp0.6
Applied diff-log0.6
Simplified0.6
Final simplification0.3
herbie shell --seed 2020191
(FPCore (x)
:name "cos2 (problem 3.4.1)"
:precision binary64
(/ (- 1.0 (cos x)) (* x x)))