correct the r/res model parameter type and set minimal resistor value to 1 mOhm

This commit is contained in:
dwarning 2013-06-10 21:40:13 +02:00
parent 0fd4339c4d
commit eba521476b
3 changed files with 8 additions and 7 deletions

View File

@ -54,8 +54,8 @@ IFparm RESmPTable[] = { /* model parameters */
IOPQ( "kf", RES_MOD_KF, IF_REAL,"Flicker noise coefficient"),
IOPQ( "af", RES_MOD_AF, IF_REAL,"Flicker noise exponent"),
IOPXU( "tnom", RES_MOD_TNOM, IF_REAL,"Parameter measurement temperature"),
IOP( "r", RES_MOD_R, IF_FLAG,"Resistor model default value"),
IOPR( "res", RES_MOD_R, IF_FLAG,"Resistor model default value")
IOP( "r", RES_MOD_R, IF_REAL,"Resistor model default value"),
IOPR( "res", RES_MOD_R, IF_REAL,"Resistor model default value")
};
char *RESnames[] = {

View File

@ -58,10 +58,11 @@ RESmParam(int param, IFvalue *value, GENmodel *inModel)
model->RESfNexp = value->rValue;
model->RESfNexpGiven = TRUE;
break;
case RES_MOD_R:
model->RESres = value->rValue;
model->RESresGiven = TRUE;
if ( value->rValue > 1e-03 ) {
model->RESres = value->rValue;
model->RESresGiven = TRUE;
}
break;
default:
return(E_BADPARM);

View File

@ -70,8 +70,8 @@ REStemp(GENmodel *inModel, CKTcircuit *ckt)
here->RESresist = model->RESres;
} else {
SPfrontEnd->IFerror (ERR_WARNING,
"%s: resistance = 0 ohm, set to 1000 ohm",&(here->RESname));
here->RESresist=1000;
"%s: resistance to low, set to 1 mOhm",&(here->RESname));
here->RESresist=1e-03;
}
}
}