From fd92b21e2cdb040be0fa282dba0bb32513cc0805 Mon Sep 17 00:00:00 2001 From: rlar Date: Sun, 24 May 2015 20:27:33 +0200 Subject: [PATCH] devices/asrc/asrcacld.c, fix `tc1', `tc2' processing --- src/spicelib/devices/asrc/asrcacld.c | 6 +++--- src/spicelib/devices/asrc/asrcpzld.c | 6 +++--- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/src/spicelib/devices/asrc/asrcacld.c b/src/spicelib/devices/asrc/asrcacld.c index 374ba38dc..a64dea489 100644 --- a/src/spicelib/devices/asrc/asrcacld.c +++ b/src/spicelib/devices/asrc/asrcacld.c @@ -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; } } diff --git a/src/spicelib/devices/asrc/asrcpzld.c b/src/spicelib/devices/asrc/asrcpzld.c index 1093863da..027488fbe 100644 --- a/src/spicelib/devices/asrc/asrcpzld.c +++ b/src/spicelib/devices/asrc/asrcpzld.c @@ -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; } }