Code clean up.
This commit is contained in:
parent
877b8160c0
commit
a03bd669f9
|
|
@ -4,7 +4,6 @@ Author: 1987 Thomas L. Quarles
|
||||||
**********/
|
**********/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "ifsim.h"
|
#include "ifsim.h"
|
||||||
#include "devdefs.h"
|
#include "devdefs.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
|
|
|
||||||
|
|
@ -9,7 +9,6 @@ Author: 1987
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "devdefs.h"
|
#include "devdefs.h"
|
||||||
#include "ifsim.h"
|
#include "ifsim.h"
|
||||||
|
|
@ -20,12 +19,7 @@ Author: 1987
|
||||||
|
|
||||||
/* ARGSUSED */
|
/* ARGSUSED */
|
||||||
int
|
int
|
||||||
CCCSask(ckt,inst,which,value,select)
|
CCCSask(CKTcircuit *ckt, GENinstance *inst, int which, IFvalue *value, IFvalue *select)
|
||||||
CKTcircuit *ckt;
|
|
||||||
GENinstance *inst;
|
|
||||||
int which;
|
|
||||||
IFvalue *value;
|
|
||||||
IFvalue *select;
|
|
||||||
{
|
{
|
||||||
CCCSinstance *here = (CCCSinstance*)inst;
|
CCCSinstance *here = (CCCSinstance*)inst;
|
||||||
double vr;
|
double vr;
|
||||||
|
|
|
||||||
|
|
@ -6,18 +6,13 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
#include "sperror.h"
|
#include "sperror.h"
|
||||||
#include "suffix.h"
|
#include "suffix.h"
|
||||||
|
|
||||||
|
|
||||||
int
|
int
|
||||||
CCCSdelete(inModel,name,inst)
|
CCCSdelete(GENmodel *inModel, IFuid name, GENinstance **inst)
|
||||||
GENmodel *inModel;
|
|
||||||
IFuid name;
|
|
||||||
GENinstance **inst;
|
|
||||||
|
|
||||||
{
|
{
|
||||||
|
|
||||||
CCCSmodel *model = (CCCSmodel*)inModel;
|
CCCSmodel *model = (CCCSmodel*)inModel;
|
||||||
|
|
|
||||||
|
|
@ -6,14 +6,12 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
#include "suffix.h"
|
#include "suffix.h"
|
||||||
|
|
||||||
|
|
||||||
void
|
void
|
||||||
CCCSdestroy(inModel)
|
CCCSdestroy(GENmodel **inModel)
|
||||||
GENmodel **inModel;
|
|
||||||
|
|
||||||
{
|
{
|
||||||
CCCSmodel **model = (CCCSmodel**)inModel;
|
CCCSmodel **model = (CCCSmodel**)inModel;
|
||||||
|
|
|
||||||
|
|
@ -3,7 +3,7 @@ Copyright 1990 Regents of the University of California. All rights reserved.
|
||||||
Author: 1985 Thomas L. Quarles
|
Author: 1985 Thomas L. Quarles
|
||||||
**********/
|
**********/
|
||||||
|
|
||||||
#ifdef __STDC__
|
|
||||||
extern int CCCSask(CKTcircuit*,GENinstance*,int,IFvalue*,IFvalue*);
|
extern int CCCSask(CKTcircuit*,GENinstance*,int,IFvalue*,IFvalue*);
|
||||||
extern int CCCSdelete(GENmodel*,IFuid,GENinstance**);
|
extern int CCCSdelete(GENmodel*,IFuid,GENinstance**);
|
||||||
extern void CCCSdestroy(GENmodel**);
|
extern void CCCSdestroy(GENmodel**);
|
||||||
|
|
@ -16,17 +16,4 @@ extern int CCCSsLoad(GENmodel*,CKTcircuit*);
|
||||||
extern void CCCSsPrint(GENmodel*,CKTcircuit*);
|
extern void CCCSsPrint(GENmodel*,CKTcircuit*);
|
||||||
extern int CCCSsSetup(SENstruct*,GENmodel*);
|
extern int CCCSsSetup(SENstruct*,GENmodel*);
|
||||||
extern int CCCSsetup(SMPmatrix*,GENmodel*,CKTcircuit*,int*);
|
extern int CCCSsetup(SMPmatrix*,GENmodel*,CKTcircuit*,int*);
|
||||||
#else /* stdc */
|
|
||||||
extern int CCCSask();
|
|
||||||
extern int CCCSdelete();
|
|
||||||
extern void CCCSdestroy();
|
|
||||||
extern int CCCSload();
|
|
||||||
extern int CCCSmDelete();
|
|
||||||
extern int CCCSparam();
|
|
||||||
extern int CCCSpzLoad();
|
|
||||||
extern int CCCSsAcLoad();
|
|
||||||
extern int CCCSsLoad();
|
|
||||||
extern void CCCSsPrint();
|
|
||||||
extern int CCCSsSetup();
|
|
||||||
extern int CCCSsetup();
|
|
||||||
#endif /* stdc */
|
|
||||||
|
|
|
||||||
|
|
@ -6,7 +6,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
#include "sperror.h"
|
#include "sperror.h"
|
||||||
|
|
@ -15,10 +14,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
/*ARGSUSED*/
|
/*ARGSUSED*/
|
||||||
int
|
int
|
||||||
CCCSload(inModel,ckt)
|
CCCSload(GENmodel *inModel, CKTcircuit *ckt)
|
||||||
|
|
||||||
GENmodel *inModel;
|
|
||||||
CKTcircuit *ckt;
|
|
||||||
|
|
||||||
/* actually load the current voltage value into the
|
/* actually load the current voltage value into the
|
||||||
* sparse matrix previously provided
|
* sparse matrix previously provided
|
||||||
|
|
|
||||||
|
|
@ -6,18 +6,13 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
#include "sperror.h"
|
#include "sperror.h"
|
||||||
#include "suffix.h"
|
#include "suffix.h"
|
||||||
|
|
||||||
|
|
||||||
int
|
int
|
||||||
CCCSmDelete(inModel,modname,kill)
|
CCCSmDelete(GENmodel **inModel, IFuid modname, GENmodel *kill)
|
||||||
GENmodel **inModel;
|
|
||||||
IFuid modname;
|
|
||||||
GENmodel *kill;
|
|
||||||
|
|
||||||
{
|
{
|
||||||
|
|
||||||
CCCSmodel **model = (CCCSmodel**)inModel;
|
CCCSmodel **model = (CCCSmodel**)inModel;
|
||||||
|
|
|
||||||
|
|
@ -6,7 +6,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "ifsim.h"
|
#include "ifsim.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
#include "sperror.h"
|
#include "sperror.h"
|
||||||
|
|
@ -15,11 +14,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
/* ARGSUSED */
|
/* ARGSUSED */
|
||||||
int
|
int
|
||||||
CCCSparam(param,value,inst,select)
|
CCCSparam(int param, IFvalue *value, GENinstance *inst, IFvalue *select)
|
||||||
int param;
|
|
||||||
IFvalue *value;
|
|
||||||
GENinstance *inst;
|
|
||||||
IFvalue *select;
|
|
||||||
{
|
{
|
||||||
CCCSinstance *here = (CCCSinstance*)inst;
|
CCCSinstance *here = (CCCSinstance*)inst;
|
||||||
switch(param) {
|
switch(param) {
|
||||||
|
|
|
||||||
|
|
@ -6,7 +6,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "complex.h"
|
#include "complex.h"
|
||||||
#include "sperror.h"
|
#include "sperror.h"
|
||||||
|
|
@ -16,11 +15,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
/*ARGSUSED*/
|
/*ARGSUSED*/
|
||||||
int
|
int
|
||||||
CCCSpzLoad(inModel,ckt,s)
|
CCCSpzLoad(GENmodel *inModel, CKTcircuit *ckt, SPcomplex *s)
|
||||||
|
|
||||||
GENmodel *inModel;
|
|
||||||
CKTcircuit *ckt;
|
|
||||||
SPcomplex *s;
|
|
||||||
|
|
||||||
/* actually load the current voltage value into the
|
/* actually load the current voltage value into the
|
||||||
* sparse matrix previously provided
|
* sparse matrix previously provided
|
||||||
|
|
|
||||||
|
|
@ -10,7 +10,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "smpdefs.h"
|
#include "smpdefs.h"
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
|
|
@ -19,9 +18,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
|
|
||||||
int
|
int
|
||||||
CCCSsAcLoad(inModel,ckt)
|
CCCSsAcLoad(GENmodel *inModel, CKTcircuit *ckt)
|
||||||
GENmodel *inModel;
|
|
||||||
CKTcircuit *ckt;
|
|
||||||
{
|
{
|
||||||
CCCSmodel *model = (CCCSmodel*)inModel;
|
CCCSmodel *model = (CCCSmodel*)inModel;
|
||||||
CCCSinstance *here;
|
CCCSinstance *here;
|
||||||
|
|
|
||||||
|
|
@ -10,7 +10,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "smpdefs.h"
|
#include "smpdefs.h"
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
|
|
@ -20,11 +19,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
/*ARGSUSED*/
|
/*ARGSUSED*/
|
||||||
int
|
int
|
||||||
CCCSsetup(matrix,inModel,ckt,states)
|
CCCSsetup(SMPmatrix *matrix, GENmodel *inModel, CKTcircuit *ckt, int *states)
|
||||||
SMPmatrix *matrix;
|
|
||||||
GENmodel *inModel;
|
|
||||||
CKTcircuit *ckt;
|
|
||||||
int *states;
|
|
||||||
{
|
{
|
||||||
CCCSmodel *model = (CCCSmodel*)inModel;
|
CCCSmodel *model = (CCCSmodel*)inModel;
|
||||||
CCCSinstance *here;
|
CCCSinstance *here;
|
||||||
|
|
|
||||||
|
|
@ -10,7 +10,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "smpdefs.h"
|
#include "smpdefs.h"
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
|
|
@ -19,9 +18,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
|
|
||||||
int
|
int
|
||||||
CCCSsLoad(inModel,ckt)
|
CCCSsLoad(GENmodel *inModel, CKTcircuit *ckt)
|
||||||
GENmodel *inModel;
|
|
||||||
CKTcircuit *ckt;
|
|
||||||
{
|
{
|
||||||
CCCSmodel *model = (CCCSmodel*)inModel;
|
CCCSmodel *model = (CCCSmodel*)inModel;
|
||||||
CCCSinstance *here;
|
CCCSinstance *here;
|
||||||
|
|
|
||||||
|
|
@ -10,7 +10,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "smpdefs.h"
|
#include "smpdefs.h"
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
|
|
@ -19,9 +18,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
|
|
||||||
void
|
void
|
||||||
CCCSsPrint(inModel,ckt)
|
CCCSsPrint(GENmodel *inModel, CKTcircuit *ckt)
|
||||||
GENmodel *inModel;
|
|
||||||
CKTcircuit *ckt;
|
|
||||||
{
|
{
|
||||||
CCCSmodel *model = (CCCSmodel*)inModel;
|
CCCSmodel *model = (CCCSmodel*)inModel;
|
||||||
CCCSinstance *here;
|
CCCSinstance *here;
|
||||||
|
|
|
||||||
|
|
@ -10,7 +10,6 @@ Author: 1985 Thomas L. Quarles
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include "ngspice.h"
|
#include "ngspice.h"
|
||||||
#include <stdio.h>
|
|
||||||
#include "smpdefs.h"
|
#include "smpdefs.h"
|
||||||
#include "cktdefs.h"
|
#include "cktdefs.h"
|
||||||
#include "cccsdefs.h"
|
#include "cccsdefs.h"
|
||||||
|
|
@ -19,9 +18,7 @@ Author: 1985 Thomas L. Quarles
|
||||||
|
|
||||||
|
|
||||||
int
|
int
|
||||||
CCCSsSetup(info,inModel)
|
CCCSsSetup(SENstruct *info, GENmodel *inModel)
|
||||||
SENstruct *info;
|
|
||||||
GENmodel *inModel;
|
|
||||||
{
|
{
|
||||||
CCCSmodel *model = (CCCSmodel*)inModel;
|
CCCSmodel *model = (CCCSmodel*)inModel;
|
||||||
CCCSinstance *here;
|
CCCSinstance *here;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue