In WPROD changed W0[K] to W0[K-1] and W1[K] to W1[K-1].
authorilb@NIH.GOV <ilb@NIH.GOV@ba61647d-9d00-f842-95cd-605cb4296b96>
Tue, 28 Nov 2017 17:28:10 +0000 (17:28 +0000)
committerilb@NIH.GOV <ilb@NIH.GOV@ba61647d-9d00-f842-95cd-605cb4296b96>
Tue, 28 Nov 2017 17:28:10 +0000 (17:28 +0000)
git-svn-id: https://citdcbmipav.cit.nih.gov/repos-pub/mipav/trunk@15277 ba61647d-9d00-f842-95cd-605cb4296b96

mipav/src/gov/nih/mipav/model/algorithms/DoublyConnectedSC.java

index ae04b9c..c2df72d 100644 (file)
@@ -658,7 +658,7 @@ double neweps;
              WSUM[0] = 0.0;\r
              WSUM[1] = 0.0;\r
              for (K = 1; K <= M; K++) {\r
-                 scm.zdiv(W[0], W[1], U*W0[K][0], U*W0[K][1], cr, ci);\r
+                 scm.zdiv(W[0], W[1], U*W0[K-1][0], U*W0[K-1][1], cr, ci);\r
                  win[0] = cr[0];\r
                  win[1] = ci[0];\r
                  wout = WTHETA(U, win);\r
@@ -668,7 +668,7 @@ double neweps;
                  WSUM[1] = WSUM[1] + (ALFA0[K-1]-1.0)*WTH[1];\r
              } // for (K = 1; K <= M; K++)\r
              for (K = 1; K <= N; K++) {\r
-                 scm.zdiv(U*W[0], U*W[1], W1[K][0], W1[K][1], cr, ci);\r
+                 scm.zdiv(U*W[0], U*W[1], W1[K-1][0], W1[K-1][1], cr, ci);\r
                  win[0] = cr[0];\r
                  win[1] = ci[0];\r
                  wout = WTHETA(U, win);\r