double code(double x, double n) {
return ((double) (((double) pow(((double) (x + 1.0)), ((double) (1.0 / n)))) - ((double) pow(x, ((double) (1.0 / n))))));
}
double code(double x, double n) {
double VAR;
if ((((double) (1.0 / n)) <= -2.5542558241396368e-09)) {
VAR = ((double) log(((double) exp(((double) (((double) pow(((double) (1.0 + x)), ((double) (1.0 / n)))) - ((double) pow(x, ((double) (1.0 / n))))))))));
} else {
double VAR_1;
if ((((double) (1.0 / n)) <= 3.2984038541839436e-18)) {
VAR_1 = ((double) (1.0 / ((double) (n * x))));
} else {
VAR_1 = ((double) (((double) (((double) (((double) pow(((double) pow(((double) sqrt(((double) (1.0 + x)))), ((double) (1.0 / n)))), 3.0)) - ((double) pow(((double) sqrt(((double) pow(x, ((double) (1.0 / n)))))), 3.0)))) * ((double) (((double) pow(((double) sqrt(((double) (1.0 + x)))), ((double) (((double) (1.0 / n)) * 2.0)))) - ((double) pow(x, ((double) (1.0 / n)))))))) / ((double) (((double) (((double) pow(((double) sqrt(((double) (1.0 + x)))), ((double) (1.0 / n)))) - ((double) sqrt(((double) pow(x, ((double) (1.0 / n)))))))) * ((double) (((double) pow(x, ((double) (1.0 / n)))) + ((double) (((double) pow(((double) sqrt(((double) (1.0 + x)))), ((double) (1.0 / n)))) * ((double) (((double) pow(((double) sqrt(((double) (1.0 + x)))), ((double) (1.0 / n)))) + ((double) sqrt(((double) pow(x, ((double) (1.0 / n))))))))))))))));
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus x



Bits error versus n
Results
if (/ 1.0 n) < -2.55425582413963677e-9Initial program 2.4
rmApplied add-log-exp2.9
Applied add-log-exp2.7
Applied diff-log2.7
Simplified2.7
if -2.55425582413963677e-9 < (/ 1.0 n) < 3.2984038541839436e-18Initial program 44.9
Taylor expanded around -inf 64.0
Simplified31.7
if 3.2984038541839436e-18 < (/ 1.0 n) Initial program 10.8
rmApplied add-sqr-sqrt10.9
Applied add-sqr-sqrt10.9
Applied unpow-prod-down10.9
Applied difference-of-squares10.9
rmApplied flip3--10.9
Applied flip-+11.2
Applied frac-times11.2
Simplified11.1
Simplified11.1
Final simplification23.9
herbie shell --seed 2020179
(FPCore (x n)
:name "2nthrt (problem 3.4.6)"
:precision binary64
(- (pow (+ x 1.0) (/ 1.0 n)) (pow x (/ 1.0 n))))