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

Replace B source by F source (CCCS) 

Enavle subcircuit approach by #define DEGSUBCKT
This commit is contained in:
Holger Vogt 2026-03-10 12:53:15 +01:00
parent aa2389bc88
commit 5dd666d5b0
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/frontend/inpdeg.c
View File

@ -26,7 +26,7 @@ static int add_degmodel(struct card* deck, double* result);
/* maximum number of models */
#define DEGMODMAX 64
//#define DEGSUBCKT
#define DEGSUBCKT
/* global pointer: results from first tran run */
NGHASHPTR degdatahash = NULL;
@ -470,15 +470,16 @@ static int add_degmodel(struct card* deck, double* result) {
}
/* gate voltage shift */
if (vts)
// nline[0] = tprintf("Vg%d intern_%s %s %e\n", numvg++, gtok, gtok, result[0]);
nline[0] = tprintf("Vg%s intern_%s %s %e\n", intok, gtok, gtok, result[0]);
else
nline[0] = NULL;
/* drain current reduction */
if (currd) {
/* current measurement*/
/* current measurement at source side */
nline[1] = tprintf("Vm%s intern_%s %s 0\n", intok, stok, stok);
/* parallel drain current */
nline[2] = NULL; tprintf("B%s %s %s i = i(Vm%s) * %e\n", intok, dtok, stok, intok, currdeg);
/* parallel drain current with CCCS */
nline[2] = tprintf("F%s %s %s Vm%s %e\n", intok, dtok, stok, intok, currdeg);
}
else
nline[1] = nline[2] = NULL;