In DELEG7 corrected expressions for GG[I - 1][0] and GG{I - 1][1].
authorilb@NIH.GOV <ilb@NIH.GOV@ba61647d-9d00-f842-95cd-605cb4296b96>
Thu, 15 Feb 2018 20:39:58 +0000 (20:39 +0000)
committerilb@NIH.GOV <ilb@NIH.GOV@ba61647d-9d00-f842-95cd-605cb4296b96>
Thu, 15 Feb 2018 20:39:58 +0000 (20:39 +0000)
git-svn-id: https://citdcbmipav.cit.nih.gov/repos-pub/mipav/trunk@15377 ba61647d-9d00-f842-95cd-605cb4296b96

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

index 0005bbc..69d3343 100644 (file)
@@ -6324,8 +6324,8 @@ public class SymmsIntegralMapping extends AlgorithmBase {
                        mag = Math.pow(r, BETA);\r
                        theta = Math.atan2(ZZ[I - 1][1], 1.0 + ZZ[I - 1][0]);\r
                        ang = BETA * theta;\r
-                       GG[I - 1][0] = mag * Math.cos(ang) * KK;\r
-                       GG[I - 1][1] = mag * Math.sin(ang) * KK;\r
+                       GG[I - 1][0] = -mag * Math.cos(ang) * KK;\r
+                       GG[I - 1][1] = -mag * Math.sin(ang) * KK;\r
                        HH[I - 1][0] = -Math.log(r) * HCO * KK;\r
                        HH[I - 1][1] = -theta * HCO * KK;\r
                } // for (I=1; I <= NZZ; I++)\r
@@ -7938,7 +7938,7 @@ public class SymmsIntegralMapping extends AlgorithmBase {
                int I, I0, I1, I2, J, K, JI, JI0, JI1, JI2, P0, P1, P2, HI, LO, NQ, DIFF, TNCQP;\r
                double DST[] = new double[2];\r
                double BETA, H1, M1, T0, T2, SUM1, RR, RRB, MEAN, RXI, IXI;\r
-               final double ONE[] = new double[] { 1.0, 0.0 };\r
+               //final double ONE[] = new double[] { 1.0, 0.0 };\r
                double ZZ[] = new double[2];\r
                double Z0[] = new double[2];\r
                double Z2[] = new double[2];\r