X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=linearalgebra.cpp;h=effb1ad44e04abd9c1bdd8523ca3b05f4253de94;hb=b0997605981902442138b9309e9c43d95c3ba10a;hp=ab75b7e94bed1e90f44928a2e6e156220027f493;hpb=5d77fd07180d1fb8561ff1962e6d7429caf8555e;p=mothur.git

diff --git a/linearalgebra.cpp b/linearalgebra.cpp
index ab75b7e..effb1ad 100644
--- a/linearalgebra.cpp
+++ b/linearalgebra.cpp
@@ -222,7 +222,7 @@ double LinearAlgebra::betacf(const double a, const double b, const double x) {
         if (fabs(d) < FPMIN) d=FPMIN;
         d=1.0/d;
         h=d;
-        for (m1=1;m1<=MAXIT;m++) {
+        for (m1=1;m1<=MAXIT;m1++) {
             m2=2*m1;
             aa=m1*(b-m1)*x/((qam+m2)*(a+m2));
             d=1.0+aa*d;