double code(double alpha, double beta, double i) {
return ((double) (((double) (((double) (((double) (i * ((double) (((double) (alpha + beta)) + i)))) * ((double) (((double) (beta * alpha)) + ((double) (i * ((double) (((double) (alpha + beta)) + i)))))))) / ((double) (((double) (((double) (alpha + beta)) + ((double) (2.0 * i)))) * ((double) (((double) (alpha + beta)) + ((double) (2.0 * i)))))))) / ((double) (((double) (((double) (((double) (alpha + beta)) + ((double) (2.0 * i)))) * ((double) (((double) (alpha + beta)) + ((double) (2.0 * i)))))) - 1.0))));
}
double code(double alpha, double beta, double i) {
double VAR;
if ((beta <= 5.380345921875369e+195)) {
VAR = ((double) (((double) (i / ((double) (((double) (alpha + ((double) (beta + ((double) (i * 2.0)))))) * ((double) (((double) (alpha + ((double) (beta + ((double) (i * 2.0)))))) / ((double) (i + ((double) (beta + alpha)))))))))) * ((double) (((double) (((double) sqrt(((double) (((double) (i * ((double) (i + ((double) (beta + alpha)))))) + ((double) (beta * alpha)))))) / ((double) (alpha + ((double) (beta + ((double) (((double) (i * 2.0)) + ((double) sqrt(1.0)))))))))) * ((double) (((double) sqrt(((double) (((double) (i * ((double) (i + ((double) (beta + alpha)))))) + ((double) (beta * alpha)))))) / ((double) (alpha + ((double) (beta + ((double) (((double) (i * 2.0)) - ((double) sqrt(1.0))))))))))))));
} else {
VAR = 0.0;
}
return VAR;
}



Bits error versus alpha



Bits error versus beta



Bits error versus i
Results
if beta < 5.38034592187536923e195Initial program 52.6
Simplified51.9
rmApplied *-un-lft-identity51.9
Applied times-frac47.6
Applied associate-*r*47.5
Simplified47.5
rmApplied *-un-lft-identity47.5
Applied times-frac37.5
Applied associate-*r*37.5
Simplified37.5
rmApplied add-sqr-sqrt37.5
Applied difference-of-squares37.5
Applied add-sqr-sqrt37.5
Applied times-frac35.2
Simplified35.2
Simplified35.2
if 5.38034592187536923e195 < beta Initial program 64.0
Simplified56.8
Taylor expanded around inf 44.7
Final simplification36.4
herbie shell --seed 2020181
(FPCore (alpha beta i)
:name "Octave 3.8, jcobi/4"
:precision binary64
:pre (and (> alpha -1.0) (> beta -1.0) (> i 1.0))
(/ (/ (* (* i (+ (+ alpha beta) i)) (+ (* beta alpha) (* i (+ (+ alpha beta) i)))) (* (+ (+ alpha beta) (* 2.0 i)) (+ (+ alpha beta) (* 2.0 i)))) (- (* (+ (+ alpha beta) (* 2.0 i)) (+ (+ alpha beta) (* 2.0 i))) 1.0)))