removed dummdumm
This commit is contained in:
parent
0d94c5d56d
commit
f5a1c35d80
|
|
@ -440,7 +440,6 @@ extern int NIconvTest(CKTcircuit *);
|
|||
extern void NIdestroy(CKTcircuit *);
|
||||
extern int NIinit(CKTcircuit *);
|
||||
extern int NIintegrate(CKTcircuit *, double *, double *, double , int);
|
||||
extern void dummdumm(int dumm);
|
||||
extern int NIiter(CKTcircuit * , int);
|
||||
extern int NIpzMuller(PZtrial **, PZtrial *);
|
||||
extern int NIpzComplex(PZtrial **, PZtrial *);
|
||||
|
|
|
|||
|
|
@ -14,12 +14,6 @@ Author: 1985 Thomas L. Quarles
|
|||
|
||||
#define ccap qcap+1
|
||||
|
||||
void dummdumm(int dumm)
|
||||
{
|
||||
double dummy;
|
||||
dummy=1;
|
||||
}
|
||||
|
||||
int
|
||||
NIintegrate(CKTcircuit *ckt, double *geq, double *ceq, double cap, int qcap)
|
||||
{
|
||||
|
|
@ -31,12 +25,12 @@ NIintegrate(CKTcircuit *ckt, double *geq, double *ceq, double cap, int qcap)
|
|||
case TRAPEZOIDAL:
|
||||
switch(ckt->CKTorder) {
|
||||
case 1:
|
||||
ckt->CKTstate0[ccap] = ckt->CKTag[0] * ckt->CKTstate0[qcap]
|
||||
ckt->CKTstate0[ccap] = ckt->CKTag[0] * ckt->CKTstate0[qcap]
|
||||
+ ckt->CKTag[1] * ckt->CKTstate1[qcap];
|
||||
break;
|
||||
case 2:
|
||||
ckt->CKTstate0[ccap] = - ckt->CKTstate1[ccap] * ckt->CKTag[1] +
|
||||
ckt->CKTag[0] *
|
||||
ckt->CKTstate0[ccap] = - ckt->CKTstate1[ccap] * ckt->CKTag[1] +
|
||||
ckt->CKTag[0] *
|
||||
( ckt->CKTstate0[qcap] - ckt->CKTstate1[qcap] );
|
||||
break;
|
||||
default:
|
||||
|
|
|
|||
Loading…
Reference in New Issue