niconv.c File Reference

#include "spice.h"
#include <stdio.h>
#include <math.h>
#include "cktdefs.h"
#include "util.h"
#include "cktext.h"
#include "niext.h"

Include dependency graph for niconv.c:

Go to the source code of this file.

Functions
int	NIconvTest (CKTcircuit *ckt)

Function Documentation

int NIconvTest

(

CKTcircuit *

ckt

)

Definition at line 24 of file niconv.c.

{
    int i;         /* generic loop variable */
    int size;      /* size of the matrix */
    CKTnode *node; /* current matrix entry */
    double old, aold;
    double new, anew;
    double dd, tol;

    node = ckt->CKTnodes;
    size = spGetSize(ckt->CKTmatrix,1);
    for (i = 1; i <= size; i++) {

        node = node->next;

        new =  *((ckt->CKTrhs) + i);
        old =  *((ckt->CKTrhsOld) + i);

        if (new > 0)
            anew = new;
        else
            anew = -new;

        if (old > 0)
            aold = old;
        else
            aold = -old;

        dd = new - old;
        if (dd < 0)
            dd = -dd;

        if (node->type == 3) {
            tol =  ckt->CKTreltol*MAX(aold,anew) + ckt->CKTvoltTol;
            if (dd > tol) {
#ifdef STEPDEBUG
                printf(" non-convergence at node %s\n",CKTnodName(ckt,i));
#endif /* STEPDEBUG */
                ckt->CKTtroubleNode = i;
                return (1);
            }
        }
        else {
            tol =  ckt->CKTreltol*MAX(aold,anew) + ckt->CKTabstol;
            if (dd > tol) {
#ifdef STEPDEBUG
                printf(" non-convergence at node %s\n",CKTnodName(ckt,i));
#endif /* STEPDEBUG */
                return (1);
            }
        }
    }
    return (CKTconvTest(ckt));
}