|
|
1.1 root 1: #include "e.h"
2:
3: int dbg; /* debugging print if non-zero */
4: int lp[200]; /* stack for things like piles and matrices */
5: int ct; /* pointer to lp */
6: int used[100]; /* available registers */
7: int ps; /* default init point size */
8: int deltaps = 3; /* default change in ps */
9: int dps_set = 0; /* 1 => -p option used */
10: int gsize = 10; /* default initial point size */
11: int ft = '2';
12: Font ftstack[10] = { '2', "2" }; /* bottom is global font */
13: Font *ftp = ftstack;
14: int szstack[10]; /* non-zero if absolute size set at this level */
15: int nszstack = 0;
16: int display = 0; /* 1=>display, 0=>.EQ/.EN */
17:
18: #ifdef APS
19: char *typesetter = "aps"; /* name for -T */
20: int ttype = DEVAPS; /* type of typesetter today */
21: int res = 723; /* resolution of typesetter; dflt = 202 */
22: int minsize = 5; /* min size it can handle; ditto */
23: #else
24: char *typesetter = "202";
25: int ttype = DEV202; /* type of typesetter today */
26: int res = 972; /* resolution of typesetter; dflt = 202 */
27: int minsize = 5; /* min size it can handle; ditto */
28: #endif
29:
30: int synerr; /* 1 if syntax err in this eqn */
31: float eht[100]; /* height in ems at gsize */
32: float ebase[100]; /* base: where one enters above bottom */
33: int eps[100]; /* unused right now */
34: int lfont[100];
35: int rfont[100];
36: int eqnreg; /* register where final string appears */
37: float eqnht; /* final height of equation */
38: int lefteq = '\0'; /* left in-line delimiter */
39: int righteq = '\0'; /* right in-line delimiter */
40: int markline = 0; /* 1 if this EQ/EN contains mark; 2 if lineup */
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.