luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Instead of the reverted commit 

5542f2ec1 ("dio/diotemp.c, drop DIOgradingCoeff limit", 2017-07-18)
allow setting a new limit for the diode grading coefficient by
set DIOgradingCoeffMax=0.85
Default is 0.9
This commit is contained in:
Holger Vogt 2019-07-07 13:55:41 +02:00
parent db85dead58
commit 45e2155e57
1 changed files with 16 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/spicelib/devices/dio/diotemp.c
View File

@ -13,6 +13,7 @@ Modified by Paolo Nenzi 2003 and Dietmar Warning 2012
#include "ngspice/const.h"
#include "ngspice/sperror.h"
#include "ngspice/suffix.h"
#include "ngspice/cpdefs.h"
int
DIOtemp(GENmodel *inModel, CKTcircuit *ckt)
@ -32,18 +33,23 @@ DIOtemp(GENmodel *inModel, CKTcircuit *ckt)
double factor;
double tBreakdownVoltage;
double gclimit;
if (!cp_getvar("DIOgradingCoeffMax", CP_REAL, &gclimit, 0))
gclimit = 0.9;
/* loop through all the diode models */
for( ; model != NULL; model = DIOnextModel(model)) {
if(!model->DIOnomTempGiven) {
model->DIOnomTemp = ckt->CKTnomTemp;
}
vtnom = CONSTKoverQ * model->DIOnomTemp;
/* limit grading coeff to max of .9 */
if(model->DIOgradingCoeff>.9) {
/* limit grading coeff to max of .9, set new limit with variable DIOgradingCoeffMax */
if(model->DIOgradingCoeff>gclimit) {
SPfrontEnd->IFerrorf (ERR_WARNING,
"%s: grading coefficient too large, limited to 0.9",
model->DIOmodName);
model->DIOgradingCoeff=.9;
"%s: grading coefficient too large, limited to %g",
model->DIOmodName, gclimit);
model->DIOgradingCoeff=gclimit;
}
/* limit activation energy to min of .1 */
if(model->DIOactivationEnergy<.1) {
@ -95,13 +101,13 @@ DIOtemp(GENmodel *inModel, CKTcircuit *ckt)
here->DIOtGradingCoeff = model->DIOgradingCoeff * factor;
/* limit temperature adjusted grading coeff
* to max of .9
* to max of .9, or set new limit with variable DIOgradingCoeffMax
*/
if(here->DIOtGradingCoeff>.9) {
if(here->DIOtGradingCoeff>gclimit) {
SPfrontEnd->IFerrorf (ERR_WARNING,
"%s: temperature adjusted grading coefficient too large, limited to 0.9",
here->DIOname);
here->DIOtGradingCoeff=.9;
"%s: temperature adjusted grading coefficient too large, limited to %g",
here->DIOname, gclimit);
here->DIOtGradingCoeff=gclimit;
}
vt = CONSTKoverQ * here->DIOtemp;