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

inpcom.c, add function inp_get_elem_ident()

This commit is contained in:
h_vogt 2016-05-01 18:52:52 +02:00 committed by rlar
parent 50a9ed4b8e
commit 89c29a646d
1 changed files with 61 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
src/frontend/inpcom.c
View File

@ -147,6 +147,7 @@ static char *inp_pathresolve_at(char *name, char *dir);
static char *search_plain_identifier(char *str, const char *identifier);
void tprint(struct line *deck, int numb);
static struct nscope *inp_add_levels(struct line *deck);
static char inp_get_elem_ident(char *type);
static struct line_assoc *find_subckt(struct nscope *scope, const char *name);
struct inp_read_t
@ -6595,3 +6596,63 @@ inp_add_levels(struct line *deck)
return root;
}
/* model type as input, element identifier as output */
static char
inp_get_elem_ident(char *type)
{
if (cieq(type, "r"))
return 'r';
else if (cieq(type, "c"))
return 'c';
else if (cieq(type, "l"))
return 'l';
else if (cieq(type, "nmos"))
return 'm';
else if (cieq(type, "pmos"))
return 'm';
else if (cieq(type, "numos"))
return 'm';
else if (cieq(type, "d"))
return 'd';
else if (cieq(type, "numd"))
return 'd';
else if (cieq(type, "numd2"))
return 'd';
else if (cieq(type, "npn"))
return 'q';
else if (cieq(type, "pnp"))
return 'q';
else if (cieq(type, "nbjt"))
return 'q';
else if (cieq(type, "nbjt2"))
return 'q';
else if (cieq(type, "njf"))
return 'j';
else if (cieq(type, "pjf"))
return 'j';
else if (cieq(type, "nmf"))
return 'z';
else if (cieq(type, "pmf"))
return 'z';
else if (cieq(type, "nhfet"))
return 'z';
else if (cieq(type, "phfet"))
return 'z';
else if (cieq(type, "sw"))
return 's';
else if (cieq(type, "csw"))
return 'w';
else if (cieq(type, "txl"))
return 'y';
else if (cieq(type, "cpl"))
return 'p';
else if (cieq(type, "ltra"))
return 'o';
else if (cieq(type, "urc"))
return 'u';
/* xspice code models do not have unique type names */
else
return 'a';
}