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 ((i <= 2.6665270239172677e+83)) {
VAR = ((double) (((double) (i * ((double) (i + ((double) (alpha + beta)))))) * ((double) pow(((double) M_E), ((double) (((double) log(((double) (((double) (i * ((double) (i + ((double) (alpha + beta)))))) + ((double) (alpha * beta)))))) - ((double) (((double) log(((double) (((double) (((double) (alpha + ((double) (beta + ((double) (i * 2.0)))))) * ((double) (alpha + ((double) (beta + ((double) (i * 2.0)))))))) - 1.0)))) + ((double) (2.0 * ((double) log(((double) (alpha + ((double) (beta + ((double) (i * 2.0))))))))))))))))));
} else {
VAR = 0.0625;
}
return VAR;
}



Bits error versus alpha



Bits error versus beta



Bits error versus i
Results
if i < 2.66652702391726766e83Initial program 26.3
Simplified22.7
rmApplied add-exp-log25.1
Applied add-exp-log25.3
Applied prod-exp25.6
Applied add-exp-log25.7
Applied prod-exp25.6
Applied add-exp-log25.5
Applied div-exp19.2
Simplified19.2
rmApplied *-un-lft-identity19.2
Applied exp-prod19.0
Simplified19.0
if 2.66652702391726766e83 < i Initial program 64.0
Simplified63.5
rmApplied add-exp-log63.5
Applied add-exp-log63.5
Applied prod-exp63.5
Applied add-exp-log63.5
Applied prod-exp63.5
Applied add-exp-log63.5
Applied div-exp52.3
Simplified52.3
Taylor expanded around inf 52.8
Simplified14.5
Taylor expanded around 0 14.4
Final simplification15.7
herbie shell --seed 2020179
(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)))