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

View File

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