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

GMIN Stepping trials - Part 2

This commit is contained in:
Francesco Lannutti 2013-09-22 21:43:34 +02:00
parent 5b6c4a9ebb
commit 5fdb0ae9af
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/maths/ni/niconv.c
View File

@ -93,8 +93,8 @@ NIconvTest (CKTcircuit *ckt)
ptr = ptr->next ;
}
if (maximum < fabs (ckt->CKTgmin * ckt->CKTrhsOld [i]))
maximum = fabs (ckt->CKTgmin * ckt->CKTrhsOld [i]) ;
// if (maximum < fabs (ckt->CKTgmin * ckt->CKTrhsOld [i]))
// maximum = fabs (ckt->CKTgmin * ckt->CKTrhsOld [i]) ;
#ifdef STEPDEBUG
@ -103,8 +103,8 @@ NIconvTest (CKTcircuit *ckt)
#endif
/* Check Convergence */
if (fabs (ckt->CKTfvk [i] + ckt->CKTgmin * ckt->CKTrhsOld [i]) > (ckt->CKTreltol * maximum + ckt->CKTabstol))
// if (fabs (ckt->CKTfvk [i]) > (ckt->CKTreltol * maximum + ckt->CKTabstol))
// if (fabs (ckt->CKTfvk [i] + ckt->CKTgmin * ckt->CKTrhsOld [i]) > (ckt->CKTreltol * maximum + ckt->CKTabstol))
if (fabs (ckt->CKTfvk [i]) > (ckt->CKTreltol * maximum + ckt->CKTabstol))
{
ckt->CKTtroubleNode = i ;
ckt->CKTtroubleElt = NULL ;