Jspice3
traparam.c
Go to the documentation of this file.
1 /**********
2 Copyright 1990 Regents of the University of California. All rights reserved.
3 Author: 1985 Thomas L. Quarles
4 **********/
5 
6 #include "spice.h"
7 #include <stdio.h>
8 #include "tradefs.h"
9 #include "sperror.h"
10 #include "util.h"
11 
12 
13 /* ARGSUSED */
14 int
15 TRAparam(ckt,param,value,inst,select)
16 
17 CKTcircuit *ckt;
18 int param;
19 IFvalue *value;
20 GENinstance *inst;
21 IFvalue *select;
22 {
23  TRAinstance *here = (TRAinstance *)inst;
24  switch(param) {
25  case TRA_RELTOL:
26  here->TRAreltol = value->rValue;
27  here->TRAreltolGiven = TRUE;
28  break;
29  case TRA_ABSTOL:
30  here->TRAabstol = value->rValue;
31  here->TRAabstolGiven = TRUE;
32  break;
33  case TRA_Z0:
34  here->TRAimped = value->rValue;
35  here->TRAimpedGiven = TRUE;
36  break;
37  case TRA_TD:
38  here->TRAtd = value->rValue;
39  here->TRAtdGiven = TRUE;
40  break;
41  case TRA_NL:
42  here->TRAnl= value->rValue;
43  here->TRAnlGiven = TRUE;
44  break;
45  case TRA_FREQ:
46  here->TRAf= value->rValue;
47  here->TRAfGiven = TRUE;
48  break;
49  case TRA_V1:
50  here->TRAinitVolt1 = value->rValue;
51  here->TRAicV1Given = TRUE;
52  break;
53  case TRA_I1:
54  here->TRAinitCur1 = value->rValue;
55  here->TRAicC1Given = TRUE;
56  break;
57  case TRA_V2:
58  here->TRAinitVolt2 = value->rValue;
59  here->TRAicV2Given = TRUE;
60  break;
61  case TRA_I2:
62  here->TRAinitCur2 = value->rValue;
63  here->TRAicC2Given = TRUE;
64  break;
65  case TRA_IC:
66  switch(value->v.numValue){
67  case 4:
68  here->TRAinitCur2 = *(value->v.vec.rVec+3);
69  case 3:
70  here->TRAinitVolt2 = *(value->v.vec.rVec+2);
71  case 2:
72  here->TRAinitCur1 = *(value->v.vec.rVec+1);
73  case 1:
74  here->TRAinitVolt1 = *(value->v.vec.rVec);
75  break;
76  default:
77  return(E_BADPARM);
78  }
79  break;
80  default:
81  return(E_BADPARM);
82  }
83  return(OK);
84 }
#define TRA_Z0
Definition: tradefs.h:95
int numValue
Definition: ifsim.h:240
double TRAinitVolt2
Definition: tradefs.h:39
unsigned TRAtdGiven
Definition: tradefs.h:71
#define TRA_ABSTOL
Definition: tradefs.h:105
double TRAimped
Definition: tradefs.h:30
union uIFvalue::@13::@14 vec
#define TRA_I1
Definition: tradefs.h:100
int TRAparam(CKTcircuit *ckt, int param, IFvalue *value, GENinstance *inst, IFvalue *select)
Definition: traparam.c:15
double TRAinitCur1
Definition: tradefs.h:38
#define TRA_I2
Definition: tradefs.h:102
unsigned TRAimpedGiven
Definition: tradefs.h:70
double TRAtd
Definition: tradefs.h:32
unsigned TRAicV1Given
Definition: tradefs.h:74
#define E_BADPARM
Definition: iferrmsg.h:26
double TRAnl
Definition: tradefs.h:33
#define TRUE
Definition: util.h:27
double rValue
Definition: ifsim.h:233
double TRAf
Definition: tradefs.h:34
double TRAreltol
Definition: tradefs.h:41
#define TRA_V1
Definition: tradefs.h:99
#define TRA_RELTOL
Definition: tradefs.h:104
#define OK
Definition: iferrmsg.h:17
#define TRA_V2
Definition: tradefs.h:101
double TRAinitVolt1
Definition: tradefs.h:37
unsigned TRAfGiven
Definition: tradefs.h:73
#define TRA_IC
Definition: tradefs.h:103
unsigned TRAnlGiven
Definition: tradefs.h:72
unsigned TRAicV2Given
Definition: tradefs.h:76
double TRAabstol
Definition: tradefs.h:42
unsigned TRAabstolGiven
Definition: tradefs.h:79
unsigned TRAreltolGiven
Definition: tradefs.h:78
double TRAinitCur2
Definition: tradefs.h:40
unsigned TRAicC2Given
Definition: tradefs.h:77
unsigned TRAicC1Given
Definition: tradefs.h:75
#define TRA_FREQ
Definition: tradefs.h:98
struct uIFvalue::@13 v
#define TRA_TD
Definition: tradefs.h:96
#define TRA_NL
Definition: tradefs.h:97