Whitespaces and cosmetic changes to improve readability

src/spicelib/analysis/cktterr.c

@@ -12,15 +12,11 @@ Author: 1985 Thomas L. Quarles
 void
 CKTterr (int qcap, CKTcircuit *ckt, double *timeStep)
 { 
-    double volttol;
+    double volttol, chargetol, tol, del ;
-    double chargetol;
-    double tol;
-    double del;
     double diff [8] ;
     double deltmp [8] ;
     double factor = 0 ;
-    int i;
+    int i, j ;
-    int j;
     static double gearCoeff [] = {
         .5,
         .2222222222,
@@ -34,30 +30,40 @@ CKTterr(int qcap, CKTcircuit *ckt, double *timeStep)
         .08333333333
     } ;
 
-    volttol = ckt->CKTabstol + ckt->CKTreltol * 
+    volttol = ckt->CKTabstol + ckt->CKTreltol * MAX (fabs (ckt->CKTstate0 [ccap]), fabs (ckt->CKTstate1 [ccap])) ;
-            MAX( fabs(ckt->CKTstate0[ccap]), fabs(ckt->CKTstate1[ccap]));
 
     chargetol = MAX (fabs (ckt->CKTstate0 [qcap]), fabs (ckt->CKTstate1 [qcap])) ;
     chargetol = ckt->CKTreltol * MAX (chargetol, ckt->CKTchgtol) / ckt->CKTdelta ;
+
     tol = MAX (volttol, chargetol) ;
+
     /* now divided differences */
-    for(i=ckt->CKTorder+1;i>=0;i--) {
+    for (i = ckt->CKTorder + 1 ; i >= 0 ; i--)
+    {
         diff [i] = ckt->CKTstates[i] [qcap] ;
     }
-    for(i=0 ; i <= ckt->CKTorder ; i++) {
+    for (i = 0 ; i <= ckt->CKTorder ; i++)
+    {
         deltmp [i] = ckt->CKTdeltaOld [i] ;
     }
     j = ckt->CKTorder ;
-    for (;;) {
+    for (;;)
-        for(i=0;i <= j;i++) {
+    {
+        for (i = 0 ; i <= j ; i++)
+        {
             diff [i] = (diff [i] - diff [i + 1]) / deltmp [i] ;
         }
-        if (--j < 0) break;
+
-        for(i=0;i <= j;i++) {
+        if (--j < 0)
+            break ;
+
+        for (i = 0 ; i <= j ; i++)
+        {
             deltmp [i] = deltmp [i + 1] + ckt->CKTdeltaOld [i] ;
         }
     }
-    switch(ckt->CKTintegrateMethod) {
+    switch (ckt->CKTintegrateMethod)
+    {
         case GEAR:
             factor = gearCoeff [ckt->CKTorder - 1] ;
             break ;
@@ -67,11 +73,14 @@ CKTterr(int qcap, CKTcircuit *ckt, double *timeStep)
             break ;
     }
     del = ckt->CKTtrtol * tol / MAX (ckt->CKTabstol, factor * fabs (diff [0])) ;
-    if(ckt->CKTorder == 2) {
+    if (ckt->CKTorder == 2)
+    {
         del = sqrt (del) ;
     } else if (ckt->CKTorder > 2) {
         del = exp (log (del) / ckt->CKTorder) ;
     }
+
     *timeStep = MIN (*timeStep, del) ;
+
     return ;
 }

src/spicelib/analysis/ckttrunc.c

@@ -22,32 +22,40 @@ CKTtrunc(CKTcircuit *ckt, double *timeStep)
 #ifndef NEWTRUNC
     int i ;
     double timetemp ;
+
 #ifdef STEPDEBUG
     double debugtemp ;
 #endif /* STEPDEBUG */
+
     double startTime ;
     int error = OK ;
 
     startTime = SPfrontEnd->IFseconds () ;
 
     timetemp = HUGE ;
-    for (i=0;i<DEVmaxnum;i++) {
+    for (i = 0 ; i < DEVmaxnum ; i++)
-        if (DEVices[i] && DEVices[i]->DEVtrunc && ckt->CKThead[i]) {
+    {
+        if (DEVices[i] && DEVices[i]->DEVtrunc && ckt->CKThead[i])
+        {
+
 #ifdef STEPDEBUG
             debugtemp = timetemp ;
 #endif /* STEPDEBUG */
+
 	    error = DEVices[i]->DEVtrunc (ckt->CKThead[i], ckt, &timetemp) ;
-	    if(error) {
+	    if (error)
-                ckt->CKTstat->STATtranTruncTime += SPfrontEnd->IFseconds()
+            {
-                    - startTime;
+                ckt->CKTstat->STATtranTruncTime += SPfrontEnd->IFseconds () - startTime ;
                 return (error) ;
             }
+
 #ifdef STEPDEBUG
-            if(debugtemp != timetemp) {
+            if (debugtemp != timetemp)
-                printf("timestep cut by device type %s from %g to %g\n",
+            {
-                        DEVices[i]->DEVpublic.name, debugtemp, timetemp);
+                printf ("timestep cut by device type %s from %g to %g\n", DEVices[i]->DEVpublic.name, debugtemp, timetemp) ;
             }
 #endif /* STEPDEBUG */
+
         }
     }
     *timeStep = MIN (2 * *timeStep, timetemp) ;

src/spicelib/devices/bsim4/b4trunc.c

@@ -18,10 +18,7 @@
 
 
 int
-BSIM4trunc(
+BSIM4trunc (GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
-GENmodel *inModel,
-CKTcircuit *ckt,
-double *timeStep)
 {
     BSIM4model *model = (BSIM4model*)inModel ;
     BSIM4instance *here ;
@@ -31,30 +28,39 @@ BSIM4instance *here;
 #endif /* STEPDEBUG */
 
     for ( ; model != NULL ; model = model->BSIM4nextModel)
-    {    for (here = model->BSIM4instances; here != NULL;
-	      here = here->BSIM4nextInstance)
     {
+        for (here = model->BSIM4instances ; here != NULL ; here = here->BSIM4nextInstance)
+        {
+
 #ifdef STEPDEBUG
             debugtemp = *timeStep ;
 #endif /* STEPDEBUG */
+
             CKTterr (here->BSIM4qb, ckt, timeStep) ;
             CKTterr (here->BSIM4qg, ckt, timeStep) ;
             CKTterr (here->BSIM4qd, ckt, timeStep) ;
+
             if (here->BSIM4trnqsMod)
                 CKTterr (here->BSIM4qcdump, ckt, timeStep) ;
+
             if (here->BSIM4rbodyMod)
-            {   CKTterr(here->BSIM4qbs,ckt,timeStep);
+            {
+                CKTterr (here->BSIM4qbs, ckt, timeStep) ;
                 CKTterr (here->BSIM4qbd, ckt, timeStep) ;
             }
+
             if (here->BSIM4rgateMod == 3)
                 CKTterr (here->BSIM4qgmid, ckt, timeStep) ;
+
 #ifdef STEPDEBUG
             if (debugtemp != *timeStep)
-	          {  printf("device %s reduces step from %g to %g\n",
+            {
-                       here->BSIM4name,debugtemp,*timeStep);
+                printf ("device %s reduces step from %g to %g\n", here->BSIM4name, debugtemp, *timeStep) ;
             }
 #endif /* STEPDEBUG */
+
         }
     }
+
     return (OK) ;
 }

src/spicelib/devices/cap/captrunc.c

@@ -19,12 +19,13 @@ CAPtrunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
     CAPmodel *model = (CAPmodel*)inModel ;
     CAPinstance *here ;
 
-    for( ; model!= NULL; model = model->CAPnextModel) {
+    for ( ; model != NULL ; model = model->CAPnextModel)
-        for(here = model->CAPinstances ; here != NULL ;
+    {
-                here = here->CAPnextInstance) {
+        for (here = model->CAPinstances ; here != NULL ; here = here->CAPnextInstance)
-
+        {
             CKTterr (here->CAPqcap, ckt, timeStep) ;
         }
     }
+
     return (OK) ;
 }

src/spicelib/devices/ind/indtrunc.c

@@ -17,12 +17,13 @@ INDtrunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
 {
     INDmodel *model = (INDmodel*)inModel ;
     INDinstance *here ;
-    for( ; model!= NULL; model = model->INDnextModel) {
+    for ( ; model!= NULL ; model = model->INDnextModel)
-        for(here = model->INDinstances ; here != NULL ;
+    {
-                here = here->INDnextInstance) {
+        for (here = model->INDinstances ; here != NULL ; here = here->INDnextInstance)
-
+        {
             CKTterr (here->INDflux, ckt, timeStep) ;
         }
     }
+
     return (OK) ;
 }