1 /*-
2  * %sccs.include.proprietary.c%
3  *
4  *	@(#)tabnec25-t.c	4.3 (Berkeley) 04/18/91
5  */
6 
7 #define INCH 240
8 /*
9 NEC Spinwriter 7725 and 5525 (Diablo replacements)
10 with Technical Math/Times Roman thimble
11 12 chars/inch, 6 lines/inch
12 nroff driving tables
13 width and code tables
14 */
15 
16 struct {
17 	int bset;
18 	int breset;
19 	int Hor;
20 	int Vert;
21 	int Newline;
22 	int Char;
23 	int Em;
24 	int Halfline;
25 	int Adj;
26 	char *twinit;
27 	char *twrest;
28 	char *twnl;
29 	char *hlr;
30 	char *hlf;
31 	char *flr;
32 	char *bdon;
33 	char *bdoff;
34 	char *ploton;
35 	char *plotoff;
36 	char *up;
37 	char *down;
38 	char *right;
39 	char *left;
40 	char *codetab[256-32];
41 	int zzz;
42 	} t = {
43 /*bset*/	0,
44 /*breset*/	0177420,
45 /*Hor*/		INCH/60,
46 /*Vert*/	INCH/48,
47 /*Newline*/	INCH/6,
48 /*Char*/	INCH/12,
49 /*Em*/		INCH/12,
50 /*Halfline*/	INCH/12,
51 /*Adj*/		INCH/12,
52 /*twinit*/	"\0334\033\037\013",
53 /*twrest*/	"\0334\033\037\015",
54 /*twnl*/	"\015\n",
55 /*hlr*/		"\033D",
56 /*hlf*/		"\033U",
57 /*flr*/		"\033\n",
58 /*bdon*/	"",
59 /*bdoff*/	"",
60 /*ploton*/	"\0333",
61 /*plotoff*/	"\0334",
62 /*up*/		"\033\n",
63 /*down*/	"\n",
64 /*right*/	" ",
65 /*left*/	"\b",
66 /*codetab*/
67 "\001 ",	/*space*/
68 "\001!",	/*!*/
69 "\002\200\047\202\047",	/*"*/
70 "\001#",	/*#*/
71 "\001\200|\341S\301",	/*$*/
72 "\001%",	/*%*/
73 "\000",	/*&*/
74 "\001'",	/*' close*/
75 "\001(",	/*(*/
76 "\001)",	/*)*/
77 "\001*",	/***/
78 "\001+",	/*+*/
79 "\001,",	/*,*/
80 "\001-",	/*- hyphen*/
81 "\001.",	/*.*/
82 "\001/",	/*/*/
83 "\2010",	/*0*/
84 "\2011",	/*1*/
85 "\2012",	/*2*/
86 "\2013",	/*3*/
87 "\2014",	/*4*/
88 "\2015",	/*5*/
89 "\2016",	/*6*/
90 "\2017",	/*7*/
91 "\2018",	/*8*/
92 "\2019",	/*9*/
93 "\001:",	/*:*/
94 "\001:\b,",	/*;*/
95 "\001<",	/*<*/
96 "\001=",	/*=*/
97 "\001>",	/*>*/
98 "\001?",	/*?*/
99 "\001@",	/*@*/
100 "\201A",	/*A*/
101 "\201B",	/*B*/
102 "\201C",	/*C*/
103 "\201D",	/*D*/
104 "\201E",	/*E*/
105 "\201F",	/*F*/
106 "\201G",	/*G*/
107 "\201H",	/*H*/
108 "\201I",	/*I*/
109 "\201J",	/*J*/
110 "\201K",	/*K*/
111 "\201L",	/*L*/
112 "\201M",	/*M*/
113 "\201N",	/*N*/
114 "\201O",	/*O*/
115 "\201P",	/*P*/
116 "\201Q",	/*Q*/
117 "\201R",	/*R*/
118 "\201S",	/*S*/
119 "\201T",	/*T*/
120 "\201U",	/*U*/
121 "\201V",	/*V*/
122 "\201W",	/*W*/
123 "\201X",	/*X*/
124 "\201Y",	/*Y*/
125 "\201Z",	/*Z*/
126 "\001[",	/*[*/
127 "\001\016\112\017",	/*\*/
128 "\001]",	/*]*/
129 "\001\344.\201\341.\201\301.\242\304",	/*^*/
130 "\001_",	/*_ dash*/
131 "\001'",	/*` open*/
132 "\201a",	/*a*/
133 "\201b",	/*b*/
134 "\201c",	/*c*/
135 "\201d",	/*d*/
136 "\201e",	/*e*/
137 "\201f",	/*f*/
138 "\201g",	/*g*/
139 "\201h",	/*h*/
140 "\201i",	/*i*/
141 "\201j",	/*j*/
142 "\201k",	/*k*/
143 "\201l",	/*l*/
144 "\201m",	/*m*/
145 "\201n",	/*n*/
146 "\201o",	/*o*/
147 "\201p",	/*p*/
148 "\201q",	/*q*/
149 "\201r",	/*r*/
150 "\201s",	/*s*/
151 "\201t",	/*t*/
152 "\201u",	/*u*/
153 "\201v",	/*v*/
154 "\201w",	/*w*/
155 "\201x",	/*x*/
156 "\201y",	/*y*/
157 "\201z",	/*z*/
158 "\001{",	/*{*/
159 "\001|",	/*|*/
160 "\001}",	/*}*/
161 "\001\343\016\074\017\303",	/*~*/
162 "\000\0",	/*narrow sp*/
163 "\001-",	/*hyphen*/
164 "\001O\b+",	/*bullet*/
165 "\002[]",	/*square*/
166 "\001-",	/*3/4 em*/
167 "\001_",	/*rule*/
168 "\2031/4",	/*1/4*/
169 "\2031/2",	/*1/2*/
170 "\2033/4",	/*3/4*/
171 "\001-",	/*minus*/
172 "\202fi",	/*fi*/
173 "\202fl",	/*fl*/
174 "\202ff",	/*ff*/
175 "\203ffi",	/*ffi*/
176 "\203ffl",	/*ffl*/
177 "\001\343o\303",	/*degree*/
178 "\001\342-\302|",	/*dagger*/
179 "\001\342s\302s",	/*section*/
180 "\001'",	/*foot mark*/
181 "\001'",	/*acute accent*/
182 "\001\345.\201\301.\201\304",	/*grave accent*/
183 "\001_",	/*underrule*/
184 "\001/",	/*slash (longer)*/
185 "\000\0",	/*half narrow space*/
186 "\001 ",	/*unpaddable space*/
187 "\001\016\123\017",	/*alpha*/
188 "\001\046",	/*beta*/
189 "\001\016\107\017",	/*gamma*/
190 "\001\016\113\017",	/*delta*/
191 "\001\016\116\017",	/*epsilon*/
192 "\001\200c\201\301,\241\343<\302",	/*zeta*/
193 "\001\016\114\017",	/*eta*/
194 "\001O\b-",	/*theta*/
195 "\001i",	/*iota*/
196 "\001k",	/*kappa*/
197 "\001\016\102\017",	/*lambda*/
198 "\001\073",	/*mu*/
199 "\001\241(\203/\242",	/*nu*/
200 "\001\016\104\017",	/*xi*/
201 "\001o",	/*omicron*/
202 "\001\042",	/*pi*/
203 "\001\016\106\017",	/*rho*/
204 "\001\016\126\017",	/*sigma*/
205 "\001\016\103\017",	/*tau*/
206 "\001v",	/*upsilon*/
207 "\001o\b/",	/*phi*/
208 "\001x",	/*chi*/
209 "\001\200/-\301\202'\244'\202\341",	/*psi*/
210 "\001\016\130\017",	/*omega*/
211 "\001\242|\202\344-\304\342\202'\242\302",	/*Gamma*/
212 "\001\016\101\017",	/*Delta*/
213 "\001O\b=",	/*Theta*/
214 "\002/\242\016\112\017\202",	/*Lambda*/
215 "\001\341_\346_\307\341-\301",	/*Xi*/
216 "\001\242[]\204[]\242\343-\303",	/*Pi*/
217 "\001\341>\301\302-\346-\304\241",	/*Sigma*/
218 "\000\0",	/**/
219 "\001Y",	/*Upsilon*/
220 "\001o\b[\b]",	/*Phi*/
221 "\001\200[]-\301\202'\244'\202\341",	/*Psi*/
222 "\001\134",	/*Omega*/
223 "\001\301-\341\202\303'\202\343/\244",	/*square root*/
224 "\001\341s\301\202'\242",	/*terminal sigma*/
225 "\001\343-\303",	/*root en*/
226 "\001>\b_",	/*>=*/
227 "\001<\b_",	/*<=*/
228 "\001=\b_",	/*identically equal*/
229 "\001-",	/*equation minus*/
230 "\001=\b\344\016\074\017\304",	/*approx =*/
231 "\001\016\074\017",	/*approximates*/
232 "\001=\b/",	/*not equal*/
233 "\002 \245-\204->\201",	/*right arrow*/
234 "\002 \245<-\204-\201",	/*left arrow*/
235 "\001\016\132\017",	/*up arrow*/
236 "\001\016\136\017",	/*down arrow*/
237 "\001=",	/*equation equal*/
238 "\001x",	/*multiply*/
239 "\001\200.-\345.\305",	/*divide*/
240 "\001+\b_",	/*plus-minus*/
241 "\001U",	/*cup (union)*/
242 "\001\343\140\203\136\243\303",	/*cap (intersection)*/
243 "\002 \242\245\341(\301\341\204_\346_\203\307",	/*subset of*/
244 "\002 \243\341_\346_\307\204\341)\301\241",	/*superset of*/
245 "\002 \242\245\341(\301\341\204_\346_\307_\203",	/*improper subset of*/
246 "\002 \243_\341_\346_\307\341\204)\301\241",	/*improper superset of*/
247 "\001\016\137\017",	/*infinity*/
248 "\001\016\115\017",	/*partial derivative*/
249 "\001\200\016\112\017\203/\243\344\201-\201-\304\242",	/*gradient*/
250 "\001\200-\202\343,\303\242",	/*not*/
251 "\001\044",	/*integral sign*/
252 "\001\016\135\017",	/*proportional to*/
253 "\0010\b/",	/*empty set*/
254 "\001\200(\201-\241",	/*member of*/
255 "\001+",	/*equation plus*/
256 "\003(r)",	/*registered*/
257 "\003(c)",	/*copyright*/
258 "\001|",	/*box rule */
259 "\001c\b/",	/*cent sign*/
260 "\001\341=\301|",	/*dbl dagger*/
261 "\002*>",	/*right hand*/
262 "\002<*",	/*left hand*/
263 "\001*",	/*math * */
264 "\003(b)",	/*bell system sign*/
265 "\001|",	/*or (was star)*/
266 "\001O",	/*circle*/
267 "\001|",	/*left top (of big curly)*/
268 "\001|",	/*left bottom*/
269 "\001|",	/*right top*/
270 "\001|",	/*right bot*/
271 "\001|",	/*left center of big curly bracket*/
272 "\001|",	/*right center of big curly bracket*/
273 "\001|",	/*bold vertical*/
274 "\001\201\016\076\017\241",	/*left floor (left bot of big sq bract)*/
275 "\001\241\016\100\017\201",	/*right floor (right bot ")*/
276 "\001\201\140\241",	/*left ceiling (lt of ")*/
277 "\001\241\136\201"};	/*right ceiling (rt of ")*/
278