Jspice3
jjtrunc.c
Go to the documentation of this file.
1 /***************************************************************************
2 JSPICE3 adaptation of Spice3f2 - Copyright (c) Stephen R. Whiteley 1992
3 Author: 1993 Stephen R. Whiteley
4 ****************************************************************************/
5 
6 /*
7  * This is called *only* when cct=0 for all junctions in the
8  * circuit. Otherwise the time step is set in JJacct().
9  */
10 
11 #include "spice.h"
12 #include <stdio.h>
13 #include "jjdefs.h"
14 #include "sperror.h"
15 #include "util.h"
16 
17 
18 int
19 JJtrunc(inModel,ckt,timeStep)
20 
21 GENmodel *inModel;
22 CKTcircuit *ckt;
23 double *timeStep;
24 {
25  JJmodel *model = (JJmodel *)inModel;
26  JJinstance *here;
27 
28  for ( ; model!= NULL; model = model->JJnextModel) {
29  for (here = model->JJinstances ; here != NULL;
30  here = here->JJnextInstance) {
31 
32  CKTterr(here->JJvoltage,ckt,timeStep);
33 
34  }
35  }
36  return (OK);
37 }
int JJtrunc(GENmodel *inModel, CKTcircuit *ckt, double *timeStep)
Definition: jjtrunc.c:19
JJinstance * JJinstances
Definition: jjdefs.h:84
#define OK
Definition: iferrmsg.h:17
#define NULL
Definition: spdefs.h:121
void CKTterr()
static char model[32]
Definition: subckt.c:76
struct sJJmodel * JJnextModel
Definition: jjdefs.h:82
struct sJJinstance * JJnextInstance
Definition: jjdefs.h:17