luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

few polishments

This commit is contained in:
dwarning 2010-01-16 22:26:47 +00:00
parent 13f737c32d
commit 0b3c133233
1 changed files with 574 additions and 574 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
src/spicelib/devices/cpl/cplsetup.c
View File

@ -86,13 +86,13 @@ static int match(int, double*, double*, double*);
static int Gaussian_Elimination2(int, int);
static void eval_Si_Si_1(int, double);
static void loop_ZY(int, double);
static void poly_matrix(); /* quale è il prototipo ? */
static void poly_matrix(); /* quale è il prototipo ? */
/* static int checkW(double*, double); */
static void poly_W(int, int);
static void eval_frequency(int, int);
static void store(int, int);
static void store_SiSv_1(int, int);
/*static int check(); quale è il prototipo ?*/
/*static int check(); quale è il prototipo ?*/
static int coupled(int);
static int generate_out(int, int);
static int ReadCpL(CPLinstance*, CKTcircuit*);
@ -100,7 +100,7 @@ static int ReadCpL(CPLinstance*, CKTcircuit*);
/* mult */
static void mult_p(double*, double*, double*, int, int, int);
static void matrix_p_mult(); /* quale è il prototipo ?*/
static void matrix_p_mult(); /* quale è il prototipo ?*/
static double approx_mode(double*, double*, double);
static double eval2(double, double, double, double);
static int get_c(double, double, double, double, double, double, double, double*, double*);
@ -325,7 +325,7 @@ static int
ReadCpL(CPLinstance *here, CKTcircuit *ckt)
{
int i, j, noL, counter;
float f;
double f;
char *name;
CPLine *c, *c2;
ECPLine *ec;
@ -1026,9 +1026,9 @@ loop_ZY(int dim, double y)
***/
static void
poly_matrix(A, dim, deg)
double *A[MAX_DIM][MAX_DIM];
int dim, deg;
poly_matrix(
double *A[MAX_DIM][MAX_DIM],
int dim, int deg)
{
int i, j;
@ -1433,12 +1433,12 @@ mult_p(double *p1, double *p2, double *p3, int d1, int d2, int d3)
static void
matrix_p_mult(A, D, B, dim, deg, deg_o, X)
double *A[MAX_DIM][MAX_DIM];
double *D[MAX_DIM];
double *B[MAX_DIM][MAX_DIM];
int dim, deg, deg_o;
Mult_Out X[MAX_DIM][MAX_DIM];
matrix_p_mult(
double *A[MAX_DIM][MAX_DIM],
double *D[MAX_DIM],
double *B[MAX_DIM][MAX_DIM],
int dim, int deg, int deg_o,
Mult_Out X[MAX_DIM][MAX_DIM])
{
int i, j, k, l;
double *p;
@ -1927,7 +1927,7 @@ ordering(void)
{
MAXE_PTR e;
int i, j, m;
float mv;
double mv;
for (i = 0; i < dim-1; i++) {
m = i+1;
@ -1966,7 +1966,7 @@ reordering(int p, int q)
{
MAXE_PTR e;
int j, m;
float mv;
double mv;
m = p+1;
mv = ABS(ZY[p][m]);