Comments about ABNORMAL JAPHYC exit in both FORTRAN AND Java due to parameter bounds...
authorilb@NIH.GOV <ilb@NIH.GOV@ba61647d-9d00-f842-95cd-605cb4296b96>
Fri, 16 Feb 2018 23:15:09 +0000 (23:15 +0000)
committerilb@NIH.GOV <ilb@NIH.GOV@ba61647d-9d00-f842-95cd-605cb4296b96>
Fri, 16 Feb 2018 23:15:09 +0000 (23:15 +0000)
git-svn-id: https://citdcbmipav.cit.nih.gov/repos-pub/mipav/trunk@15383 ba61647d-9d00-f842-95cd-605cb4296b96

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

index b16321b..6ad3162 100644 (file)
@@ -131,7 +131,7 @@ public class SymmsIntegralMapping extends AlgorithmBase {
        // COMPOSITE RULE. SPECIFICALLY, MQIN1 = 1 + (THE\r
        // MAXIMUM NUMBER OF PANELS IN A COMPOSITE RULE FOR\r
        // A SINGLE SUB-ARC ON THE BOUNDARY)\r
-    private int MQIN1 = 11; // 11 in DRIVE0\r
+    private int MQIN1 = 110; // 11 in DRIVE0\r
     // MNQUA= MAXIMUM TOTAL NUMBER OF QUADRATURE POINTS ALLOWED OVER\r
     //        ALL COMPOSITE GAUSSIAN RULES AT THE PROCESSING STAGE OF\r
     // SOLVING SYMM'S EQUATION\r
@@ -1081,8 +1081,28 @@ public class SymmsIntegralMapping extends AlgorithmBase {
        \r
 \r
     public void DRIVE1() {\r
-        \r
-        // .......................................................................\r
+        // Running DOUBLE PRECISION FORTRAN ON WINDOWS FOR Example 1 GIVES:\r
+       // JAPHYC: ABNORMAL EXIT\r
+       // NUMBER OF EQUATIONS EXCEEDS MNEQN DURING REFINEMENT\r
+       // Take MNEQN 500 -> 5000\r
+       // JAPHYC: ABNORMAL EXIT\r
+       // NUMBER OF SUBARCS EXCEEDS IBNDS(1) DURING REFINEMENT\r
+       // IBNDS(1) = MNSUA\r
+       // Take MNSUA 150 -> 1500\r
+       // JAPHYC: ABNORMAL EXIT\r
+       // NUMBER OF QUADRATURE PANELS EXCEEDS IBNDS(3) DURING REFINEMENT\r
+       // IBNDS(3) = MQIN1\r
+       // Take MQIN1 11 -> 110\r
+       // JAPHYC: ABNROMAL EXIT\r
+       // NUMBER OF EQUATIONS EXCEEDS MNEQN DURING REFINEMENT\r
+       //\r
+       // Running MIPAV for example 1 gives:\r
+       // JAPHYC: ABNORMAL EXIT\r
+       // NUMBER OF QUADRATURE PANELS EXCEEDS IBNDS[2] DURING REFINEMENT\r
+       // IBNDS[2] = MQIN1\r
+       // Take MQIN1 11 -> 110\r
+       // Still receive same error message.\r
+       // .......................................................................\r
         // EXAMPLE PROGRAM TO SHOW THE USE OF THE SYMM EQUATION SOLVING\r
         // SUBROUTINE JAPHYC FROM THE\r
     \r