Move instance m-Factor into ressetup

This commit is contained in:
dwarning 2013-05-08 08:43:02 +02:00
parent 7108aae784
commit b4b345f345
2 changed files with 4 additions and 19 deletions

View File

@ -26,9 +26,6 @@ RESload(GENmodel *inModel, CKTcircuit *ckt)
for (here = model->RESinstances; here != NULL ;
here = here->RESnextInstance) {
if(!here->RESmGiven)
here->RESm = 1.0;
here->REScurrent = (*(ckt->CKTrhsOld+here->RESposNode) -
*(ckt->CKTrhsOld+here->RESnegNode)) * here->RESconduct;

View File

@ -28,22 +28,10 @@ RESsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit*ckt, int *state)
/* loop through all the instances of the model */
for (here = model->RESinstances; here != NULL ;
here=here->RESnextInstance) {
/*
* Paolo Nenzi 2003
* The following lines are needed if I will move the defaulting code
* from REStemp to RESsetup, as in other (more recent ?) spice devices
*
* ------------------------------------------LEGACY CODE - Francesco Lannutti - October 22, 2012
* if (here->RESowner != ARCHme)
* goto matrixpointers;
*
* matrixpointers:
* ------------------------------------------
*
* put here instance parameter defaulting.
*/
if(!here->RESmGiven)
here->RESm = 1.0;
/* macro to make elements with built in test for out of memory */
#define TSTALLOC(ptr,first,second) \
if((here->ptr = SMPmakeElt(matrix, here->first, here->second)) == NULL){\