Jspice3
options.c File Reference
#include "spice.h"
#include "ftedefs.h"
#include "fteinp.h"
Include dependency graph for options.c:

Go to the source code of this file.

Data Structures

struct  intvar
 

Macros

#define def_fn(name)
 

Functions

static struct variablevec2var ()
 
static struct variablegetlist ()
 
 def_fn (_iv_cpdebug)
 
 def_fn (_iv_history)
 
 def_fn (_iv_ignoreeof)
 
 def_fn (_iv_noclobber)
 
 def_fn (_iv_noglob)
 
 def_fn (_iv_nonomatch)
 
 def_fn (_iv_prompt)
 
 def_fn (_iv_acct)
 
 def_fn (_iv_curplot)
 
 def_fn (_iv_curplotdate)
 
 def_fn (_iv_curplotname)
 
 def_fn (_iv_curplottitle)
 
static void setdb (char *word)
 
 def_fn (_iv_debug)
 
 def_fn (_iv_display)
 
 def_fn (_iv_height)
 
 def_fn (_iv_jjdphimax)
 
 def_fn (_iv_list)
 
 def_fn (_iv_nocc)
 
 def_fn (_iv_node)
 
 def_fn (_iv_noiter)
 
 def_fn (_iv_nomoremode)
 
 def_fn (_iv_nopage)
 
 def_fn (_iv_numdgt)
 
 def_fn (_iv_opts)
 
 def_fn (_iv_plots)
 
 def_fn (_iv_program)
 
 def_fn (_iv_rawfile)
 
 def_fn (_iv_rawfileprec)
 
 def_fn (_iv_strictnumparse)
 
 def_fn (_iv_units)
 
 def_fn (_iv_unixcom)
 
 def_fn (_iv_width)
 
void cp_internal_init ()
 
void com_usrset (wordlist *wl)
 
int cp_internalset (struct variable *v, bool flag)
 
struct variablecp_enqvar (char *word)
 
static struct variablevec2var (struct dvec *d, int lo, int hi)
 
static struct variablegetlist (struct dvec *d, int dim, char **x)
 
void cp_usrvars (struct variable **v1, struct variable **v2)
 
struct lineinp_getopts (struct line *deck)
 

Variables

double JJdphi = 2.07e-16
 
bool ft_nopage = false
 
bool ft_parsedb = false
 
bool ft_vecdb = false
 
bool ft_simdb = false
 
bool ft_evdb = false
 
bool ft_grdb = false
 
bool ft_gidb = false
 
bool ft_controldb = false
 
bool ft_asyncdb = false
 
static char * huhmsg = "Excuse me??\n"
 
static char * pltmsg = "Error: can't set plot"
 
char * kw_abstol = "abstol"
 
char * kw_acct = "acct"
 
char * kw_appendwrite = "appendwrite"
 
char * kw_checkiterate = "checkiterate"
 
char * kw_chgtol = "chgtol"
 
char * kw_color = "color"
 
char * kw_cpdebug = "cpdebug"
 
char * kw_curplot = "curplot"
 
char * kw_curplotname = "curplotname"
 
char * kw_curplottitle = "curplottitle"
 
char * kw_curplotdate = "curplotdate"
 
char * kw_debug = "debug"
 
char * kw_defad = "defad"
 
char * kw_defas = "defas"
 
char * kw_defl = "defl"
 
char * kw_defw = "defw"
 
char * kw_device = "device"
 
char * kw_display = "display"
 
char * kw_dontplot = "dontplot"
 
char * kw_editor = "editor"
 
char * kw_filetype = "filetype"
 
char * kw_fourgridsize = "fourgridsize"
 
char * kw_gmin = "gmin"
 
char * kw_gridsize = "gridsize"
 
char * kw_gridstyle = "gridstyle"
 
char * kw_hcopydev = "hcopydev"
 
char * kw_hcopydevtype = "hcopydevtype"
 
char * kw_height = "height"
 
char * kw_history = "history"
 
char * kw_hitusertp = "hitusertp"
 
char * kw_ignoreeof = "ignoreeof"
 
char * kw_itl1 = "itl1"
 
char * kw_itl2 = "itl2"
 
char * kw_itl3 = "itl3"
 
char * kw_itl4 = "itl4"
 
char * kw_itl5 = "itl5"
 
char * kw_jjdphimax = "jjdphimax"
 
char * kw_level = "level"
 
char * kw_list = "list"
 
char * kw_maxwins = "maxwins"
 
char * kw_modelcard = "modelcard"
 
char * kw_mplot_cur = "mplot_cur"
 
char * kw_nfreqs = "nfreqs"
 
char * kw_noasciiplotvalue = "noasciiplotvalue"
 
char * kw_noaskquit = "noaskquit"
 
char * kw_nobjthack = "nobjthack"
 
char * kw_nobreak = "nobreak"
 
char * kw_nocc = "nocc"
 
char * kw_noclobber = "noclobber"
 
char * kw_node = "node"
 
char * kw_noglob = "noglob"
 
char * kw_nogrid = "nogrid"
 
char * kw_noiter = "noiter"
 
char * kw_nojjtp = "nojjtp"
 
char * kw_nomoremode = "nomoremode"
 
char * kw_nonomatch = "nonomatch"
 
char * kw_nopage = "nopage"
 
char * kw_noparse = "noparse"
 
char * kw_noprintscale = "noprintscale"
 
char * kw_nosort = "nosort"
 
char * kw_nosubckt = "nosubckt"
 
char * kw_nousertp = "nousertp"
 
char * kw_numdgt = "numdgt"
 
char * kw_opts = "opts"
 
char * kw_pivrel = "pivrel"
 
char * kw_pivtol = "pivtol"
 
char * kw_plots = "plots"
 
char * kw_plotstyle = "plotstyle"
 
char * kw_pointchars = "pointchars"
 
char * kw_polydegree = "polydegree"
 
char * kw_polysteps = "polysteps"
 
char * kw_printinfo = "printinfo"
 
char * kw_program = "program"
 
char * kw_prompt = "prompt"
 
char * kw_rawfile = "rawfile"
 
char * kw_rawfileprec = "rawfileprec"
 
char * kw_reltol = "reltol"
 
char * kw_renumber = "renumber"
 
char * kw_rhost = "rhost"
 
char * kw_rprogram = "rprogram"
 
char * kw_scedfont = "scedfont"
 
char * kw_slowplot = "slowplot"
 
char * kw_sourcepath = "sourcepath"
 
char * kw_spicepath = "spicepath"
 
char * kw_strictnumparse = "strictnumparse"
 
char * kw_subend = "subend"
 
char * kw_subinvoke = "subinvoke"
 
char * kw_substart = "substart"
 
char * kw_term = "term"
 
char * kw_ticmarks = "ticmarks"
 
char * kw_tnom = "tnom"
 
char * kw_trtol = "trtol"
 
char * kw_units = "units"
 
char * kw_unixcom = "unixcom"
 
char * kw_vntol = "vntol"
 
char * kw_width = "width"
 
char * kw_wpboxh = "wpboxh"
 
char * kw_wpboxw = "wpboxw"
 
char * kw_xglinewidth = "xglinewidth"
 
char * kw_xgmarkers = "xgmarkers"
 
char * kw_xfont = "xfont"
 
static struct intvar int_vars []
 
static void * internalvars
 

Macro Definition Documentation

#define def_fn (   name)
Value:
static int name(v,flag) \
struct variable *v; \
bool flag;
int bool
Definition: cpstd.h:16
Definition: cpstd.h:41

Definition at line 49 of file options.c.

Function Documentation

void com_usrset ( wordlist wl)

Definition at line 573 of file options.c.

577 {
578  int i;
579 
580  out_init();
581  if (wl == NULL) {
582  for (i = 0; i < sizeof(int_vars)/sizeof(struct intvar); i++) {
583  out_printf("%-18s %s\n",*(int_vars[i].name),int_vars[i].descr);
584  }
585  return;
586  }
587  while (wl) {
588  for (i = 0; i < sizeof(int_vars)/sizeof(struct intvar); i++) {
589  if (eq(wl->wl_word,*(int_vars[i].name))) {
590  out_printf("%-18s %s\n",*(int_vars[i].name),int_vars[i].descr);
591  break;
592  }
593  }
594  if (i == sizeof(int_vars)/sizeof(struct intvar))
595  out_printf("%-18s %s\n",wl->wl_word,"not an internal variable");
596  wl = wl->wl_next;
597  }
598 }
static struct intvar int_vars[]
Definition: options.c:447
#define eq(a, b)
Definition: misc.h:29
void out_printf()
char ** name
Definition: options.c:439
#define NULL
Definition: spdefs.h:121
struct wordlist * wl_next
Definition: cpstd.h:23
char * wl_word
Definition: cpstd.h:22
void out_init()
Definition: output.c:128
struct variable* cp_enqvar ( char *  word)

Definition at line 688 of file options.c.

691 {
692  struct dvec *d;
693  struct variable *vv = NULL, *tv;
694  struct plot *pl;
695  int i;
696  char **x;
697  char *range, *r;
698  char *tt = NULL;
699  int low, up;
700 
701  if (*word == '&') {
702  word++;
703 
704  low = 0;
705  up = -1;
706 
707  if (*word == '(') {
708  /* an expression */
709  tt = strrchr(word,')');
710  if (tt == NULL) {
711  fprintf(cp_err,"Error: closing ')' not found.\n");
712  return (NULL);
713  }
714  r = range = strchr(tt,'[');
715  }
716  else
717  r = range = strchr(word,'[');
718 
719  if (r) {
720  *r = '\0';
721  r++;
722  if (!isdigit(*r) && *r != '-')
723  fprintf(cp_err,
724  "Warning: nonparseable range specified, %s[%s\n",
725  word,r);
726  for (low = 0; isdigit(*r); r++)
727  low = low * 10 + *r - '0';
728  if ((*r == '-') && isdigit(r[1]))
729  for (up = 0, r++; isdigit(*r); r++)
730  up = up * 10 + *r - '0';
731  else if (*r != '-')
732  up = low;
733  }
734  if (tt) {
735  /* evaluate the expression */
736  wordlist wl;
737  struct pnode *pn;
738 
739  wl.wl_word = word;
740  wl.wl_next = wl.wl_prev = NULL;
741  pn = ft_getpnames(&wl,true);
742  if (pn == NULL) {
743  fprintf(cp_err,"Error: parse failed.\n");
744  return (NULL);
745  }
746  d = ft_evaluate(pn);
747  inp_pnfree(pn);
748  }
749  else
750  d = vec_get(word);
751 
752  if (d) {
753  if (d->v_link2) {
754  fprintf(cp_err,
755  "Warning: only one vector may be accessed with the $& notation.\n");
756  d = d->v_link2->dl_dvec;
757  }
758  if (d->v_numdims <= 1) {
759  d->v_numdims = 1;
760  d->v_dims[0] = d->v_length;
761  }
762  if (up == -1)
763  up = d->v_dims[0] - 1;
764  vv = vec2var(d,low,up);
765  }
766  if (range)
767  *range = '[';
768  return (vv);
769  }
770  if (eq(word, kw_display)) {
771  vv = alloc(struct variable);
772  vv->va_name = copy(word);
773  vv->va_type = VT_STRING;
774  vv->va_string = copy(cp_display);
775  return (vv);
776  }
777  if (plot_cur) {
778  for (vv = plot_cur->pl_env; vv; vv = vv->va_next)
779  if (eq(vv->va_name, word))
780  break;
781  if (vv)
782  vv = va_copy(vv);
783  else if (eq(word, kw_curplotname)) {
784  vv = alloc(struct variable);
785  vv->va_name = copy(word);
786  vv->va_type = VT_STRING;
787  vv->va_string = copy(plot_cur->pl_name);
788  }
789  else if (eq(word, kw_curplottitle)) {
790  vv = alloc(struct variable);
791  vv->va_name = copy(word);
792  vv->va_type = VT_STRING;
793  vv->va_string = copy(plot_cur->pl_title);
794  }
795  else if (eq(word, kw_curplotdate)) {
796  vv = alloc(struct variable);
797  vv->va_name = copy(word);
798  vv->va_type = VT_STRING;
799  vv->va_string = copy(plot_cur->pl_date);
800  }
801  else if (eq(word, kw_curplot)) {
802  vv = alloc(struct variable);
803  vv->va_name = copy(word);
804  vv->va_type = VT_STRING;
805  vv->va_string = copy(plot_cur->pl_typename);
806  }
807  else if (eq(word, kw_plots)) {
808  vv = alloc(struct variable);
809  vv->va_name = copy(word);
810  vv->va_type = VT_LIST;
811  for (pl = plot_list; pl; pl = pl->pl_next) {
812  tv = alloc(struct variable);
813  tv->va_type = VT_STRING;
814  tv->va_string = copy(pl->pl_typename);
815  tv->va_next = vv->va_vlist;
816  vv->va_vlist = tv;
817  }
818  }
819  if (vv)
820  return (vv);
821  }
822  if (ft_curckt) {
823  for (vv = ft_curckt->ci_vars; vv; vv = vv->va_next)
824  if (eq(vv->va_name, word))
825  break;
826  if (vv)
827  return va_copy(vv);
828  }
829  return (NULL);
830 }
struct dvec * ft_evaluate()
char * kw_plots
Definition: options.c:401
#define eq(a, b)
Definition: misc.h:29
static struct variable * vec2var()
char * pl_typename
Definition: ftedata.h:65
char * pl_date
Definition: ftedata.h:63
struct dvlist * v_link2
Definition: ftedata.h:44
char * pl_title
Definition: ftedata.h:62
char * pl_name
Definition: ftedata.h:64
struct plot * plot_cur
Definition: vectors.c:43
struct variable * pl_env
Definition: ftedata.h:71
Definition: xforms.c:16
struct pnode * ft_getpnames()
#define VT_LIST
Definition: cpstd.h:64
Definition: ftedata.h:61
struct variable * va_copy()
Definition: library.c:18
int v_dims[MAXDIMS]
Definition: ftedata.h:41
#define alloc(type)
Definition: cdmacs.h:21
char * copy()
char va_type
Definition: cpstd.h:42
void inp_pnfree()
FILE * cp_err
Definition: help.c:101
struct wordlist * wl_prev
Definition: cpstd.h:24
char * kw_curplot
Definition: options.c:342
char * kw_display
Definition: options.c:352
char * va_name
Definition: cpstd.h:43
Definition: cddefs.h:237
struct dvec * vec_get()
#define NULL
Definition: spdefs.h:121
struct circ * ft_curckt
Definition: main.c:184
struct variable * ci_vars
Definition: ftedefs.h:33
char * cp_display
Definition: main.c:44
#define VT_STRING
Definition: cpstd.h:63
Definition: ftedata.h:24
struct dvec * dl_dvec
Definition: ftedata.h:50
Definition: cpstd.h:21
struct plot * pl_next
Definition: ftedata.h:69
char * kw_curplottitle
Definition: options.c:344
char * kw_curplotname
Definition: options.c:343
char * kw_curplotdate
Definition: options.c:345
struct plot * plot_list
Definition: vectors.c:44
Definition: cddefs.h:162
struct wordlist * wl_next
Definition: cpstd.h:23
int v_numdims
Definition: ftedata.h:40
char * wl_word
Definition: cpstd.h:22
int v_length
Definition: ftedata.h:34
struct variable * va_next
Definition: cpstd.h:51
Definition: cpstd.h:41
Definition: fteparse.h:16
void cp_internal_init ( )

Definition at line 555 of file options.c.

558 {
559  int i;
560 
561  if (internalvars == NULL)
563  for (i = 0; i < sizeof(int_vars)/sizeof(struct intvar); i++) {
564  if (int_vars[i].func) {
565  htab_add(*(int_vars[i].name),(void*)&int_vars[i],internalvars);
566  cp_addkword(CT_VARIABLES, *(int_vars[i].name));
567  }
568  }
569 }
static struct intvar int_vars[]
Definition: options.c:447
#define CT_VARIABLES
Definition: fteconst.h:95
void * htab_init()
Definition: hash.c:27
#define NULL
Definition: spdefs.h:121
Definition: fteparse.h:37
void htab_add()
void cp_addkword()
static void * internalvars
Definition: options.c:552
int cp_internalset ( struct variable v,
bool  flag 
)

Definition at line 602 of file options.c.

610 {
611  struct intvar *x;
612  struct variable *tv;
613  int i;
614  char val[BSIZE_SP];
615  char *vv;
616  bool bv;
617  double dv;
618  int iv;
619 
620  x = (struct intvar *)htab_get(v->va_name,internalvars);
621  if (x)
622  i = (*x->func)(v,flag);
623  else
624  return (US_OK);
625 
626  if (i != US_OK)
627  return (i);
628 
629  if (plot_cur)
630  for (tv = plot_cur->pl_env; tv; tv = tv->va_next)
631  if (eq(tv->va_name, v->va_name))
632  return (US_READONLY);
633 
634  if (!flag || ft_nutmeg)
635  return (US_OK);
636 
637  /* Now call the interface option routine. */
638  switch (v->va_type) {
639  case VT_BOOL:
640  if (v->va_bool) {
641  val[0] = '\0';
642  bv = true;
643  vv = (char *) &bv;
644  break;
645  }
646  else {
647  bv = false;
648  vv = (char *) &bv;
649  }
650  case VT_STRING:
651  (void) strcpy(val, v->va_string);
652  vv = val;
653  break;
654  case VT_NUM:
655  (void) sprintf(val, "%d", v->va_num);
656  iv = v->va_num;
657  vv = (char *) &iv;
658  break;
659  case VT_REAL:
660  (void) strcpy(val, printnum(v->va_real));
661  dv = v->va_real;
662  vv = (char *) &dv;
663  break;
664  case VT_LIST:
665  /* if_option can't handle lists anyway. */
666  break;
667  default:
668  fprintf(cp_err,
669  "cp_usrset: Internal Error: Bad var type %d\n",
670  v->va_type);
671  }
672 
673  if (ft_curckt)
674  if_option(ft_curckt->ci_ckt, v->va_name, v->va_type, vv);
675 
676  return (US_OK);
677 }
#define US_OK
Definition: cpdefs.h:49
#define US_READONLY
Definition: cpdefs.h:50
#define BSIZE_SP
Definition: misc.h:19
#define eq(a, b)
Definition: misc.h:29
char * printnum()
char * strcpy()
struct plot * plot_cur
Definition: vectors.c:43
struct variable * pl_env
Definition: ftedata.h:71
#define VT_LIST
Definition: cpstd.h:64
char * ci_ckt
Definition: ftedefs.h:27
void if_option(char *ckt, char *name, int type, char *value)
Definition: main.c:242
char va_type
Definition: cpstd.h:42
FILE * cp_err
Definition: help.c:101
char * va_name
Definition: cpstd.h:43
struct circ * ft_curckt
Definition: main.c:184
#define VT_NUM
Definition: cpstd.h:61
#define VT_STRING
Definition: cpstd.h:63
#define VT_BOOL
Definition: cpstd.h:60
void * htab_get()
#define VT_REAL
Definition: cpstd.h:62
bool ft_nutmeg
Definition: main.c:161
int(* func)()
Definition: options.c:444
struct variable * va_next
Definition: cpstd.h:51
static void * internalvars
Definition: options.c:552
Definition: cpstd.h:41
void cp_usrvars ( struct variable **  v1,
struct variable **  v2 
)

Definition at line 923 of file options.c.

926 {
927  struct variable *v, *tv;
928 
929  if (plot_cur)
930  v = va_copy(plot_cur->pl_env);
931  else
932  v = NULL;
933  if (tv = cp_enqvar(kw_plots)) {
934  tv->va_next = v;
935  v = tv;
936  }
937  if (tv = cp_enqvar(kw_curplot)) {
938  tv->va_next = v;
939  v = tv;
940  }
941  if (tv = cp_enqvar(kw_curplottitle)) {
942  tv->va_next = v;
943  v = tv;
944  }
945  if (tv = cp_enqvar(kw_curplotname)) {
946  tv->va_next = v;
947  v = tv;
948  }
949  if (tv = cp_enqvar(kw_curplotdate)) {
950  tv->va_next = v;
951  v = tv;
952  }
953  if (tv = cp_enqvar(kw_display)) {
954  tv->va_next = v;
955  v = tv;
956  }
957  *v1 = v;
958  if (ft_curckt)
959  *v2 = va_copy(ft_curckt->ci_vars);
960  else
961  *v2 = NULL;
962  return;
963 }
char * kw_plots
Definition: options.c:401
struct plot * plot_cur
Definition: vectors.c:43
struct variable * pl_env
Definition: ftedata.h:71
struct variable * va_copy()
char * kw_curplot
Definition: options.c:342
char * kw_display
Definition: options.c:352
#define NULL
Definition: spdefs.h:121
struct circ * ft_curckt
Definition: main.c:184
struct variable * ci_vars
Definition: ftedefs.h:33
struct variable * cp_enqvar(char *word)
Definition: options.c:688
char * kw_curplottitle
Definition: options.c:344
char * kw_curplotname
Definition: options.c:343
char * kw_curplotdate
Definition: options.c:345
struct variable * va_next
Definition: cpstd.h:51
Definition: cpstd.h:41
def_fn ( _iv_cpdebug  )

Definition at line 56 of file options.c.

57 {
58  cp_debug = flag;
59 #ifndef CPDEBUG
60  if(flag)
61  fprintf(cp_err,
62  "Warning: program not compiled with cshpar debug messages\n");
63 #endif
64  return (US_OK);
65 }
#define US_OK
Definition: cpdefs.h:49
FILE * cp_err
Definition: help.c:101
bool cp_debug
Definition: cshpar.c:61
def_fn ( _iv_history  )

Definition at line 67 of file options.c.

68 {
69  if (!flag) return (US_OK);
70  if (v->va_type == VT_NUM)
71  cp_maxhistlength = v->va_num;
72  else if (v->va_type == VT_REAL)
73  cp_maxhistlength = v->va_real;
74  return (US_OK);
75 }
#define US_OK
Definition: cpdefs.h:49
#define VT_NUM
Definition: cpstd.h:61
int cp_maxhistlength
Definition: history.c:35
#define VT_REAL
Definition: cpstd.h:62
def_fn ( _iv_ignoreeof  )

Definition at line 77 of file options.c.

77 {cp_ignoreeof=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool cp_ignoreeof
Definition: variable.c:49
def_fn ( _iv_noclobber  )

Definition at line 78 of file options.c.

78 {cp_noclobber=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool cp_noclobber
Definition: variable.c:48
def_fn ( _iv_noglob  )

Definition at line 79 of file options.c.

79 {cp_noglob=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool cp_noglob
Definition: variable.c:46
def_fn ( _iv_nonomatch  )

Definition at line 80 of file options.c.

80 {cp_nonomatch=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool cp_nonomatch
Definition: variable.c:47
def_fn ( _iv_prompt  )

Definition at line 82 of file options.c.

83 {
84  if (!flag)
85  cp_promptstring = "";
86  else if (v->va_type == VT_STRING)
87  cp_promptstring = copy(v->va_string);
88  return (US_OK);
89 }
#define US_OK
Definition: cpdefs.h:49
char * copy()
char * cp_promptstring
Definition: lexical.c:52
#define VT_STRING
Definition: cpstd.h:63
def_fn ( _iv_acct  )

Definition at line 97 of file options.c.

97 {ft_acctprint=flag; return (US_OK);}
bool ft_acctprint
Definition: main.c:191
#define US_OK
Definition: cpdefs.h:49
def_fn ( _iv_curplot  )

Definition at line 99 of file options.c.

100 {
101  if (v->va_type == VT_STRING)
102  plot_setcur(v->va_string);
103  else if (flag)
104  fprintf(cp_err, "Error: plot name not a string\n");
105  return (US_DONTRECORD);
106 }
FILE * cp_err
Definition: help.c:101
#define VT_STRING
Definition: cpstd.h:63
void plot_setcur()
#define US_DONTRECORD
Definition: cpdefs.h:51
def_fn ( _iv_curplotdate  )

Definition at line 108 of file options.c.

109 {
110  if (plot_cur && (v->va_type == VT_STRING))
111  plot_cur->pl_date = copy(v->va_string);
112  else if (flag)
113  fprintf(cp_err,"%s %s\n",pltmsg,"date");
114  return (US_DONTRECORD);
115 }
char * pl_date
Definition: ftedata.h:63
struct plot * plot_cur
Definition: vectors.c:43
char * copy()
FILE * cp_err
Definition: help.c:101
static char * pltmsg
Definition: options.c:95
#define VT_STRING
Definition: cpstd.h:63
#define US_DONTRECORD
Definition: cpdefs.h:51
def_fn ( _iv_curplotname  )

Definition at line 117 of file options.c.

118 {
119  if (plot_cur && (v->va_type == VT_STRING))
120  plot_cur->pl_name = copy(v->va_string);
121  else if (flag)
122  fprintf(cp_err,"%s %s\n",pltmsg,"name");
123  return (US_DONTRECORD);
124 }
char * pl_name
Definition: ftedata.h:64
struct plot * plot_cur
Definition: vectors.c:43
char * copy()
FILE * cp_err
Definition: help.c:101
static char * pltmsg
Definition: options.c:95
#define VT_STRING
Definition: cpstd.h:63
#define US_DONTRECORD
Definition: cpdefs.h:51
def_fn ( _iv_curplottitle  )

Definition at line 126 of file options.c.

127 {
128  if (plot_cur && (v->va_type == VT_STRING))
129  plot_cur->pl_title = copy(v->va_string);
130  else
131  fprintf(cp_err,"%s %s\n",pltmsg,"title");
132  return (US_DONTRECORD);
133 }
char * pl_title
Definition: ftedata.h:62
struct plot * plot_cur
Definition: vectors.c:43
char * copy()
FILE * cp_err
Definition: help.c:101
static char * pltmsg
Definition: options.c:95
#define VT_STRING
Definition: cpstd.h:63
#define US_DONTRECORD
Definition: cpdefs.h:51
def_fn ( _iv_debug  )

Definition at line 160 of file options.c.

161 {
162  struct variable *tv;
163  char *dbgmsg = "Error: bad type for debug var\n";
164 
165  if (v->va_type == VT_BOOL) {
167  ft_grdb = ft_gidb = ft_controldb = flag;
168  }
169  else if (v->va_type == VT_LIST) {
170  for (tv = v->va_vlist; tv; tv = tv->va_next) {
171  if (v->va_type != VT_STRING)
172  fprintf(cp_err,dbgmsg);
173  else
174  setdb(tv->va_string);
175  }
176  }
177  else if (v->va_type == VT_STRING) {
178  setdb(v->va_string);
179  }
180  else if (flag)
181  fprintf(cp_err,dbgmsg);
182 #ifndef FTEDEBUG
183  if (flag)
184  fprintf(cp_err, "Warning: %s compiled without debug messages\n",
185  cp_program);
186 #endif
187  return (US_OK);
188 }
#define US_OK
Definition: cpdefs.h:49
#define VT_LIST
Definition: cpstd.h:64
bool ft_parsedb
Definition: options.c:24
FILE * cp_err
Definition: help.c:101
static void setdb(char *word)
Definition: options.c:136
char * cp_program
Definition: main.c:43
#define VT_STRING
Definition: cpstd.h:63
#define VT_BOOL
Definition: cpstd.h:60
bool ft_vecdb
Definition: options.c:25
bool ft_simdb
Definition: options.c:26
bool ft_controldb
Definition: options.c:30
struct variable * va_next
Definition: cpstd.h:51
bool cp_debug
Definition: cshpar.c:61
Definition: cpstd.h:41
bool ft_grdb
Definition: options.c:28
bool ft_gidb
Definition: options.c:29
bool ft_evdb
Definition: options.c:27
def_fn ( _iv_display  )

Definition at line 190 of file options.c.

190 { return (US_READONLY);}
#define US_READONLY
Definition: cpdefs.h:50
def_fn ( _iv_height  )

Definition at line 192 of file options.c.

193 {
194  if ((v->va_type == VT_BOOL) && (flag == false))
195  out_height = 0;
196  else if (v->va_type == VT_REAL)
197  out_height = v->va_real;
198  else if (v->va_type == VT_NUM)
199  out_height = v->va_num;
200  else
201  fprintf(cp_err, "Bad 'height' \"%s\"\n", v->va_name);
202  return (US_OK);
203 }
#define US_OK
Definition: cpdefs.h:49
FILE * cp_err
Definition: help.c:101
#define VT_NUM
Definition: cpstd.h:61
#define VT_BOOL
Definition: cpstd.h:60
int out_height
Definition: output.c:47
#define VT_REAL
Definition: cpstd.h:62
def_fn ( _iv_jjdphimax  )

Definition at line 205 of file options.c.

206 {
207  if (flag == false)
208  JJdphi = 2.07e-16;
209  else if (v->va_type == VT_REAL) {
210  if (v->va_real < M_PI/50 || v->va_real > M_PI/2)
211  goto errm;
212  JJdphi = v->va_real*3.3e-16; /* phi0 /2*pi */
213  }
214  else if (v->va_type == VT_NUM) {
215  if (v->va_num < M_PI/50 || v->va_num > M_PI/2)
216  goto errm;
217  JJdphi = v->va_num*3.3e-16; /* phi0 /2*pi */
218  }
219  else
220  fprintf(cp_err,huhmsg);
221  return (US_OK);
222 errm:
223  fprintf(cp_err, "Error: must be between pi/50 and pi/2\n");
224  return (US_OK);
225 }
#define US_OK
Definition: cpdefs.h:49
double JJdphi
Definition: options.c:21
#define M_PI
Definition: spice.h:132
FILE * cp_err
Definition: help.c:101
#define VT_NUM
Definition: cpstd.h:61
static char * huhmsg
Definition: options.c:94
#define VT_REAL
Definition: cpstd.h:62
def_fn ( _iv_list  )

Definition at line 227 of file options.c.

227 {ft_listprint=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool ft_listprint
Definition: main.c:188
def_fn ( _iv_nocc  )

Definition at line 228 of file options.c.

228 {cp_nocc=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool cp_nocc
Definition: complete.c:75
def_fn ( _iv_node  )

Definition at line 229 of file options.c.

229 {ft_nodesprint=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool ft_nodesprint
Definition: main.c:190
def_fn ( _iv_noiter  )

Definition at line 230 of file options.c.

230 {return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
def_fn ( _iv_nomoremode  )

Definition at line 231 of file options.c.

231 {out_moremode=!flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool out_moremode
Definition: output.c:44
def_fn ( _iv_nopage  )

Definition at line 232 of file options.c.

232 {ft_nopage=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool ft_nopage
Definition: options.c:23
def_fn ( _iv_numdgt  )

Definition at line 234 of file options.c.

235 {
236  if ((v->va_type == VT_BOOL) && (flag == false))
237  cp_numdgt = -1;
238  else if (v->va_type == VT_REAL)
239  cp_numdgt = v->va_real;
240  else if (v->va_type == VT_NUM)
241  cp_numdgt = v->va_num;
242  else
243  fprintf(cp_err,huhmsg);
244  return (US_OK);
245 }
#define US_OK
Definition: cpdefs.h:49
FILE * cp_err
Definition: help.c:101
#define VT_NUM
Definition: cpstd.h:61
#define VT_BOOL
Definition: cpstd.h:60
static char * huhmsg
Definition: options.c:94
#define VT_REAL
Definition: cpstd.h:62
int cp_numdgt
Definition: printnum.c:15
def_fn ( _iv_opts  )

Definition at line 247 of file options.c.

247 {ft_optsprint=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool ft_optsprint
Definition: main.c:189
def_fn ( _iv_plots  )

Definition at line 248 of file options.c.

248 {return (US_READONLY);}
#define US_READONLY
Definition: cpdefs.h:50
def_fn ( _iv_program  )

Definition at line 250 of file options.c.

251 {
252  if (!flag)
253  cp_program = "";
254  else if (v->va_type == VT_STRING)
255  cp_program = copy(v->va_string);
256  return (US_OK);
257 }
#define US_OK
Definition: cpdefs.h:49
char * copy()
char * cp_program
Definition: main.c:43
#define VT_STRING
Definition: cpstd.h:63
def_fn ( _iv_rawfile  )

Definition at line 259 of file options.c.

260 {
261  if (!flag)
262  ft_rawfile = "";
263  else if (v->va_type == VT_STRING)
264  ft_rawfile = copy(v->va_string);
265  return (US_OK);
266 }
#define US_OK
Definition: cpdefs.h:49
char * copy()
char * ft_rawfile
Definition: main.c:39
#define VT_STRING
Definition: cpstd.h:63
def_fn ( _iv_rawfileprec  )

Definition at line 268 of file options.c.

269 {
270  if ((v->va_type == VT_BOOL) && (flag == false))
271  raw_prec = -1;
272  else if (v->va_type == VT_REAL)
273  raw_prec = v->va_real;
274  else if (v->va_type == VT_NUM)
275  raw_prec = v->va_num;
276  else
277  fprintf(cp_err, "Bad 'rawfileprec' \"%s\"\n", v->va_name);
278  return (US_OK);
279 }
#define US_OK
Definition: cpdefs.h:49
FILE * cp_err
Definition: help.c:101
int raw_prec
Definition: rawfile.c:26
#define VT_NUM
Definition: cpstd.h:61
#define VT_BOOL
Definition: cpstd.h:60
#define VT_REAL
Definition: cpstd.h:62
def_fn ( _iv_strictnumparse  )

Definition at line 281 of file options.c.

281 {ft_strictnumparse=flag; return (US_OK);}
#define US_OK
Definition: cpdefs.h:49
bool ft_strictnumparse
Definition: numparse.c:15
def_fn ( _iv_units  )

Definition at line 283 of file options.c.

284 {
285  if (false && ((*v->va_string == 'd') ||
286  (*v->va_string == 'D')))
287  cx_degrees = true;
288  else
289  cx_degrees = false;
290  return (US_OK);
291 }
#define US_OK
Definition: cpdefs.h:49
bool cx_degrees
Definition: cmath1.c:30
def_fn ( _iv_unixcom  )

Definition at line 293 of file options.c.

294 {
295  char *s;
296 
297  cp_dounixcom = flag;
298  if (flag) {
299  s = getenv("PATH");
300  if (s)
301  cp_rehash(s, !cp_nocc);
302  else
303  fprintf(cp_err,
304  "Warning: no PATH in environment.\n");
305  }
306  else {
307  struct comm *c;
308  cp_ccrestart(false);
309  for (c = cp_coms; c->co_func; c++)
310  cp_addcomm(c->co_comname, c->co_cctypes[0],
311  c->co_cctypes[1], c->co_cctypes[2],
312  c->co_cctypes[3]);
313  }
314  return (US_OK);
315 }
#define US_OK
Definition: cpdefs.h:49
bool cp_dounixcom
Definition: front.c:123
Definition: cddefs.h:119
struct comm * cp_coms
Definition: main.c:163
Definition: cpdefs.h:20
char * getenv(char *c)
Definition: libfuncs.c:106
FILE * cp_err
Definition: help.c:101
static double c
Definition: vectors.c:16
void cp_ccrestart()
bool cp_nocc
Definition: complete.c:75
void cp_rehash()
void(* co_func)()
Definition: cpdefs.h:22
void cp_addcomm()
char * co_comname
Definition: cpdefs.h:21
long co_cctypes[4]
Definition: cpdefs.h:26
def_fn ( _iv_width  )

Definition at line 317 of file options.c.

318 {
319  if ((v->va_type == VT_BOOL) && (flag == false))
320  out_width = 0;
321  else if (v->va_type == VT_REAL)
322  out_width = v->va_real;
323  else if (v->va_type == VT_NUM)
324  out_width = v->va_num;
325  else
326  fprintf(cp_err, "Bad 'width' \"%s\"\n", v->va_name);
327  return (US_OK);
328 }
#define US_OK
Definition: cpdefs.h:49
int out_width
Definition: output.c:46
FILE * cp_err
Definition: help.c:101
#define VT_NUM
Definition: cpstd.h:61
#define VT_BOOL
Definition: cpstd.h:60
#define VT_REAL
Definition: cpstd.h:62
static struct variable* getlist ( )
static
static struct variable* getlist ( struct dvec d,
int  dim,
char **  x 
)
static

Definition at line 884 of file options.c.

889 {
890  struct variable *vv, *tv = NULL;
891  int i;
892 
893  for (i = d->v_dims[dim] - 1; i >= 0; i--) {
894  if (!tv)
895  tv = vv = alloc(struct variable);
896  else {
897  vv->va_next = alloc(struct variable);
898  vv = vv->va_next;
899  }
900  if (dim == d->v_numdims-1) {
901  if (isreal(d)) {
902  vv->va_real = *(*(double**)x);
903  *x += sizeof(double);
904  }
905  else {
906  vv->va_real = (*(complex**)x)->cx_real;
907  *x += sizeof(complex);
908  }
909  vv->va_type = VT_REAL;
910  }
911  else {
912  vv->va_vlist = getlist(d,dim+1,x);
913  vv->va_type = VT_LIST;
914  }
915  }
916  return (tv);
917 }
#define VT_LIST
Definition: cpstd.h:64
Definition: cpstd.h:29
static struct variable * getlist()
int v_dims[MAXDIMS]
Definition: ftedata.h:41
#define alloc(type)
Definition: cdmacs.h:21
char va_type
Definition: cpstd.h:42
#define NULL
Definition: spdefs.h:121
#define isreal(v)
Definition: ftedata.h:54
struct _complex complex
Definition: cpstd.h:33
#define VT_REAL
Definition: cpstd.h:62
int v_numdims
Definition: ftedata.h:40
struct variable * va_next
Definition: cpstd.h:51
Definition: cpstd.h:41
struct line* inp_getopts ( struct line deck)

Definition at line 969 of file options.c.

972 {
973  struct line *last, *opts = NULL, *dd, *next;
974 
975  last = deck;
976  for (dd = deck->li_next; dd; dd = next) {
977  next = dd->li_next;
978 
979  if (ciprefix(".opt", dd->li_line)) {
980  inp_casefix(dd->li_line);
981  last->li_next = next;
982  dd->li_next = opts;
983  opts = dd;
984  continue;
985  }
986  last = dd;
987  }
988 
989  return (opts);
990 }
void inp_casefix()
int ciprefix()
Definition: fteinp.h:14
#define NULL
Definition: spdefs.h:121
struct line * li_next
Definition: fteinp.h:18
static void setdb ( char *  word)
static

Definition at line 136 of file options.c.

139 {
140  if (eq(word,"async"))
141  ft_asyncdb = true;
142  else if (eq(word,"control"))
143  ft_controldb = true;
144  else if (eq(word,"cshpar"))
145  cp_debug = true;
146  else if (eq(word,"eval"))
147  ft_evdb = true;
148  else if (eq(word,"ginterface"))
149  ft_gidb = true;
150  else if (eq(word,"graf"))
151  ft_grdb = true;
152  else if (eq(word,"parser"))
153  ft_parsedb = true;
154  else if (eq(word,"siminterface"))
155  ft_simdb = true;
156  else if (eq(word,"vecdb"))
157  ft_vecdb = true;
158 }
#define eq(a, b)
Definition: misc.h:29
bool ft_parsedb
Definition: options.c:24
bool ft_asyncdb
Definition: options.c:31
bool ft_vecdb
Definition: options.c:25
bool ft_simdb
Definition: options.c:26
bool ft_controldb
Definition: options.c:30
bool cp_debug
Definition: cshpar.c:61
bool ft_grdb
Definition: options.c:28
bool ft_gidb
Definition: options.c:29
bool ft_evdb
Definition: options.c:27
static struct variable* vec2var ( )
static
static struct variable* vec2var ( struct dvec d,
int  lo,
int  hi 
)
static

Definition at line 834 of file options.c.

838 {
839  int i, sz, sn;
840  struct variable *vv, *tv = NULL;
841  char *x;
842 
843  sn = ((hi < lo) ? -1 : 1);
844  sz = d->v_length/d->v_dims[0];
845 
846  for (i = lo; ((sn == 1) ? (i <= hi) : (i >= hi)); i += sn) {
847  if (i >= d->v_dims[0])
848  continue;
849  if (!tv)
850  tv = vv = alloc(struct variable);
851  else {
852  vv->va_next = alloc(struct variable);
853  vv = vv->va_next;
854  }
855  if (d->v_numdims == 1) {
856  if (isreal(d))
857  vv->va_real = d->v_realdata[i];
858  else
859  vv->va_real = realpart(&d->v_compdata[i]);
860  vv->va_type = VT_REAL;
861  }
862  else {
863  if (isreal(d))
864  x = (char*)&d->v_realdata[i*sz];
865  else
866  x = (char*)&d->v_compdata[i*sz];
867  vv->va_type = VT_LIST;
868  vv->va_vlist = getlist(d,1,&x);
869  }
870  }
871  if (tv) {
872  if (lo == hi)
873  return (tv);
874  vv = alloc(struct variable);
875  vv->va_type = VT_LIST;
876  vv->va_vlist = tv;
877  return (vv);
878  }
879  return (NULL);
880 }
#define VT_LIST
Definition: cpstd.h:64
static struct variable * getlist()
int v_dims[MAXDIMS]
Definition: ftedata.h:41
#define alloc(type)
Definition: cdmacs.h:21
complex * v_compdata
Definition: ftedata.h:29
char va_type
Definition: cpstd.h:42
#define NULL
Definition: spdefs.h:121
#define isreal(v)
Definition: ftedata.h:54
#define VT_REAL
Definition: cpstd.h:62
int v_numdims
Definition: ftedata.h:40
int v_length
Definition: ftedata.h:34
double * v_realdata
Definition: ftedata.h:28
struct variable * va_next
Definition: cpstd.h:51
Definition: cpstd.h:41
#define realpart(cval)
Definition: cpstd.h:35

Variable Documentation

bool ft_asyncdb = false

Definition at line 31 of file options.c.

bool ft_controldb = false

Definition at line 30 of file options.c.

bool ft_evdb = false

Definition at line 27 of file options.c.

bool ft_gidb = false

Definition at line 29 of file options.c.

bool ft_grdb = false

Definition at line 28 of file options.c.

bool ft_nopage = false

Definition at line 23 of file options.c.

bool ft_parsedb = false

Definition at line 24 of file options.c.

bool ft_simdb = false

Definition at line 26 of file options.c.

bool ft_vecdb = false

Definition at line 25 of file options.c.

char* huhmsg = "Excuse me??\n"
static

Definition at line 94 of file options.c.

struct intvar int_vars[]
static

Definition at line 447 of file options.c.

void* internalvars
static

Definition at line 552 of file options.c.

double JJdphi = 2.07e-16

Definition at line 21 of file options.c.

char* kw_abstol = "abstol"

Definition at line 335 of file options.c.

char* kw_acct = "acct"

Definition at line 336 of file options.c.

char* kw_appendwrite = "appendwrite"

Definition at line 337 of file options.c.

char* kw_checkiterate = "checkiterate"

Definition at line 338 of file options.c.

char* kw_chgtol = "chgtol"

Definition at line 339 of file options.c.

char* kw_color = "color"

Definition at line 340 of file options.c.

char* kw_cpdebug = "cpdebug"

Definition at line 341 of file options.c.

char* kw_curplot = "curplot"

Definition at line 342 of file options.c.

char* kw_curplotdate = "curplotdate"

Definition at line 345 of file options.c.

char* kw_curplotname = "curplotname"

Definition at line 343 of file options.c.

char* kw_curplottitle = "curplottitle"

Definition at line 344 of file options.c.

char* kw_debug = "debug"

Definition at line 346 of file options.c.

char* kw_defad = "defad"

Definition at line 347 of file options.c.

char* kw_defas = "defas"

Definition at line 348 of file options.c.

char* kw_defl = "defl"

Definition at line 349 of file options.c.

char* kw_defw = "defw"

Definition at line 350 of file options.c.

char* kw_device = "device"

Definition at line 351 of file options.c.

char* kw_display = "display"

Definition at line 352 of file options.c.

char* kw_dontplot = "dontplot"

Definition at line 353 of file options.c.

char* kw_editor = "editor"

Definition at line 354 of file options.c.

char* kw_filetype = "filetype"

Definition at line 355 of file options.c.

char* kw_fourgridsize = "fourgridsize"

Definition at line 356 of file options.c.

char* kw_gmin = "gmin"

Definition at line 357 of file options.c.

char* kw_gridsize = "gridsize"

Definition at line 358 of file options.c.

char* kw_gridstyle = "gridstyle"

Definition at line 359 of file options.c.

char* kw_hcopydev = "hcopydev"

Definition at line 360 of file options.c.

char* kw_hcopydevtype = "hcopydevtype"

Definition at line 361 of file options.c.

char* kw_height = "height"

Definition at line 362 of file options.c.

char* kw_history = "history"

Definition at line 363 of file options.c.

char* kw_hitusertp = "hitusertp"

Definition at line 364 of file options.c.

char* kw_ignoreeof = "ignoreeof"

Definition at line 365 of file options.c.

char* kw_itl1 = "itl1"

Definition at line 366 of file options.c.

char* kw_itl2 = "itl2"

Definition at line 367 of file options.c.

char* kw_itl3 = "itl3"

Definition at line 368 of file options.c.

char* kw_itl4 = "itl4"

Definition at line 369 of file options.c.

char* kw_itl5 = "itl5"

Definition at line 370 of file options.c.

char* kw_jjdphimax = "jjdphimax"

Definition at line 371 of file options.c.

char* kw_level = "level"

Definition at line 372 of file options.c.

char* kw_list = "list"

Definition at line 373 of file options.c.

char* kw_maxwins = "maxwins"

Definition at line 374 of file options.c.

char* kw_modelcard = "modelcard"

Definition at line 375 of file options.c.

char* kw_mplot_cur = "mplot_cur"

Definition at line 376 of file options.c.

char* kw_nfreqs = "nfreqs"

Definition at line 377 of file options.c.

char* kw_noasciiplotvalue = "noasciiplotvalue"

Definition at line 378 of file options.c.

char* kw_noaskquit = "noaskquit"

Definition at line 379 of file options.c.

char* kw_nobjthack = "nobjthack"

Definition at line 380 of file options.c.

char* kw_nobreak = "nobreak"

Definition at line 381 of file options.c.

char* kw_nocc = "nocc"

Definition at line 382 of file options.c.

char* kw_noclobber = "noclobber"

Definition at line 383 of file options.c.

char* kw_node = "node"

Definition at line 384 of file options.c.

char* kw_noglob = "noglob"

Definition at line 385 of file options.c.

char* kw_nogrid = "nogrid"

Definition at line 386 of file options.c.

char* kw_noiter = "noiter"

Definition at line 387 of file options.c.

char* kw_nojjtp = "nojjtp"

Definition at line 388 of file options.c.

char* kw_nomoremode = "nomoremode"

Definition at line 389 of file options.c.

char* kw_nonomatch = "nonomatch"

Definition at line 390 of file options.c.

char* kw_nopage = "nopage"

Definition at line 391 of file options.c.

char* kw_noparse = "noparse"

Definition at line 392 of file options.c.

char* kw_noprintscale = "noprintscale"

Definition at line 393 of file options.c.

char* kw_nosort = "nosort"

Definition at line 394 of file options.c.

char* kw_nosubckt = "nosubckt"

Definition at line 395 of file options.c.

char* kw_nousertp = "nousertp"

Definition at line 396 of file options.c.

char* kw_numdgt = "numdgt"

Definition at line 397 of file options.c.

char* kw_opts = "opts"

Definition at line 398 of file options.c.

char* kw_pivrel = "pivrel"

Definition at line 399 of file options.c.

char* kw_pivtol = "pivtol"

Definition at line 400 of file options.c.

char* kw_plots = "plots"

Definition at line 401 of file options.c.

char* kw_plotstyle = "plotstyle"

Definition at line 402 of file options.c.

char* kw_pointchars = "pointchars"

Definition at line 403 of file options.c.

char* kw_polydegree = "polydegree"

Definition at line 404 of file options.c.

char* kw_polysteps = "polysteps"

Definition at line 405 of file options.c.

char* kw_printinfo = "printinfo"

Definition at line 406 of file options.c.

char* kw_program = "program"

Definition at line 407 of file options.c.

char* kw_prompt = "prompt"

Definition at line 408 of file options.c.

char* kw_rawfile = "rawfile"

Definition at line 409 of file options.c.

char* kw_rawfileprec = "rawfileprec"

Definition at line 410 of file options.c.

char* kw_reltol = "reltol"

Definition at line 411 of file options.c.

char* kw_renumber = "renumber"

Definition at line 412 of file options.c.

char* kw_rhost = "rhost"

Definition at line 413 of file options.c.

char* kw_rprogram = "rprogram"

Definition at line 414 of file options.c.

char* kw_scedfont = "scedfont"

Definition at line 415 of file options.c.

char* kw_slowplot = "slowplot"

Definition at line 416 of file options.c.

char* kw_sourcepath = "sourcepath"

Definition at line 417 of file options.c.

char* kw_spicepath = "spicepath"

Definition at line 418 of file options.c.

char* kw_strictnumparse = "strictnumparse"

Definition at line 419 of file options.c.

char* kw_subend = "subend"

Definition at line 420 of file options.c.

char* kw_subinvoke = "subinvoke"

Definition at line 421 of file options.c.

char* kw_substart = "substart"

Definition at line 422 of file options.c.

char* kw_term = "term"

Definition at line 423 of file options.c.

char* kw_ticmarks = "ticmarks"

Definition at line 424 of file options.c.

char* kw_tnom = "tnom"

Definition at line 425 of file options.c.

char* kw_trtol = "trtol"

Definition at line 426 of file options.c.

char* kw_units = "units"

Definition at line 427 of file options.c.

char* kw_unixcom = "unixcom"

Definition at line 428 of file options.c.

char* kw_vntol = "vntol"

Definition at line 429 of file options.c.

char* kw_width = "width"

Definition at line 430 of file options.c.

char* kw_wpboxh = "wpboxh"

Definition at line 431 of file options.c.

char* kw_wpboxw = "wpboxw"

Definition at line 432 of file options.c.

char* kw_xfont = "xfont"

Definition at line 435 of file options.c.

char* kw_xglinewidth = "xglinewidth"

Definition at line 433 of file options.c.

char* kw_xgmarkers = "xgmarkers"

Definition at line 434 of file options.c.

char* pltmsg = "Error: can't set plot"
static

Definition at line 95 of file options.c.