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

inp2m.c, #2/9c, rewrite using GENnode[]

This commit is contained in:
rlar 2017-03-07 21:29:47 +01:00
parent 81b5278674
commit 3bb68fbd7a
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
src/spicelib/parser/inp2m.c
View File

@ -230,24 +230,24 @@ INP2M(CKTcircuit *ckt, INPtables *tab, card *current)
{
switch (numnodes) {
case 4:
fast->GENnode5 = -1;
fast->GENnode6 = -1;
fast->GENnode7 = -1;
fast->GENnode[4] = -1;
fast->GENnode[5] = -1;
fast->GENnode[6] = -1;
break;
case 5:
IFC (bindNode, (ckt, fast, 5, node[4]));
fast->GENnode6 = -1;
fast->GENnode7 = -1;
IFC (bindNode, (ckt, fast, 4 + 1, node[4]));
fast->GENnode[5] = -1;
fast->GENnode[6] = -1;
break;
case 6:
IFC (bindNode, (ckt, fast, 5, node[4]));
IFC (bindNode, (ckt, fast, 6, node[5]));
fast->GENnode7 = -1;
IFC (bindNode, (ckt, fast, 4 + 1, node[4]));
IFC (bindNode, (ckt, fast, 5 + 1, node[5]));
fast->GENnode[6] = -1;
break;
case 7:
IFC (bindNode, (ckt, fast, 5, node[4]));
IFC (bindNode, (ckt, fast, 6, node[5]));
IFC (bindNode, (ckt, fast, 7, node[6]));
IFC (bindNode, (ckt, fast, 4 + 1, node[4]));
IFC (bindNode, (ckt, fast, 5 + 1, node[5]));
IFC (bindNode, (ckt, fast, 6 + 1, node[6]));
break;
default:
break;