1 /**********
2 Copyright 1990 Regents of the University of California. All rights reserved.
3 Author: 1985 Thomas L. Quarles
4 **********/
5
6 /* CKTmodParam
7 * attach the given parameter to the specified model in the given circuit
8 */
9
10 #include "ngspice/ngspice.h"
11 #include "ngspice/cktdefs.h"
12 #include "ngspice/ifsim.h"
13 #include "ngspice/devdefs.h"
14 #include "ngspice/sperror.h"
15
16
17 /* ARGSUSED */
18 int
CKTmodParam(CKTcircuit * ckt,GENmodel * modfast,int param,IFvalue * val,IFvalue * selector)19 CKTmodParam(CKTcircuit *ckt, GENmodel *modfast, int param, IFvalue *val, IFvalue *selector)
20 {
21 int type = modfast->GENmodType;
22
23 NG_IGNORE(ckt);
24 NG_IGNORE(selector);
25
26 if (DEVices[type]->DEVmodParam) {
27 return(DEVices[type]->DEVmodParam (param, val, modfast));
28 } else {
29 return(E_BADPARM);
30 }
31 }
32