code merge for bsim3 version 0 and 1

ChangeLog

@@ -1,3 +1,9 @@
+2011-04-12  Dietmar Warning
+ * devices: merged bsim3v1a code with bsim3v0
+ * devices: merged bsim3v1s code with bsim3v1
+ * update this situation to DEVICES, configure.ac, src/Makefile.am, 
+   spicelib/parser/inpdomod.c, inp2m.c, devices/dev.c
+
 2011-04-09  Robert Larice
  * src/frontend/plotting/x11.c :
     bugfix, segfault when closing a plot window

DEVICES

@@ -47,13 +47,12 @@ Table of contents
  11.5 MOS9 - Level 9 MOS model
  11.6 BSIM1 - BSIM model level 1
  11.7 BSIM2 - BSIM model level 2
- 11.8 BSIM3v0 - BSIM model level 3
- 11.9 BSIM3v1 - BSIM model level 3
- 11.10 BSIM3v1 - BSIM model level 3
- 11.11 BSIM3v1 - BSIM model level 3
- 11.12 BSIM3 - BSIM model level 3
- 11.13 BSIM4 - BSIM model level 4
- 11.14 HiSIM - Hiroshima-university STARC IGFET Model
+ 11.8 BSIM3 - BSIM model level 3 vers. 0
+ 11.9 BSIM3 - BSIM model level 3 vers. 1
+ 11.10 BSIM3 - BSIM model level 3 vers. 2
+ 11.11 BSIM3 - BSIM model level 3 vers. 3
+ 11.12 BSIM4 - BSIM model level 4
+ 11.13 HiSIM - Hiroshima-University STARC IGFET Model
 12. SOI devices
  12.1 BSIM3SOI_FD - SOI model (fully depleted devices)
  12.2 BSIM3SOI_DD - SOI Model (dynamic depletion model)
@@ -609,32 +608,13 @@ will be updated every time the device specific code is altered or changed to ref
       Dir:    devices/bsim3v0
       Status: TO BE TESTED AND IMPROVED
 
+
  11.9 BSIM3v1 - BSIM model level 3
 
       Ver:    3.1
       Class:  M
       Level:  8 & 49, version = 3.1
       Dir:    devices/bsim3v1
-      Status: TO BE TESTED
-
-
- 11.10 BSIM3v1 - BSIM model level 3
-
-      Ver:    3.1
-      Class:  M
-      Level:  8 & 49, version = 3.1a
-      Dir:    devices/bsim3v1a
-      Status: TO BE TESTED AND IMPROVED
-
-      This is the BSIM3v3.1 model modified by Alan Gillespie.
-
-
- 11.11 BSIM3v1 - BSIM model level 3
-       
-       Ver:    3.1
-       Class:  M
-       Level:  8 & 49, version = 3.1s
-       Dir:    devices/bsim3v1s
       Status: TO BE TESTED AND IMPROVED
 
        This is the BSIM3v3.1 model modified by Serban Popescu.
@@ -642,7 +622,7 @@ will be updated every time the device specific code is altered or changed to ref
        "HDIF" and "M" parameters.
 
 
- 11.12 BSIM3 - BSIM model level 3
+ 11.10 BSIM3 - BSIM model level 3
 
        Ver:    3.2.4
        Class:  M
@@ -663,7 +643,7 @@ will be updated every time the device specific code is altered or changed to ref
         - NodesetFix
 
 		
- 11.12 BSIM3 - BSIM model level 3
+ 11.11 BSIM3 - BSIM model level 3
 
        Ver:    3.3.0
        Class:  M
@@ -685,7 +665,7 @@ will be updated every time the device specific code is altered or changed to ref
         - Support for Multi-core processors using OpenMP
 
 
- 11.13 BSIM4 - BSIM model level 4
+ 11.12 BSIM4 - BSIM model level 4
  
        Ver:    4.2.0 - 4.6.5
        Class:  M
@@ -704,7 +684,7 @@ will be updated every time the device specific code is altered or changed to ref
         - Support for Multi-core processors using OpenMP
 		
 
- 11.14 HiSIM - Hiroshima-university STARC IGFET Model
+ 11.13 HiSIM - Hiroshima-university STARC IGFET Model
       
        Ver:    1.2.0
        Class:  M

configure.ac

@@ -1013,8 +1013,6 @@ AC_CONFIG_FILES([Makefile
                  src/spicelib/devices/bsim3/Makefile
                  src/spicelib/devices/bsim3v0/Makefile
                  src/spicelib/devices/bsim3v1/Makefile
-                 src/spicelib/devices/bsim3v1a/Makefile
-                 src/spicelib/devices/bsim3v1s/Makefile
                  src/spicelib/devices/bsim3v32/Makefile
                  src/spicelib/devices/bsim4/Makefile
                  src/spicelib/devices/bsim4v2/Makefile

src/Makefile.am

@@ -46,8 +46,6 @@ DYNAMIC_DEVICELIBS =					\
 	spicelib/devices/bsim3/libbsim3.la		\
 	spicelib/devices/bsim3v0/libbsim3v0.la		\
 	spicelib/devices/bsim3v1/libbsim3v1.la		\
-	spicelib/devices/bsim3v1s/libbsim3v1s.la	\
-	spicelib/devices/bsim3v1a/libbsim3v1a.la	\
 	spicelib/devices/bsim3v32/libbsim3v32.la	\
 	spicelib/devices/bsim4/libbsim4.la		\
 	spicelib/devices/bsim4v2/libbsim4v2.la		\

src/spicelib/devices/bsim3v0/b3v0.c

@@ -1,7 +1,7 @@
 /**********
 Copyright 1990 Regents of the University of California.  All rights reserved.
 Author: 1995 Min-Chie Jeng and Mansun Chan.
-File: b3v0.c
+File: b3.c
 **********/
 
 #include "ngspice.h"
@@ -31,6 +31,10 @@ OP( "id",           BSIM3v0_CD,         IF_REAL,    "Ids"),
 OP( "vbs",          BSIM3v0_VBS,        IF_REAL,    "Vbs"),
 OP( "vgs",          BSIM3v0_VGS,        IF_REAL,    "Vgs"),
 OP( "vds",          BSIM3v0_VDS,        IF_REAL,    "Vds"),
+OP( "gbd",          BSIM3v0_GBD,        IF_REAL,    "Gbd"),
+OP( "gbs",          BSIM3v0_GBS,        IF_REAL,    "Gbs"),
+OP( "ibd",          BSIM3v0_CBD,        IF_REAL,    "Ibd"),
+OP( "ibs",          BSIM3v0_CBS,        IF_REAL,    "Ibs"),
 };
 
 IFparm BSIM3v0mPTable[] = { /* model parameters */

src/spicelib/devices/bsim3v0/b3v0ld.c

@@ -1,7 +1,7 @@
 /**********
 Copyright 1990 Regents of the University of California.  All rights reserved.
 Author: 1991 JianHui Huang and Min-Chie Jeng.
-File: b3v0ld.c          1/3/92
+File: b3ld.c          1/3/92
 Modified by Mansun Chan  (1995)
 **********/
 
@@ -117,7 +117,7 @@ double dQac0_dVg, dQac0_dVd, dQac0_dVb, dQsub0_dVg, dQsub0_dVd, dQsub0_dVb;
    
 struct bsim3v0SizeDependParam *pParam;
 int ByPass, Check, ChargeComputationNeeded = 0, error;
-double m = 0.0;
+double m = 1.0;
 
 for (; model != NULL; model = model->BSIM3v0nextModel)
 {    for (here = model->BSIM3v0instances; here != NULL; 

src/spicelib/devices/bsim3v0/b3v0pzld.c

@@ -1,7 +1,7 @@
 /**********
 Copyright 1990 Regents of the University of California.  All rights reserved.
 Author: 1995 Min-Chie Jeng and Mansun Chan.
-File: b3v0pzld.c
+File: b3pzld.c
 **********/
 
 #include "ngspice.h"
@@ -14,8 +14,8 @@ File: b3v0pzld.c
 int
 BSIM3v0pzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
 {
-register BSIM3v0model *model = (BSIM3v0model*)inModel;
-register BSIM3v0instance *here;
+BSIM3v0model *model = (BSIM3v0model*)inModel;
+BSIM3v0instance *here;
 double xcggb, xcgdb, xcgsb, xcbgb, xcbdb, xcbsb, xcddb, xcssb, xcdgb;
 double gdpr, gspr, gds, gbd, gbs, capbd, capbs, xcsgb, xcdsb, xcsdb;
 double cggb, cgdb, cgsb, cbgb, cbdb, cbsb, cddb, cdgb, cdsb;

src/spicelib/devices/bsim3v0/b3v0temp.c

@@ -1,7 +1,7 @@
 /***********
 Copyright 1990 Regents of the University of California.  All rights reserved.
 Author: 1995 Min-Chie Jeng and Mansun Chan.
-File: b3v0temp.c
+File: b3temp.c
 **********/
 /* Lmin, Lmax, Wmin, Wmax */
 
@@ -28,8 +28,8 @@ File: b3v0temp.c
 int
 BSIM3v0temp(GENmodel *inModel, CKTcircuit *ckt)
 {
-register BSIM3v0model *model = (BSIM3v0model*) inModel;
-register BSIM3v0instance *here;
+BSIM3v0model *model = (BSIM3v0model*) inModel;
+BSIM3v0instance *here;
 struct bsim3v0SizeDependParam *pSizeDependParamKnot, *pLastKnot, *pParam = NULL;
 double tmp1, tmp2, Eg, ni, T0, T1, T2, T3, Ldrn, Wdrn;
 double Temp, TRatio, Inv_L, Inv_W, Inv_LW, Vtm0, Tnom;

src/spicelib/devices/bsim3v1/b3v1.c

@@ -1,13 +1,13 @@
 /**********
  * Copyright 1990 Regents of the University of California. All rights reserved.
- * File: b3v1.c
+ * File: b3.c
  * Author: 1995 Min-Chie Jeng and Mansun Chan. 
  * Modified by Paolo Nenzi 2002
  **********/
  
 /* 
  * Release Notes: 
- * BSIM3v3.1,   Released by yuhua  96/12/08
+ * BSIM3v1v3.1,   Released by yuhua  96/12/08
  */
 
 
@@ -427,6 +427,8 @@ IOP( "kf", BSIM3v1_MOD_KF, IF_REAL, "Flicker noise coefficient"),
 
 IP( "nmos", BSIM3v1_MOD_NMOS,  IF_FLAG, "Flag to indicate NMOS"),
 IP( "pmos", BSIM3v1_MOD_PMOS,  IF_FLAG, "Flag to indicate PMOS"),
+/* serban */
+IOP( "hdif", BSIM3v1_MOD_HDIF,  IF_REAL, "S/D junction extension (HSPICE style)"),
 };
 
 char *BSIM3v1names[] = {

src/spicelib/devices/bsim3v1/b3v1ask.c

@@ -1,13 +1,13 @@
 /**********
  * Copyright 1990 Regents of the University of California. All rights reserved.
- * File: b3v1ask.c
+ * File: b3ask.c
  * Author: 1995 Min-Chie Jeng and Mansun Chan. 
  * Modified by Paolo Nenzi 2002
  **********/
 
 /* 
  * Release Notes: 
- * BSIM3v3.1,   Released by yuhua  96/12/08
+ * BSIM3v1v3.1,   Released by yuhua  96/12/08
  */
 
 #include "ngspice.h"

src/spicelib/devices/bsim3v1/b3v1ld.c

@@ -1,6 +1,6 @@
 /**********
  * Copyright 1990 Regents of the University of California. All rights reserved.
- * File: b3v1ld.c
+ * File: b3ld.c
  * Author: 1995 Min-Chie Jeng and Mansun Chan. 
  * Modified by Mansun Chan  (1995)
  * Modified by Paolo Nenzi 2002
@@ -8,7 +8,7 @@
  
 /* 
  * Release Notes: 
- * BSIM3v3.1,   Released by yuhua  96/12/08
+ * BSIM3v1v3.1,   Released by yuhua  96/12/08
  */
 
 #include "ngspice.h"
@@ -120,7 +120,7 @@ double Csg, Csd, Csb, Cbg, Cbd, Cbb;
 double Cgg1, Cgb1, Cgd1, Cbg1, Cbb1, Cbd1, Qac0, Qsub0;
 double dQac0_dVg, dQac0_dVd, dQac0_dVb, dQsub0_dVg, dQsub0_dVd, dQsub0_dVb;
 
-double m = 0.0;
+double m = 1.0;
    
 struct bsim3v1SizeDependParam *pParam;
 int ByPass, Check, ChargeComputationNeeded = 0, error;
@@ -133,7 +133,6 @@ for (; model != NULL; model = model->BSIM3v1nextModel)
          if (here->BSIM3v1owner != ARCHme)
 	         continue;
 
-          
 	  Check = 1;
           ByPass = 0;
 	  pParam = here->pParam;
@@ -2018,8 +2017,25 @@ finished: /* returning Values to Calling Routine */
            */
           if ((here->BSIM3v1off == 0) || (!(ckt->CKTmode & MODEINITFIX)))
 	  {   if (Check == 1)
-	      {   
-	         ckt->CKTnoncon++;
+	      {   ckt->CKTnoncon++;
+#ifndef NEWCONV
+              } 
+	      else
+	      {   tol = ckt->CKTreltol * MAX(FABS(cdhat), FABS(here->BSIM3v1cd))
+		      + ckt->CKTabstol;
+                  if (FABS(cdhat - here->BSIM3v1cd) >= tol)
+		  {   ckt->CKTnoncon++;
+                  }
+		  else
+		  {   tol = ckt->CKTreltol * MAX(FABS(cbhat), 
+			    FABS(here->BSIM3v1cbs + here->BSIM3v1cbd)) 
+			    + ckt->CKTabstol;
+                      if (FABS(cbhat - (here->BSIM3v1cbs + here->BSIM3v1cbd)) 
+			  > tol)
+		      {   ckt->CKTnoncon++;
+                      }
+                  }
+#endif /* NEWCONV */
               }
           }
           *(ckt->CKTstate0 + here->BSIM3v1vbs) = vbs;
@@ -2390,15 +2406,12 @@ line900:
                                - gcbgb - gcbdb - gcbsb) - here->BSIM3v1gbbs));
            (*(here->BSIM3v1DPdpPtr) += m * ((here->BSIM3v1drainConductance
                                  + here->BSIM3v1gds + here->BSIM3v1gbd
-                                 + RevSum + gcddb) + dxpart * here->BSIM3v1gtd +
-				 gbdpdp));
+                                 + RevSum + gcddb) + dxpart * here->BSIM3v1gtd + gbdpdp));
            (*(here->BSIM3v1SPspPtr) += m * ((here->BSIM3v1sourceConductance
                                  + here->BSIM3v1gds + here->BSIM3v1gbs
-                                 + FwdSum + gcssb) + sxpart * here->BSIM3v1gts +
-				 gbspsp));
+                                 + FwdSum + gcssb) + sxpart * here->BSIM3v1gts + gbspsp));
            (*(here->BSIM3v1DdpPtr) -= m * here->BSIM3v1drainConductance);
-           (*(here->BSIM3v1GbPtr) -= m * (gcggb + gcgdb + gcgsb +
-	                                  here->BSIM3v1gtb));
+           (*(here->BSIM3v1GbPtr) -= m * (gcggb + gcgdb + gcgsb + here->BSIM3v1gtb));
            (*(here->BSIM3v1GdpPtr) += m * (gcgdb - here->BSIM3v1gtd));
            (*(here->BSIM3v1GspPtr) += m * (gcgsb - here->BSIM3v1gts));
            (*(here->BSIM3v1SspPtr) -= m * here->BSIM3v1sourceConductance);
@@ -2418,8 +2431,7 @@ line900:
            (*(here->BSIM3v1SPbPtr) -= m * ((here->BSIM3v1gbs + Gmbs + gcsgb + gcsdb
                                             + gcssb - sxpart * here->BSIM3v1gtb) - gbspb));
            (*(here->BSIM3v1SPdpPtr) -= m * ((here->BSIM3v1gds + RevSum - gcsdb
-                                             - sxpart * here->BSIM3v1gtd - here->BSIM3v1gbd)
-				             - gbspdp));
+                                             - sxpart * here->BSIM3v1gtd - here->BSIM3v1gbd) - gbspdp));
  
            *(here->BSIM3v1QqPtr) += m * ((gqdef + here->BSIM3v1gtau));
  

src/spicelib/devices/bsim3v1/b3v1mpar.c

@@ -1,13 +1,13 @@
 /**********
  * Copyright 1990 Regents of the University of California. All rights reserved.
- * File: b3v1mpar.c
+ * File: b3mpar.c
  * Author: 1995 Min-Chie Jeng and Mansun Chan. 
  * Modified by Paolo Nenzi 2002
  **********/
  
 /* 
  * Release Notes: 
- * BSIM3v3.1,   Released by yuhua  96/12/08
+ * BSIM3v1v3.1,   Released by yuhua  96/12/08
  */
 
 #include "ngspice.h"
@@ -1519,6 +1519,11 @@ BSIM3v1mParam(int param, IFvalue *value, GENmodel *inMod)
                 mod->BSIM3v1typeGiven = TRUE;
             }
             break;
+/* serban */
+        case  BSIM3v1_MOD_HDIF  :
+            mod->BSIM3v1hdif = value->rValue;
+            mod->BSIM3v1hdifGiven = TRUE;
+            break;
         default:
             return(E_BADPARM);
     }

src/spicelib/devices/bsim3v1/b3v1noi.c

@@ -1,13 +1,13 @@
 /**********
  * Copyright 1990 Regents of the University of California. All rights reserved.
- * File: b3v1noi.c
+ * File: b3noi.c
  * Author: 1995 Min-Chie Jeng and Mansun Chan. 
  * Modified by Paolo Nenzi 2002
  **********/
  
 /* 
  * Release Notes: 
- * BSIM3v3.1,   Released by yuhua  96/12/08
+ * BSIM3v1v3.1,   Released by yuhua  96/12/08
  */
 
 #include "ngspice.h"
@@ -46,7 +46,7 @@
 
 
 static double
-StrongInversionNoiseEval_b3v1(double vgs, double vds, BSIM3v1model *model, 
+StrongInversionNoiseEval_b3(double vgs, double vds, BSIM3v1model *model, 
                          BSIM3v1instance *here, double freq, double temp)
 {
 struct bsim3v1SizeDependParam *pParam;
@@ -143,7 +143,9 @@ int i;
 				  {    (void) sprintf(name, "onoise.%s%s",
 					              here->BSIM3v1name,
 						      BSIM3v1nNames[i]);
-                                       data->namelist = TREALLOC(IFuid, data->namelist, data->numPlots + 1);
+						      data->namelist = TREALLOC(
+						      IFuid, data->namelist, 
+						      data->numPlots + 1);
 						      if (!data->namelist)
 							      return(E_NOMEM);
 		                       (*(SPfrontEnd->IFnewUid)) (ckt,
@@ -158,7 +160,9 @@ int i;
 				  {    (void) sprintf(name, "onoise_total.%s%s",
 						      here->BSIM3v1name,
 						      BSIM3v1nNames[i]);
-                                       data->namelist = TREALLOC(IFuid, data->namelist, data->numPlots + 1);
+						      data->namelist = TREALLOC(
+						      IFuid, data->namelist, 
+						      data->numPlots + 1);
 						      if (!data->namelist)
 							      return(E_NOMEM);
 		                       (*(SPfrontEnd->IFnewUid)) (ckt,
@@ -170,7 +174,9 @@ int i;
 			               (void) sprintf(name, "inoise_total.%s%s",
 						      here->BSIM3v1name,
 						      BSIM3v1nNames[i]);
-                                       data->namelist = TREALLOC(IFuid, data->namelist, data->numPlots + 1);
+						      data->namelist = TREALLOC(
+						      IFuid, data->namelist, 
+						      data->numPlots + 1);
 						      if (!data->namelist)
 							      return(E_NOMEM);
 		                       (*(SPfrontEnd->IFnewUid)) (ckt,
@@ -244,7 +250,7 @@ int i;
 				          vgs = vgs + vds;
 			              }
                                       if (vgs >= here->BSIM3v1von + 0.1)
-			              {   Ssi = StrongInversionNoiseEval_b3v1(vgs,
+			              {   Ssi = StrongInversionNoiseEval_b3(vgs,
 					      vds, model, here, data->freq,
 					      ckt->CKTtemp);
                                           noizDens[BSIM3v1FLNOIZ] *= Ssi;
@@ -259,7 +265,7 @@ int i;
 				              * 4.0e36;
 		                          Swi = T10 / T11 * here->BSIM3v1cd * here->BSIM3v1m
 				              * here->BSIM3v1cd * here->BSIM3v1m;
-                                          Slimit = StrongInversionNoiseEval_b3v1(
+                                          Slimit = StrongInversionNoiseEval_b3(
 				               here->BSIM3v1von + 0.1, vds, model,
 					       here, data->freq, ckt->CKTtemp);
 				          T1 = Swi + Slimit;

src/spicelib/devices/bsim3v1/b3v1par.c

@@ -1,13 +1,13 @@
 /**********
  * Copyright 1990 Regents of the University of California. All rights reserved.
- * File: b3v1par.c
+ * File: b3par.c
  * Author: 1995 Min-Chie Jeng and Mansun Chan. 
  * Modified by Paolo Nenzi 2002
  **********/
  
 /* 
  * Release Notes: 
- * BSIM3v3.1,   Released by yuhua  96/12/08
+ * BSIM3v1v3.1,   Released by yuhua  96/12/08
  */
 
 #include "ngspice.h"

src/spicelib/devices/bsim3v1/b3v1set.c

@@ -1,13 +1,13 @@
 /**********
  * Copyright 1990 Regents of the University of California. All rights reserved.
- * File: b3v1set.c
+ * File: b3set.c
  * Author: 1995 Min-Chie Jeng and Mansun Chan.
  * Modified by Paolo Nenzi 2002
  **********/
 
 /*
  * Release Notes:
- * BSIM3v3.1,   Released by yuhua  96/12/08
+ * BSIM3v1v3.1,   Released by yuhua  96/12/08
  */
 
 #include "ngspice.h"
@@ -786,12 +786,31 @@ IFuid tmpName;
             }
 
             /* perform the parameter defaulting */
+            if(here->BSIM3v1m == 0.0)
+              here->BSIM3v1m = 1.0;
+
+            if (!here->BSIM3v1wGiven)
+              here->BSIM3v1w = 5e-6;
+
             if (!here->BSIM3v1drainAreaGiven)
+            {
+                if(model->BSIM3v1hdifGiven)
+                    here->BSIM3v1drainArea = here->BSIM3v1w * 2 * model->BSIM3v1hdif;
+                else
                     here->BSIM3v1drainArea = 0.0;
+            }
             if (!here->BSIM3v1drainPerimeterGiven)
+            {
+                if(model->BSIM3v1hdifGiven)
+                    here->BSIM3v1drainPerimeter =
+                        2 * here->BSIM3v1w + 4 * model->BSIM3v1hdif;
+                else
                     here->BSIM3v1drainPerimeter = 0.0;
+            }
+
             if (!here->BSIM3v1drainSquaresGiven)
                 here->BSIM3v1drainSquares = 1.0;
+
             if (!here->BSIM3v1icVBSGiven)
                 here->BSIM3v1icVBS = 0;
             if (!here->BSIM3v1icVDSGiven)
@@ -801,11 +820,25 @@ IFuid tmpName;
             if (!here->BSIM3v1lGiven)
                 here->BSIM3v1l = 5e-6;
             if (!here->BSIM3v1sourceAreaGiven)
-                here->BSIM3v1sourceArea = 0;
+            {
+                if(model->BSIM3v1hdifGiven)
+                    here->BSIM3v1sourceArea = here->BSIM3v1w * 2 * model->BSIM3v1hdif;
+                else
+                    here->BSIM3v1sourceArea = 0.0;
+            }
+
             if (!here->BSIM3v1sourcePerimeterGiven)
-                here->BSIM3v1sourcePerimeter = 0;
+            {
+                if(model->BSIM3v1hdifGiven)
+                    here->BSIM3v1sourcePerimeter =
+                        2 * here->BSIM3v1w + 4 * model->BSIM3v1hdif;
+                else
+                    here->BSIM3v1sourcePerimeter = 0.0;
+            }
+
             if (!here->BSIM3v1sourceSquaresGiven)
                 here->BSIM3v1sourceSquares = 1;
+
             if (!here->BSIM3v1wGiven)
                 here->BSIM3v1w = 5e-6;
 

src/spicelib/devices/bsim3v1/bsim3v1def.h

@@ -404,6 +404,8 @@ typedef struct sBSIM3v1model
     double BSIM3v1b1;
     double BSIM3v1alpha0;
     double BSIM3v1beta0;
+/* serban */
+    double BSIM3v1hdif;
 
     /* CV model */
     double BSIM3v1elm;
@@ -805,6 +807,7 @@ typedef struct sBSIM3v1model
     unsigned  BSIM3v1b1Given   :1;
     unsigned  BSIM3v1alpha0Given   :1;
     unsigned  BSIM3v1beta0Given   :1;
+    unsigned  BSIM3v1hdifGiven   :1;
 
     /* CV model */
     unsigned  BSIM3v1elmGiven  :1;     
@@ -1236,6 +1239,8 @@ typedef struct sBSIM3v1model
 #define BSIM3v1_MOD_VERSION         193
 #define BSIM3v1_MOD_VFBCV           194
 
+#define BSIM3v1_MOD_HDIF            198
+
 /* Length dependence */
 #define BSIM3v1_MOD_LCDSC            201
 #define BSIM3v1_MOD_LCDSCB           202

src/spicelib/devices/bsim3v1/bsim3v1init.c

@@ -6,7 +6,7 @@
 #include "bsim3v1ext.h"
 #include "bsim3v1init.h"
 
-SPICEdev B3v1info = {
+SPICEdev BSIM3v1info = {
     {   "BSIM3v1",
         "Berkeley Short Channel IGFET Model Version-3 (3.1)",
 
@@ -78,5 +78,5 @@ SPICEdev B3v1info = {
 SPICEdev *
 get_bsim3v1_info(void)
 {
-     return &B3v1info; 
+     return &BSIM3v1info; 
 }

src/spicelib/devices/dev.c

@@ -81,8 +81,6 @@ int add_udn(int,Evt_Udn_Info_t **);
 #include "bsim3/bsim3itf.h"
 #include "bsim3v0/bsim3v0itf.h"
 #include "bsim3v1/bsim3v1itf.h"
-#include "bsim3v1a/bsim3v1aitf.h"
-#include "bsim3v1s/bsim3v1sitf.h"
 #include "bsim3v32/bsim3v32itf.h"
 #include "bsim4/bsim4itf.h"
 #include "bsim4v2/bsim4v2itf.h"
@@ -192,8 +190,6 @@ spice_init_devices(void)
     DEVices[ 6] = get_bsim3_info();
     DEVices[ 7] = get_bsim3v0_info();
     DEVices[ 8] = get_bsim3v1_info();
-    DEVices[ 9] = get_bsim3v1a_info();
-    DEVices[10] = get_bsim3v1s_info();
     DEVices[11] = get_bsim3v32_info();
     DEVices[12] = get_b4soi_info();
     DEVices[13] = get_bsim4_info();

src/spicelib/parser/inp2m.c

@@ -222,8 +222,6 @@ INP2M (CKTcircuit *ckt, INPtables * tab, card * current)
 	  && thismodel->INPmodType != INPtypelook ("BSIM4v5")
 	  && thismodel->INPmodType != INPtypelook ("BSIM3v0")
 	  && thismodel->INPmodType != INPtypelook ("BSIM3v1")
-	  && thismodel->INPmodType != INPtypelook ("BSIM3v1S")
- 	  && thismodel->INPmodType != INPtypelook ("BSIM3v1A")
 	  && thismodel->INPmodType != INPtypelook ("SOI3")
 #ifdef CIDER
           && thismodel->INPmodType != INPtypelook ("NUMOS")

src/spicelib/parser/inpdomod.c

@@ -285,12 +285,6 @@ char *INPdomodel(CKTcircuit *ckt, card * image, INPtables * tab)
 	    if ( strcmp(ver, "3.1") == 0 ) {
 	      type = INPtypelook("BSIM3v1");
 	    }
-	    if ( strcmp(ver, "3.1s") == 0 ) {
-	      type = INPtypelook("BSIM3v1S");
-	    }
-	    if ( strcmp(ver, "3.1a") == 0 ) {
-	      type = INPtypelook("BSIM3v1A");
-	    }
 	    if ( prefix("3.2", ver)) { /* version string ver has to start with 3.2 */
 	      type = INPtypelook("BSIM3v32");
 	    }