diff --git a/src/spicelib/devices/bsim4/b4bindCSC.c b/src/spicelib/devices/bsim4/b4bindCSC.c
index a5e4cce30..090633d10 100644
--- a/src/spicelib/devices/bsim4/b4bindCSC.c
+++ b/src/spicelib/devices/bsim4/b4bindCSC.c
@@ -1,5 +1,5 @@
 /**********
-Author: 2012 Francesco Lannutti
+Author: 2013 Francesco Lannutti
 **********/
 
 #include "ngspice/ngspice.h"
@@ -38,7 +38,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
         /* loop through all the instances of the model */
         for (here = model->BSIM4instances ; here != NULL ; here = here->BSIM4nextInstance)
         {
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
             {
                 i = here->BSIM4DPbpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -46,7 +46,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DPbpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
             {
                 i = here->BSIM4GPbpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -54,7 +54,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4GPbpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
             {
                 i = here->BSIM4SPbpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -62,7 +62,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SPbpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
             {
                 i = here->BSIM4BPdpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -70,7 +70,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4BPdpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
             {
                 i = here->BSIM4BPgpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -78,7 +78,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4BPgpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
             {
                 i = here->BSIM4BPspPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -86,7 +86,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4BPspPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
             {
                 i = here->BSIM4BPbpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -94,7 +94,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4BPbpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4dNode != 0) && (here->BSIM4dNode != 0))
+            if ((here-> BSIM4dNode != 0) && (here-> BSIM4dNode != 0))
             {
                 i = here->BSIM4DdPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -102,7 +102,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DdPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
             {
                 i = here->BSIM4GPgpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -110,7 +110,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4GPgpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNode != 0) && (here->BSIM4sNode != 0))
+            if ((here-> BSIM4sNode != 0) && (here-> BSIM4sNode != 0))
             {
                 i = here->BSIM4SsPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -118,7 +118,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SsPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
             {
                 i = here->BSIM4DPdpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -126,7 +126,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DPdpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
             {
                 i = here->BSIM4SPspPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -134,7 +134,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SPspPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4dNode != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4dNode != 0) && (here-> BSIM4dNodePrime != 0))
             {
                 i = here->BSIM4DdpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -142,7 +142,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DdpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
             {
                 i = here->BSIM4GPdpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -150,7 +150,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4GPdpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
             {
                 i = here->BSIM4GPspPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -158,7 +158,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4GPspPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNode != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4sNode != 0) && (here-> BSIM4sNodePrime != 0))
             {
                 i = here->BSIM4SspPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -166,7 +166,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SspPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
             {
                 i = here->BSIM4DPspPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -174,7 +174,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DPspPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dNode != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dNode != 0))
             {
                 i = here->BSIM4DPdPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -182,7 +182,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DPdPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
             {
                 i = here->BSIM4DPgpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -190,7 +190,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DPgpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
             {
                 i = here->BSIM4SPgpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -198,7 +198,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SPgpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sNode != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sNode != 0))
             {
                 i = here->BSIM4SPsPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -206,7 +206,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SPsPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
             {
                 i = here->BSIM4SPdpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -214,7 +214,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SPdpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4qNode != 0))
             {
                 i = here->BSIM4QqPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -222,7 +222,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4QqPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4bNodePrime != 0))
             {
                 i = here->BSIM4QbpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -230,7 +230,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4QbpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4dNodePrime != 0))
             {
                 i = here->BSIM4QdpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -238,7 +238,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4QdpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4sNodePrime != 0))
             {
                 i = here->BSIM4QspPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -246,7 +246,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4QspPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4gNodePrime != 0))
             {
                 i = here->BSIM4QgpPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -254,7 +254,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4QgpPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4qNode != 0))
             {
                 i = here->BSIM4DPqPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -262,7 +262,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4DPqPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4qNode != 0))
             {
                 i = here->BSIM4SPqPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -270,7 +270,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                 here->BSIM4SPqPtr = matched->CSC ;
             }
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4qNode != 0))
             {
                 i = here->BSIM4GPqPtr ;
                 matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -280,7 +280,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
 
             if (here->BSIM4rgateMod != 0)
             {
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodeExt != 0))
                 {
                     i = here->BSIM4GEgePtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -288,7 +288,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GEgePtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodePrime != 0))
                 {
                     i = here->BSIM4GEgpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -296,7 +296,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GEgpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodeExt != 0))
                 {
                     i = here->BSIM4GPgePtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -304,7 +304,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GPgePtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4dNodePrime != 0))
                 {
                     i = here->BSIM4GEdpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -312,7 +312,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GEdpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4sNodePrime != 0))
                 {
                     i = here->BSIM4GEspPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -320,7 +320,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GEspPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4bNodePrime != 0))
                 {
                     i = here->BSIM4GEbpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -328,7 +328,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GEbpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4dNodePrime != 0))
                 {
                     i = here->BSIM4GMdpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -336,7 +336,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GMdpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodePrime != 0))
                 {
                     i = here->BSIM4GMgpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -344,7 +344,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GMgpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodeMid != 0))
                 {
                     i = here->BSIM4GMgmPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -352,7 +352,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GMgmPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodeExt != 0))
                 {
                     i = here->BSIM4GMgePtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -360,7 +360,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GMgePtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4sNodePrime != 0))
                 {
                     i = here->BSIM4GMspPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -368,7 +368,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GMspPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4bNodePrime != 0))
                 {
                     i = here->BSIM4GMbpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -376,7 +376,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GMbpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4dNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                 {
                     i = here->BSIM4DPgmPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -384,7 +384,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DPgmPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                 {
                     i = here->BSIM4GPgmPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -392,7 +392,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GPgmPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodeMid != 0))
                 {
                     i = here->BSIM4GEgmPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -400,7 +400,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4GEgmPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                 {
                     i = here->BSIM4SPgmPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -408,18 +408,18 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SPgmPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                 {
                     i = here->BSIM4BPgmPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
                     here->BSIM4BPgmStructPtr = matched ;
                     here->BSIM4BPgmPtr = matched->CSC ;
                 }
-            }
 
-            if ((here->BSIM4rbodyMod == 1) || (here->BSIM4rbodyMod == 2))
+            }
+            if ((here->BSIM4rbodyMod ==1) || (here->BSIM4rbodyMod ==2))
             {
-                if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dbNode != 0))
                 {
                     i = here->BSIM4DPdbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -427,7 +427,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DPdbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sbNode != 0))
                 {
                     i = here->BSIM4SPsbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -435,7 +435,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SPsbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4dNodePrime != 0))
                 {
                     i = here->BSIM4DBdpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -443,7 +443,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DBdpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4dbNode != 0))
                 {
                     i = here->BSIM4DBdbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -451,7 +451,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DBdbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4bNodePrime != 0))
                 {
                     i = here->BSIM4DBbpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -459,7 +459,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DBbpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4bNode != 0))
                 {
                     i = here->BSIM4DBbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -467,7 +467,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DBbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4dbNode != 0))
                 {
                     i = here->BSIM4BPdbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -475,7 +475,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4BPdbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4bNode != 0))
                 {
                     i = here->BSIM4BPbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -483,7 +483,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4BPbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4sbNode != 0))
                 {
                     i = here->BSIM4BPsbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -491,7 +491,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4BPsbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4sNodePrime != 0))
                 {
                     i = here->BSIM4SBspPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -499,7 +499,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SBspPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4bNodePrime != 0))
                 {
                     i = here->BSIM4SBbpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -507,7 +507,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SBbpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4bNode != 0))
                 {
                     i = here->BSIM4SBbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -515,7 +515,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SBbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4sbNode != 0))
                 {
                     i = here->BSIM4SBsbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -523,7 +523,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SBsbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4dbNode != 0))
                 {
                     i = here->BSIM4BdbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -531,7 +531,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4BdbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4bNodePrime != 0))
                 {
                     i = here->BSIM4BbpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -539,7 +539,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4BbpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4sbNode != 0))
                 {
                     i = here->BSIM4BsbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -547,18 +547,18 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4BsbPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4bNode != 0))
                 {
                     i = here->BSIM4BbPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
                     here->BSIM4BbStructPtr = matched ;
                     here->BSIM4BbPtr = matched->CSC ;
                 }
-            }
 
+            }
             if (model->BSIM4rdsMod)
             {
-                if ((here->BSIM4dNode != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4gNodePrime != 0))
                 {
                     i = here->BSIM4DgpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -566,7 +566,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DgpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4dNode != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4sNodePrime != 0))
                 {
                     i = here->BSIM4DspPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -574,7 +574,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DspPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4dNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4bNodePrime != 0))
                 {
                     i = here->BSIM4DbpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -582,7 +582,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4DbpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4dNodePrime != 0))
                 {
                     i = here->BSIM4SdpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -590,7 +590,7 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SdpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4gNodePrime != 0))
                 {
                     i = here->BSIM4SgpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
@@ -598,13 +598,14 @@ BSIM4bindCSC (GENmodel *inModel, CKTcircuit *ckt)
                     here->BSIM4SgpPtr = matched->CSC ;
                 }
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4bNodePrime != 0))
                 {
                     i = here->BSIM4SbpPtr ;
                     matched = (BindElement *) bsearch (&i, BindStruct, nz, sizeof(BindElement), BindCompare) ;
                     here->BSIM4SbpStructPtr = matched ;
                     here->BSIM4SbpPtr = matched->CSC ;
                 }
+
             }
         }
     }
@@ -626,229 +627,231 @@ BSIM4bindCSCComplex (GENmodel *inModel, CKTcircuit *ckt)
         /* loop through all the instances of the model */
         for (here = model->BSIM4instances ; here != NULL ; here = here->BSIM4nextInstance)
         {
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4DPbpPtr = here->BSIM4DPbpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4GPbpPtr = here->BSIM4GPbpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4SPbpPtr = here->BSIM4SPbpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4BPdpPtr = here->BSIM4BPdpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4BPgpPtr = here->BSIM4BPgpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4BPspPtr = here->BSIM4BPspStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4BPbpPtr = here->BSIM4BPbpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4dNode != 0) && (here->BSIM4dNode != 0))
+            if ((here-> BSIM4dNode != 0) && (here-> BSIM4dNode != 0))
                 here->BSIM4DdPtr = here->BSIM4DdStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4GPgpPtr = here->BSIM4GPgpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNode != 0) && (here->BSIM4sNode != 0))
+            if ((here-> BSIM4sNode != 0) && (here-> BSIM4sNode != 0))
                 here->BSIM4SsPtr = here->BSIM4SsStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4DPdpPtr = here->BSIM4DPdpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4SPspPtr = here->BSIM4SPspStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4dNode != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4dNode != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4DdpPtr = here->BSIM4DdpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4GPdpPtr = here->BSIM4GPdpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4GPspPtr = here->BSIM4GPspStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNode != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4sNode != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4SspPtr = here->BSIM4SspStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4DPspPtr = here->BSIM4DPspStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dNode != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dNode != 0))
                 here->BSIM4DPdPtr = here->BSIM4DPdStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4DPgpPtr = here->BSIM4DPgpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4SPgpPtr = here->BSIM4SPgpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sNode != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sNode != 0))
                 here->BSIM4SPsPtr = here->BSIM4SPsStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4SPdpPtr = here->BSIM4SPdpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4QqPtr = here->BSIM4QqStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4QbpPtr = here->BSIM4QbpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4QdpPtr = here->BSIM4QdpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4QspPtr = here->BSIM4QspStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4QgpPtr = here->BSIM4QgpStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4DPqPtr = here->BSIM4DPqStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4SPqPtr = here->BSIM4SPqStructPtr->CSC_Complex ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4GPqPtr = here->BSIM4GPqStructPtr->CSC_Complex ;
 
             if (here->BSIM4rgateMod != 0)
             {
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodeExt != 0))
                     here->BSIM4GEgePtr = here->BSIM4GEgeStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4GEgpPtr = here->BSIM4GEgpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodeExt != 0))
                     here->BSIM4GPgePtr = here->BSIM4GPgeStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4GEdpPtr = here->BSIM4GEdpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4GEspPtr = here->BSIM4GEspStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4GEbpPtr = here->BSIM4GEbpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4GMdpPtr = here->BSIM4GMdpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4GMgpPtr = here->BSIM4GMgpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4GMgmPtr = here->BSIM4GMgmStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodeExt != 0))
                     here->BSIM4GMgePtr = here->BSIM4GMgeStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4GMspPtr = here->BSIM4GMspStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4GMbpPtr = here->BSIM4GMbpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4dNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4DPgmPtr = here->BSIM4DPgmStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4GPgmPtr = here->BSIM4GPgmStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4GEgmPtr = here->BSIM4GEgmStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4SPgmPtr = here->BSIM4SPgmStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4BPgmPtr = here->BSIM4BPgmStructPtr->CSC_Complex ;
-            }
 
-            if ((here->BSIM4rbodyMod == 1) || (here->BSIM4rbodyMod == 2))
+            }
+            if ((here->BSIM4rbodyMod ==1) || (here->BSIM4rbodyMod ==2))
             {
-                if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4DPdbPtr = here->BSIM4DPdbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4SPsbPtr = here->BSIM4SPsbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4DBdpPtr = here->BSIM4DBdpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4DBdbPtr = here->BSIM4DBdbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4DBbpPtr = here->BSIM4DBbpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4DBbPtr = here->BSIM4DBbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4BPdbPtr = here->BSIM4BPdbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4BPbPtr = here->BSIM4BPbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4BPsbPtr = here->BSIM4BPsbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4SBspPtr = here->BSIM4SBspStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4SBbpPtr = here->BSIM4SBbpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4SBbPtr = here->BSIM4SBbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4SBsbPtr = here->BSIM4SBsbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4BdbPtr = here->BSIM4BdbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4BbpPtr = here->BSIM4BbpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4BsbPtr = here->BSIM4BsbStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4BbPtr = here->BSIM4BbStructPtr->CSC_Complex ;
-            }
 
+            }
             if (model->BSIM4rdsMod)
             {
-                if ((here->BSIM4dNode != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4DgpPtr = here->BSIM4DgpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4dNode != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4DspPtr = here->BSIM4DspStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4dNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4DbpPtr = here->BSIM4DbpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4SdpPtr = here->BSIM4SdpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4SgpPtr = here->BSIM4SgpStructPtr->CSC_Complex ;
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4SbpPtr = here->BSIM4SbpStructPtr->CSC_Complex ;
+
             }
         }
     }
 
     return (OK) ;
 }
+
 int
 BSIM4bindCSCComplexToReal (GENmodel *inModel, CKTcircuit *ckt)
 {
@@ -863,223 +866,224 @@ BSIM4bindCSCComplexToReal (GENmodel *inModel, CKTcircuit *ckt)
         /* loop through all the instances of the model */
         for (here = model->BSIM4instances ; here != NULL ; here = here->BSIM4nextInstance)
         {
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4DPbpPtr = here->BSIM4DPbpStructPtr->CSC ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4GPbpPtr = here->BSIM4GPbpStructPtr->CSC ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4SPbpPtr = here->BSIM4SPbpStructPtr->CSC ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4BPdpPtr = here->BSIM4BPdpStructPtr->CSC ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4BPgpPtr = here->BSIM4BPgpStructPtr->CSC ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4BPspPtr = here->BSIM4BPspStructPtr->CSC ;
 
-            if ((here->BSIM4bNodePrime != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4BPbpPtr = here->BSIM4BPbpStructPtr->CSC ;
 
-            if ((here->BSIM4dNode != 0) && (here->BSIM4dNode != 0))
+            if ((here-> BSIM4dNode != 0) && (here-> BSIM4dNode != 0))
                 here->BSIM4DdPtr = here->BSIM4DdStructPtr->CSC ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4GPgpPtr = here->BSIM4GPgpStructPtr->CSC ;
 
-            if ((here->BSIM4sNode != 0) && (here->BSIM4sNode != 0))
+            if ((here-> BSIM4sNode != 0) && (here-> BSIM4sNode != 0))
                 here->BSIM4SsPtr = here->BSIM4SsStructPtr->CSC ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4DPdpPtr = here->BSIM4DPdpStructPtr->CSC ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4SPspPtr = here->BSIM4SPspStructPtr->CSC ;
 
-            if ((here->BSIM4dNode != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4dNode != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4DdpPtr = here->BSIM4DdpStructPtr->CSC ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4GPdpPtr = here->BSIM4GPdpStructPtr->CSC ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4GPspPtr = here->BSIM4GPspStructPtr->CSC ;
 
-            if ((here->BSIM4sNode != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4sNode != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4SspPtr = here->BSIM4SspStructPtr->CSC ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4DPspPtr = here->BSIM4DPspStructPtr->CSC ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dNode != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dNode != 0))
                 here->BSIM4DPdPtr = here->BSIM4DPdStructPtr->CSC ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4DPgpPtr = here->BSIM4DPgpStructPtr->CSC ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4SPgpPtr = here->BSIM4SPgpStructPtr->CSC ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sNode != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sNode != 0))
                 here->BSIM4SPsPtr = here->BSIM4SPsStructPtr->CSC ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4SPdpPtr = here->BSIM4SPdpStructPtr->CSC ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4QqPtr = here->BSIM4QqStructPtr->CSC ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4bNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4bNodePrime != 0))
                 here->BSIM4QbpPtr = here->BSIM4QbpStructPtr->CSC ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4dNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4dNodePrime != 0))
                 here->BSIM4QdpPtr = here->BSIM4QdpStructPtr->CSC ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4sNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4sNodePrime != 0))
                 here->BSIM4QspPtr = here->BSIM4QspStructPtr->CSC ;
 
-            if ((here->BSIM4qNode != 0) && (here->BSIM4gNodePrime != 0))
+            if ((here-> BSIM4qNode != 0) && (here-> BSIM4gNodePrime != 0))
                 here->BSIM4QgpPtr = here->BSIM4QgpStructPtr->CSC ;
 
-            if ((here->BSIM4dNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4DPqPtr = here->BSIM4DPqStructPtr->CSC ;
 
-            if ((here->BSIM4sNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4SPqPtr = here->BSIM4SPqStructPtr->CSC ;
 
-            if ((here->BSIM4gNodePrime != 0) && (here->BSIM4qNode != 0))
+            if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4qNode != 0))
                 here->BSIM4GPqPtr = here->BSIM4GPqStructPtr->CSC ;
 
             if (here->BSIM4rgateMod != 0)
             {
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodeExt != 0))
                     here->BSIM4GEgePtr = here->BSIM4GEgeStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4GEgpPtr = here->BSIM4GEgpStructPtr->CSC ;
 
-                if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodeExt != 0))
                     here->BSIM4GPgePtr = here->BSIM4GPgeStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4GEdpPtr = here->BSIM4GEdpStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4GEspPtr = here->BSIM4GEspStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4GEbpPtr = here->BSIM4GEbpStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4GMdpPtr = here->BSIM4GMdpStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4GMgpPtr = here->BSIM4GMgpStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4GMgmPtr = here->BSIM4GMgmStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4gNodeExt != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4gNodeExt != 0))
                     here->BSIM4GMgePtr = here->BSIM4GMgeStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4GMspPtr = here->BSIM4GMspStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeMid != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4gNodeMid != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4GMbpPtr = here->BSIM4GMbpStructPtr->CSC ;
 
-                if ((here->BSIM4dNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4DPgmPtr = here->BSIM4DPgmStructPtr->CSC ;
 
-                if ((here->BSIM4gNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4GPgmPtr = here->BSIM4GPgmStructPtr->CSC ;
 
-                if ((here->BSIM4gNodeExt != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4gNodeExt != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4GEgmPtr = here->BSIM4GEgmStructPtr->CSC ;
 
-                if ((here->BSIM4sNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4SPgmPtr = here->BSIM4SPgmStructPtr->CSC ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4gNodeMid != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4gNodeMid != 0))
                     here->BSIM4BPgmPtr = here->BSIM4BPgmStructPtr->CSC ;
-            }
 
-            if ((here->BSIM4rbodyMod == 1) || (here->BSIM4rbodyMod == 2))
+            }
+            if ((here->BSIM4rbodyMod ==1) || (here->BSIM4rbodyMod ==2))
             {
-                if ((here->BSIM4dNodePrime != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4dNodePrime != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4DPdbPtr = here->BSIM4DPdbStructPtr->CSC ;
 
-                if ((here->BSIM4sNodePrime != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4sNodePrime != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4SPsbPtr = here->BSIM4SPsbStructPtr->CSC ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4DBdpPtr = here->BSIM4DBdpStructPtr->CSC ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4DBdbPtr = here->BSIM4DBdbStructPtr->CSC ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4DBbpPtr = here->BSIM4DBbpStructPtr->CSC ;
 
-                if ((here->BSIM4dbNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4dbNode != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4DBbPtr = here->BSIM4DBbStructPtr->CSC ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4BPdbPtr = here->BSIM4BPdbStructPtr->CSC ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4BPbPtr = here->BSIM4BPbStructPtr->CSC ;
 
-                if ((here->BSIM4bNodePrime != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4bNodePrime != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4BPsbPtr = here->BSIM4BPsbStructPtr->CSC ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4SBspPtr = here->BSIM4SBspStructPtr->CSC ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4SBbpPtr = here->BSIM4SBbpStructPtr->CSC ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4SBbPtr = here->BSIM4SBbStructPtr->CSC ;
 
-                if ((here->BSIM4sbNode != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4sbNode != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4SBsbPtr = here->BSIM4SBsbStructPtr->CSC ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4dbNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4dbNode != 0))
                     here->BSIM4BdbPtr = here->BSIM4BdbStructPtr->CSC ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4BbpPtr = here->BSIM4BbpStructPtr->CSC ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4sbNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4sbNode != 0))
                     here->BSIM4BsbPtr = here->BSIM4BsbStructPtr->CSC ;
 
-                if ((here->BSIM4bNode != 0) && (here->BSIM4bNode != 0))
+                if ((here-> BSIM4bNode != 0) && (here-> BSIM4bNode != 0))
                     here->BSIM4BbPtr = here->BSIM4BbStructPtr->CSC ;
-            }
 
+            }
             if (model->BSIM4rdsMod)
             {
-                if ((here->BSIM4dNode != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4DgpPtr = here->BSIM4DgpStructPtr->CSC ;
 
-                if ((here->BSIM4dNode != 0) && (here->BSIM4sNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4sNodePrime != 0))
                     here->BSIM4DspPtr = here->BSIM4DspStructPtr->CSC ;
 
-                if ((here->BSIM4dNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4dNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4DbpPtr = here->BSIM4DbpStructPtr->CSC ;
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4dNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4dNodePrime != 0))
                     here->BSIM4SdpPtr = here->BSIM4SdpStructPtr->CSC ;
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4gNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4gNodePrime != 0))
                     here->BSIM4SgpPtr = here->BSIM4SgpStructPtr->CSC ;
 
-                if ((here->BSIM4sNode != 0) && (here->BSIM4bNodePrime != 0))
+                if ((here-> BSIM4sNode != 0) && (here-> BSIM4bNodePrime != 0))
                     here->BSIM4SbpPtr = here->BSIM4SbpStructPtr->CSC ;
+
             }
         }
     }
diff --git a/src/spicelib/devices/bsim4/bsim4def.h b/src/spicelib/devices/bsim4/bsim4def.h
index 5ac7c0fc2..17cfa335f 100644
--- a/src/spicelib/devices/bsim4/bsim4def.h
+++ b/src/spicelib/devices/bsim4/bsim4def.h
@@ -570,88 +570,76 @@ typedef struct sBSIM4instance
 #endif /* NONOISE */
 
 #ifdef KLU
-    BindElement *BSIM4DPdStructPtr ;
-    BindElement *BSIM4DPdpStructPtr ;
-    BindElement *BSIM4DPgpStructPtr ;
-    BindElement *BSIM4DPgmStructPtr ;
-    BindElement *BSIM4DPspStructPtr ;
     BindElement *BSIM4DPbpStructPtr ;
-    BindElement *BSIM4DPdbStructPtr ;
-
-    BindElement *BSIM4DdStructPtr ;
-    BindElement *BSIM4DdpStructPtr ;
-
-    BindElement *BSIM4GPdpStructPtr ;
-    BindElement *BSIM4GPgpStructPtr ;
-    BindElement *BSIM4GPgmStructPtr ;
-    BindElement *BSIM4GPgeStructPtr ;
-    BindElement *BSIM4GPspStructPtr ;
     BindElement *BSIM4GPbpStructPtr ;
-
+    BindElement *BSIM4SPbpStructPtr ;
+    BindElement *BSIM4BPdpStructPtr ;
+    BindElement *BSIM4BPgpStructPtr ;
+    BindElement *BSIM4BPspStructPtr ;
+    BindElement *BSIM4BPbpStructPtr ;
+    BindElement *BSIM4DdStructPtr ;
+    BindElement *BSIM4GPgpStructPtr ;
+    BindElement *BSIM4SsStructPtr ;
+    BindElement *BSIM4DPdpStructPtr ;
+    BindElement *BSIM4SPspStructPtr ;
+    BindElement *BSIM4DdpStructPtr ;
+    BindElement *BSIM4GPdpStructPtr ;
+    BindElement *BSIM4GPspStructPtr ;
+    BindElement *BSIM4SspStructPtr ;
+    BindElement *BSIM4DPspStructPtr ;
+    BindElement *BSIM4DPdStructPtr ;
+    BindElement *BSIM4DPgpStructPtr ;
+    BindElement *BSIM4SPgpStructPtr ;
+    BindElement *BSIM4SPsStructPtr ;
+    BindElement *BSIM4SPdpStructPtr ;
+    BindElement *BSIM4QqStructPtr ;
+    BindElement *BSIM4QbpStructPtr ;
+    BindElement *BSIM4QdpStructPtr ;
+    BindElement *BSIM4QspStructPtr ;
+    BindElement *BSIM4QgpStructPtr ;
+    BindElement *BSIM4DPqStructPtr ;
+    BindElement *BSIM4SPqStructPtr ;
+    BindElement *BSIM4GPqStructPtr ;
+    BindElement *BSIM4GEgeStructPtr ;
+    BindElement *BSIM4GEgpStructPtr ;
+    BindElement *BSIM4GPgeStructPtr ;
+    BindElement *BSIM4GEdpStructPtr ;
+    BindElement *BSIM4GEspStructPtr ;
+    BindElement *BSIM4GEbpStructPtr ;
     BindElement *BSIM4GMdpStructPtr ;
     BindElement *BSIM4GMgpStructPtr ;
     BindElement *BSIM4GMgmStructPtr ;
     BindElement *BSIM4GMgeStructPtr ;
     BindElement *BSIM4GMspStructPtr ;
     BindElement *BSIM4GMbpStructPtr ;
-
-    BindElement *BSIM4GEdpStructPtr ;
-    BindElement *BSIM4GEgpStructPtr ;
+    BindElement *BSIM4DPgmStructPtr ;
+    BindElement *BSIM4GPgmStructPtr ;
     BindElement *BSIM4GEgmStructPtr ;
-    BindElement *BSIM4GEgeStructPtr ;
-    BindElement *BSIM4GEspStructPtr ;
-    BindElement *BSIM4GEbpStructPtr ;
-
-    BindElement *BSIM4SPdpStructPtr ;
-    BindElement *BSIM4SPgpStructPtr ;
     BindElement *BSIM4SPgmStructPtr ;
-    BindElement *BSIM4SPsStructPtr ;
-    BindElement *BSIM4SPspStructPtr ;
-    BindElement *BSIM4SPbpStructPtr ;
-    BindElement *BSIM4SPsbStructPtr ;
-
-    BindElement *BSIM4SspStructPtr ;
-    BindElement *BSIM4SsStructPtr ;
-
-    BindElement *BSIM4BPdpStructPtr ;
-    BindElement *BSIM4BPgpStructPtr ;
     BindElement *BSIM4BPgmStructPtr ;
-    BindElement *BSIM4BPspStructPtr ;
-    BindElement *BSIM4BPdbStructPtr ;
-    BindElement *BSIM4BPbStructPtr ;
-    BindElement *BSIM4BPsbStructPtr ;
-    BindElement *BSIM4BPbpStructPtr ;
-
+    BindElement *BSIM4DPdbStructPtr ;
+    BindElement *BSIM4SPsbStructPtr ;
     BindElement *BSIM4DBdpStructPtr ;
     BindElement *BSIM4DBdbStructPtr ;
     BindElement *BSIM4DBbpStructPtr ;
     BindElement *BSIM4DBbStructPtr ;
-
+    BindElement *BSIM4BPdbStructPtr ;
+    BindElement *BSIM4BPbStructPtr ;
+    BindElement *BSIM4BPsbStructPtr ;
     BindElement *BSIM4SBspStructPtr ;
     BindElement *BSIM4SBbpStructPtr ;
     BindElement *BSIM4SBbStructPtr ;
     BindElement *BSIM4SBsbStructPtr ;
-
     BindElement *BSIM4BdbStructPtr ;
     BindElement *BSIM4BbpStructPtr ;
     BindElement *BSIM4BsbStructPtr ;
     BindElement *BSIM4BbStructPtr ;
-
     BindElement *BSIM4DgpStructPtr ;
     BindElement *BSIM4DspStructPtr ;
     BindElement *BSIM4DbpStructPtr ;
     BindElement *BSIM4SdpStructPtr ;
     BindElement *BSIM4SgpStructPtr ;
     BindElement *BSIM4SbpStructPtr ;
-
-    BindElement *BSIM4QdpStructPtr ;
-    BindElement *BSIM4QgpStructPtr ;
-    BindElement *BSIM4QspStructPtr ;
-    BindElement *BSIM4QbpStructPtr ;
-    BindElement *BSIM4QqStructPtr ;
-    BindElement *BSIM4DPqStructPtr ;
-    BindElement *BSIM4GPqStructPtr ;
-    BindElement *BSIM4SPqStructPtr ;
 #endif
 
 } BSIM4instance ;