You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
41 lines
1.5 KiB
41 lines
1.5 KiB
/**********
|
|
Copyright 1990 Regents of the University of California. All rights reserved.
|
|
Author: 1987 Thomas L. Quarles
|
|
**********/
|
|
|
|
#include "ngspice.h"
|
|
#include <stdio.h>
|
|
#include "ifsim.h"
|
|
#include "devdefs.h"
|
|
#include "ccvsdefs.h"
|
|
#include "suffix.h"
|
|
|
|
/* current controlled voltage source */
|
|
IFparm CCVSpTable[] = { /* parameters */
|
|
IOPU("gain", CCVS_TRANS, IF_REAL ,"Transresistance (gain)"),
|
|
IOPU("control", CCVS_CONTROL, IF_INSTANCE,"Controlling voltage source"),
|
|
IP("sens_trans",CCVS_TRANS_SENS,IF_FLAG,
|
|
"flag to request sens. WRT transimpedance"),
|
|
OPU("pos_node", CCVS_POS_NODE,IF_INTEGER, "Positive node of source"),
|
|
OPU("neg_node", CCVS_NEG_NODE,IF_INTEGER, "Negative node of source"),
|
|
OP("i", CCVS_CURRENT, IF_REAL, "CCVS output current"),
|
|
OP("v", CCVS_VOLTS, IF_REAL, "CCVS output voltage"),
|
|
OP("p", CCVS_POWER, IF_REAL, "CCVS power"),
|
|
OPU("sens_dc", CCVS_QUEST_SENS_DC, IF_REAL,"dc sensitivity "),
|
|
OPU("sens_real", CCVS_QUEST_SENS_REAL,IF_REAL,"real part of ac sensitivity"),
|
|
OPU("sens_imag", CCVS_QUEST_SENS_IMAG,IF_REAL,"imag part of ac sensitivity"),
|
|
OPU("sens_mag", CCVS_QUEST_SENS_MAG, IF_REAL,"sensitivity of ac magnitude"),
|
|
OPU("sens_ph", CCVS_QUEST_SENS_PH, IF_REAL, "sensitivity of ac phase"),
|
|
OPU("sens_cplx", CCVS_QUEST_SENS_CPLX,IF_COMPLEX,"ac sensitivity")
|
|
};
|
|
|
|
char *CCVSnames[] = {
|
|
"H+",
|
|
"H-"
|
|
};
|
|
|
|
int CCVSnSize = NUMELEMS(CCVSnames);
|
|
int CCVSpTSize = NUMELEMS(CCVSpTable);
|
|
int CCVSmPTSize = 0;
|
|
int CCVSiSize = sizeof(CCVSinstance);
|
|
int CCVSmSize = sizeof(CCVSmodel);
|