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

devices/asrc/asrcacld.c, fix `tc1', `tc2' processing

This commit is contained in:
rlar 2015-05-24 20:27:33 +02:00
parent 89dc98f5aa
commit fd92b21e2c
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/spicelib/devices/asrc/asrcacld.c
View File

@ -63,13 +63,13 @@ ASRCacLoad(GENmodel *inModel, CKTcircuit *ckt)
*(here->ASRCposptr[j++]) += 1.0;
for (i = 0; i < here->ASRCtree->numVars; i++)
*(here->ASRCposptr[j++]) -= derivs[i] / factor;
*(here->ASRCposptr[j++]) -= derivs[i] * factor;
} else {
for (i = 0; i < here->ASRCtree->numVars; i++) {
*(here->ASRCposptr[j++]) += derivs[i] / factor;
*(here->ASRCposptr[j++]) -= derivs[i] / factor;
*(here->ASRCposptr[j++]) += derivs[i] * factor;
*(here->ASRCposptr[j++]) -= derivs[i] * factor;
}
}

6
src/spicelib/devices/asrc/asrcpzld.c
View File

@ -73,13 +73,13 @@ ASRCpzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
*(here->ASRCposptr[j++]) += 1.0;
for (i = 0; i < here->ASRCtree->numVars; i++)
*(here->ASRCposptr[j++]) -= asrc_derivs[i] / factor;
*(here->ASRCposptr[j++]) -= asrc_derivs[i] * factor;
} else {
for (i = 0; i < here->ASRCtree->numVars; i++) {
*(here->ASRCposptr[j++]) += asrc_derivs[i] / factor;
*(here->ASRCposptr[j++]) -= asrc_derivs[i] / factor;
*(here->ASRCposptr[j++]) += asrc_derivs[i] * factor;
*(here->ASRCposptr[j++]) -= asrc_derivs[i] * factor;
}
}