xref: /original-bsd/old/roff/troff/tab3.c (revision c7de680c)
1 #ifndef lint
2 static char sccsid[] = "@(#)tab3.c	4.1 06/07/82";
3 #endif lint
4 
5 #define BYTE 8
6 #define PAIR(A,B) (A|(B<<BYTE))
7 /*
8 character name and code tables
9 default width tables
10 modified for BTL special font version 4
11 and Commercial II
12 */
13 
14 int chtab [] = {
15 PAIR('h','y'), 0200,	/*hyphen*/
16 PAIR('b','u'), 0201,	/*bullet*/
17 PAIR('s','q'), 0202,	/*square*/
18 PAIR('e','m'), 0203,	/*3/4em*/
19 PAIR('r','u'), 0204,	/*rule*/
20 PAIR('1','4'), 0205,	/*1/4*/
21 PAIR('1','2'), 0206,	/*1/2*/
22 PAIR('3','4'), 0207,	/*3/4*/
23 PAIR('m','i'), 0302,	/*equation minus*/
24 PAIR('f','i'), 0211,	/*fi*/
25 PAIR('f','l'), 0212,	/*fl*/
26 PAIR('f','f'), 0213,	/*ff*/
27 PAIR('F','i'), 0214,	/*ffi*/
28 PAIR('F','l'), 0215,	/*ffl*/
29 PAIR('d','e'), 0216,	/*degree*/
30 PAIR('d','g'), 0217,	/*dagger*/
31 PAIR('s','c'), 0220,	/*section*/
32 PAIR('f','m'), 0221,	/*foot mark*/
33 PAIR('a','a'), 0222,	/*acute accent*/
34 PAIR('g','a'), 0223,	/*grave accent*/
35 PAIR('u','l'), 0224,	/*underrule*/
36 PAIR('s','l'), 0225,	/*slash (longer)*/
37 PAIR('*','a'), 0230,	/*alpha*/
38 PAIR('*','b'), 0231,	/*beta*/
39 PAIR('*','g'), 0232,	/*gamma*/
40 PAIR('*','d'), 0233,	/*delta*/
41 PAIR('*','e'), 0234,	/*epsilon*/
42 PAIR('*','z'), 0235,	/*zeta*/
43 PAIR('*','y'), 0236,	/*eta*/
44 PAIR('*','h'), 0237,	/*theta*/
45 PAIR('*','i'), 0240,	/*iota*/
46 PAIR('*','k'), 0241,	/*kappa*/
47 PAIR('*','l'), 0242,	/*lambda*/
48 PAIR('*','m'), 0243,	/*mu*/
49 PAIR('*','n'), 0244,	/*nu*/
50 PAIR('*','c'), 0245,	/*xi*/
51 PAIR('*','o'), 0246,	/*omicron*/
52 PAIR('*','p'), 0247,	/*pi*/
53 PAIR('*','r'), 0250,	/*rho*/
54 PAIR('*','s'), 0251,	/*sigma*/
55 PAIR('*','t'), 0252,	/*tau*/
56 PAIR('*','u'), 0253,	/*upsilon*/
57 PAIR('*','f'), 0254,	/*phi*/
58 PAIR('*','x'), 0255,	/*chi*/
59 PAIR('*','q'), 0256,	/*psi*/
60 PAIR('*','w'), 0257,	/*omega*/
61 PAIR('*','A'), 0101,	/*Alpha*/
62 PAIR('*','B'), 0102,	/*Beta*/
63 PAIR('*','G'), 0260,	/*Gamma*/
64 PAIR('*','D'), 0261,	/*Delta*/
65 PAIR('*','E'), 0105,	/*Epsilon*/
66 PAIR('*','Z'), 0132,	/*Zeta*/
67 PAIR('*','Y'), 0110,	/*Eta*/
68 PAIR('*','H'), 0262,	/*Theta*/
69 PAIR('*','I'), 0111,	/*Iota*/
70 PAIR('*','K'), 0113,	/*Kappa*/
71 PAIR('*','L'), 0263,	/*Lambda*/
72 PAIR('*','M'), 0115,	/*Mu*/
73 PAIR('*','N'), 0116,	/*Nu*/
74 PAIR('*','C'), 0264,	/*Xi*/
75 PAIR('*','O'), 0117,	/*Omicron*/
76 PAIR('*','P'), 0265,	/*Pi*/
77 PAIR('*','R'), 0120,	/*Rho*/
78 PAIR('*','S'), 0266,	/*Sigma*/
79 PAIR('*','T'), 0124,	/*Tau*/
80 PAIR('*','U'), 0270,	/*Upsilon*/
81 PAIR('*','F'), 0271,	/*Phi*/
82 PAIR('*','X'), 0130,	/*Chi*/
83 PAIR('*','Q'), 0272,	/*Psi*/
84 PAIR('*','W'), 0273,	/*Omega*/
85 PAIR('s','r'), 0274,	/*square root*/
86 PAIR('t','s'), 0275,	/*terminal sigma*/
87 PAIR('r','n'), 0276,	/*root en*/
88 PAIR('>','='), 0277,	/*>=*/
89 PAIR('<','='), 0300,	/*<=*/
90 PAIR('=','='), 0301,	/*identically equal*/
91 PAIR('~','='), 0303,	/*approx =*/
92 PAIR('a','p'), 0304,	/*approximates*/
93 PAIR('!','='), 0305,	/*not equal*/
94 PAIR('-','>'), 0306,	/*right arrow*/
95 PAIR('<','-'), 0307,	/*left arrow*/
96 PAIR('u','a'), 0310,	/*up arrow*/
97 PAIR('d','a'), 0311,	/*down arrow*/
98 PAIR('e','q'), 0312,	/*equation equal*/
99 PAIR('m','u'), 0313,	/*multiply*/
100 PAIR('d','i'), 0314,	/*divide*/
101 PAIR('+','-'), 0315,	/*plus-minus*/
102 PAIR('c','u'), 0316,	/*cup (union)*/
103 PAIR('c','a'), 0317,	/*cap (intersection)*/
104 PAIR('s','b'), 0320,	/*subset of*/
105 PAIR('s','p'), 0321,	/*superset of*/
106 PAIR('i','b'), 0322,	/*improper subset*/
107 PAIR('i','p'), 0323,	/*  " superset*/
108 PAIR('i','f'), 0324,	/*infinity*/
109 PAIR('p','d'), 0325,	/*partial derivative*/
110 PAIR('g','r'), 0326,	/*gradient*/
111 PAIR('n','o'), 0327,	/*not*/
112 PAIR('i','s'), 0330,	/*integral sign*/
113 PAIR('p','t'), 0331,	/*proportional to*/
114 PAIR('e','s'), 0332,	/*empty set*/
115 PAIR('m','o'), 0333,	/*member of*/
116 PAIR('p','l'), 0334,	/*equation plus*/
117 PAIR('r','g'), 0335,	/*registered*/
118 PAIR('c','o'), 0336,	/*copyright*/
119 PAIR('b','r'), 0337,	/*box vert rule*/
120 PAIR('c','t'), 0340,	/*cent sign*/
121 PAIR('d','d'), 0341,	/*dbl dagger*/
122 PAIR('r','h'), 0342,	/*right hand*/
123 PAIR('l','h'), 0343,	/*left hand*/
124 PAIR('*','*'), 0344,	/*math * */
125 PAIR('b','s'), 0345,	/*bell system sign*/
126 PAIR('o','r'), 0346,	/*or*/
127 PAIR('c','i'), 0347,	/*circle*/
128 PAIR('l','t'), 0350,	/*left top (of big curly)*/
129 PAIR('l','b'), 0351,	/*left bottom*/
130 PAIR('r','t'), 0352,	/*right top*/
131 PAIR('r','b'), 0353,	/*right bot*/
132 PAIR('l','k'), 0354,	/*left center of big curly bracket*/
133 PAIR('r','k'), 0355,	/*right center of big curly bracket*/
134 PAIR('b','v'), 0356,	/*bold vertical*/
135 PAIR('l','f'), 0357,	/*left floor (left bot of big sq bract)*/
136 PAIR('r','f'), 0360,	/*right floor (rb of ")*/
137 PAIR('l','c'), 0361,	/*left ceiling (lt of ")*/
138 PAIR('r','c'), 0362,	/*right ceiling (rt of ")*/
139 0,0};
140 
141 char codetab[256-32] = {	/*cat codes*/
142 00,	/*space*/
143 0145,	/*!*/
144 0230,	/*"*/
145 0337,	/*#*/
146 0155,	/*$*/
147 053,	/*%*/
148 050,	/*&*/
149 032,	/*' close*/
150 0132,	/*(*/
151 0133,	/*)*/
152 0122,	/***/
153 0143,	/*+*/
154 047,	/*,*/
155 040,	/*- hyphen*/
156 044,	/*.*/
157 043,	/*/*/
158 0110,	/*0*/
159 0111,	/*1*/
160 0112,	/*2*/
161 0113,	/*3*/
162 0114,	/*4*/
163 0115,	/*5*/
164 0116,	/*6*/
165 0117,	/*7*/
166 0120,	/*8*/
167 0121,	/*9*/
168 0142,	/*:*/
169 023,	/*;*/
170 0303,	/*<*/
171 0140,	/*=*/
172 0301,	/*>*/
173 0147,	/*?*/
174 0222,	/*@*/
175 0103,	/*A*/
176 075,	/*B*/
177 070,	/*C*/
178 074,	/*D*/
179 072,	/*E*/
180 0101,	/*F*/
181 065,	/*G*/
182 060,	/*H*/
183 066,	/*I*/
184 0105,	/*J*/
185 0107,	/*K*/
186 063,	/*L*/
187 062,	/*M*/
188 061,	/*N*/
189 057,	/*O*/
190 067,	/*P*/
191 055,	/*Q*/
192 064,	/*R*/
193 076,	/*S*/
194 056,	/*T*/
195 0106,	/*U*/
196 071,	/*V*/
197 0104,	/*W*/
198 0102,	/*X*/
199 077,	/*Y*/
200 073,	/*Z*/
201 0134,	/*[*/
202 0241,	/*\*/
203 0135,	/*]*/
204 0336,	/*^*/
205 0240,	/*_*/
206 030,	/*` open*/
207 025,	/*a*/
208 012,	/*b*/
209 027,	/*c*/
210 011,	/*d*/
211 031,	/*e*/
212 014,	/*f*/
213 045,	/*g*/
214 001,	/*h*/
215 006,	/*i*/
216 015,	/*j*/
217 017,	/*k*/
218 005,	/*l*/
219 004,	/*m*/
220 003,	/*n*/
221 033,	/*o*/
222 021,	/*p*/
223 042,	/*q*/
224 035,	/*r*/
225 010,	/*s*/
226 002,	/*t*/
227 016,	/*u*/
228 037,	/*v*/
229 041,	/*w*/
230 013,	/*x*/
231 051,	/*y*/
232 007,	/*z*/
233 0332,	/*{*/
234 0151,	/*|*/
235 0333,	/*}*/
236 0342,	/*~*/
237 00,	/*narrow space*/
238 040,	/*hyphen*/
239 0146,	/*bullet*/
240 0154,	/*square*/
241 022,	/*3/4 em*/
242 026,	/*rule*/
243 034,	/*1/4*/
244 036,	/*1/2*/
245 046,	/*3/4*/
246 0123,	/*minus*/
247 0124,	/*fi*/
248 0125,	/*fl*/
249 0126,	/*ff*/
250 0131,	/*ffi*/
251 0130,	/*ffl*/
252 0136,	/*degree*/
253 0137,	/*dagger*/
254 0355,	/*section*/
255 0150,	/*foot mark*/
256 0334,	/*acute accent*/
257 0335,	/*grave accent*/
258 0240,	/*underrule*/
259 0304,	/*slash (longer)*/
260 00,	/*half nar sp*/
261 00,	/**/
262 0225,	/*alpha*/
263 0212,	/*beta*/
264 0245,	/*gamma*/
265 0211,	/*delta*/
266 0231,	/*epsilon*/
267 0207,	/*zeta*/
268 0214,	/*eta*/
269 0202,	/*theta*/
270 0206,	/*iota*/
271 0217,	/*kappa*/
272 0205,	/*lambda*/
273 0204,	/*mu*/
274 0203,	/*nu*/
275 0213,	/*xi*/
276 0233,	/*omicron*/
277 0221,	/*pi*/
278 0235,	/*rho*/
279 0210,	/*sigma*/
280 0237,	/*tau*/
281 0216,	/*upsilon*/
282 0215,	/*phi*/
283 0227,	/*chi*/
284 0201,	/*psi*/
285 0251,	/*omega*/
286 0265,	/*Gamma*/
287 0274,	/*Delta*/
288 0256,	/*Theta*/
289 0263,	/*Lambda*/
290 0302,	/*Xi*/
291 0267,	/*Pi*/
292 0276,	/*Sigma*/
293 00,	/**/
294 0306,	/*Upsilon*/
295 0255,	/*Phi*/
296 0242,	/*Psi*/
297 0257,	/*Omega*/
298 0275,	/*square root*/
299 0262,	/*terminal sigma (was root em)*/
300 0261,	/*root en*/
301 0327,	/*>=*/
302 0326,	/*<=*/
303 0330,	/*identically equal*/
304 0264,	/*equation minus*/
305 0277,	/*approx =*/
306 0272,	/*approximates*/
307 0331,	/*not equal*/
308 0354,	/*right arrow*/
309 0234,	/*left arrow*/
310 0236,	/*up arrow*/
311 0223,	/*down arrow*/
312 0232,	/*equation equal*/
313 0323,	/*multiply*/
314 0324,	/*divide*/
315 0325,	/*plus-minus*/
316 0260,	/*cup (union)*/
317 0305,	/*cap (intersection)*/
318 0270,	/*subset of*/
319 0271,	/*superset of*/
320 0350,	/*improper subset*/
321 0246,	/* improper superset*/
322 0244,	/*infinity*/
323 0273,	/*partial derivative*/
324 0253,	/*gradient*/
325 0307,	/*not*/
326 0266,	/*integral sign*/
327 0247,	/*proportional to*/
328 0343,	/*empty set*/
329 0341,	/*member of*/
330 0353,	/*equation plus*/
331 0141,	/*registered*/
332 0153,	/*copyright*/
333 0346,	/*box rule (was parallel sign)*/
334 0127,	/*cent sign*/
335 0345,	/*dbl dagger*/
336 0250,	/*right hand*/
337 0340,	/*left hand*/
338 0347,	/*math * */
339 0243,	/*bell system sign*/
340 0226,	/*or (was star)*/
341 0351,	/*circle*/
342 0311,	/*left top (of big curly)*/
343 0314,	/*left bottom*/
344 0315,	/*right top*/
345 0317,	/*right bot*/
346 0313,	/*left center of big curly bracket*/
347 0316,	/*right center of big curly bracket*/
348 0312,	/*bold vertical*/
349 0321,	/*left floor (left bot of big sq bract)*/
350 0320,	/*right floor (rb of ")*/
351 0322,	/*left ceiling (lt of ")*/
352 0310};	/*right ceiling (rt of ")*/
353 
354 /*modified for Commercial II*/
355 char W1[256-32] = {	/*Times Roman widths*/
356 12,	 /*space*/
357 12,	 /*!*/
358 0,	 /*"*/
359 0,	 /*#*/
360 19,	 /*$*/
361 29,	 /*%*/
362 28,	 /*&*/
363 12,	 /*' close*/
364 16,	 /*(*/
365 16,	 /*)*/
366 16,	 /***/
367 36,	 /*+*/
368 12,	 /*,*/
369 13,	 /*- hyphen*/
370 10,	 /*.*/
371 17,	 /*/*/
372 19+0200, /*0*/
373 19+0200, /*1*/
374 19+0200, /*2*/
375 19+0200, /*3*/
376 19+0200, /*4*/
377 19+0200, /*5*/
378 19+0200, /*6*/
379 19+0200, /*7*/
380 19+0200, /*8*/
381 19+0200, /*9*/
382 10,	 /*:*/
383 12,	 /*;*/
384 0,	 /*<*/
385 36,	 /*=*/
386 0,	 /*>*/
387 20,	 /*?*/
388 0,	 /*@*/
389 29+0200, /*A*/
390 23+0200, /*B*/
391 26+0200, /*C*/
392 30+0200, /*D*/
393 24+0200, /*E*/
394 23+0200, /*F*/
395 30+0200, /*G*/
396 29+0200, /*H*/
397 13+0200, /*I*/
398 16+0200, /*J*/
399 28+0200, /*K*/
400 24+0200, /*L*/
401 35+0200, /*M*/
402 29+0200, /*N*/
403 27+0200, /*O*/
404 22+0200, /*P*/
405 27+0300, /*Q*/
406 27+0200, /*R*/
407 20+0200, /*S*/
408 24+0200, /*T*/
409 29+0200, /*U*/
410 27+0200, /*V*/
411 36+0200, /*W*/
412 28+0200, /*X*/
413 27+0200, /*Y*/
414 23+0200, /*Z*/
415 14,	 /*[*/
416 0,	 /*\*/
417 14,	 /*]*/
418 0,	 /*^*/
419 0,	 /*_*/
420 12,	 /*` open*/
421 17,	 /*a*/
422 20+0200, /*b*/
423 16,	 /*c*/
424 20+0200, /*d*/
425 18,	 /*e*/
426 13+0200, /*f*/
427 18+0100, /*g*/
428 21+0200, /*h*/
429 10+0200, /*i*/
430 9+0300, /*j*/
431 20+0200, /*k*/
432 10+0200, /*l*/
433 32,	 /*m*/
434 21,	 /*n*/
435 20,	 /*o*/
436 19+0100, /*p*/
437 19+0100, /*q*/
438 14,	 /*r*/
439 15,	 /*s*/
440 12+0200, /*t*/
441 21,	 /*u*/
442 20,	 /*v*/
443 26,	 /*w*/
444 20,	 /*x*/
445 18+0100, /*y*/
446 17,	 /*z*/
447 0,	 /*{*/
448 2,	 /*|*/
449 0,	 /*}*/
450 0,	 /*~*/
451 6,	 /*narrow space*/
452 13,	 /*hyphen*/
453 27,	 /*bullet*/
454 27,	 /*square*/
455 36,	 /*3/4 em*/
456 18,	 /*rule*/
457 29,	 /*1/4*/
458 29,	 /*1/2*/
459 29,	 /*3/4*/
460 36,	 /*minus*/
461 21,	 /*fi*/
462 21,	 /*fl*/
463 24,	 /*ff*/
464 32,	 /*ffi*/
465 32,	 /*ffl*/
466 15,	 /*degree*/
467 20,	 /*dagger*/
468 0,	 /*section*/
469 8,	 /*foot mark*/
470 0,	 /*'*/
471 0,	 /*`*/
472 0,	 /*_*/
473 0,
474 3,	/*half nar sp*/
475 0,
476 0,0,0,0,0,0,0,0,
477 0,0,0,0,0,0,0,0,
478 0,0,0,0,0,0,0,0,
479 0,0,0,0,0,0,0,0,
480 0,0,0,0,0,0,0,0,
481 0,0,0,0,0,0,0,0,
482 0,0,0,0,0,0,0,0,
483 0,0,0,0,0,0,0,0,
484 0,0,0,0,0,
485 20,	 /*registered*/
486 20,	 /*copyright*/
487 0,
488 19,	 /*cent*/
489 };
490 
491 char W2[256-32] = {	/*Times Italic widths*/
492 12,	 /*space*/
493 13,	 /*!*/
494 0,	 /*"*/
495 0,	 /*#*/
496 19,	 /*$*/
497 27,	 /*%*/
498 26,	 /*&*/
499 11,	 /*' close*/
500 15,	 /*(*/
501 15,	 /*)*/
502 16,	 /***/
503 36,	 /*+*/
504 11,	 /*,*/
505 13,	 /*- hyphen*/
506 11,	 /*.*/
507 9,	 /*/*/
508 19+0200, /*0*/
509 19+0200, /*1*/
510 19+0200, /*2*/
511 19+0200, /*3*/
512 19+0200, /*4*/
513 19+0200, /*5*/
514 19+0200, /*6*/
515 19+0200, /*7*/
516 19+0200, /*8*/
517 19+0200, /*9*/
518 11,	 /*:*/
519 11,	 /*;*/
520 0,	 /*<*/
521 36,	 /*=*/
522 0,	 /*>*/
523 20,	 /*?*/
524 0,	 /*@*/
525 25+0200, /*A*/
526 24+0200, /*B*/
527 26+0200, /*C*/
528 27+0200, /*D*/
529 23+0200, /*E*/
530 21+0200, /*F*/
531 27+0200, /*G*/
532 29+0200, /*H*/
533 14+0200, /*I*/
534 16+0200, /*J*/
535 28+0200, /*K*/
536 24+0200, /*L*/
537 34+0200, /*M*/
538 27+0200, /*N*/
539 27+0200, /*O*/
540 22+0200, /*P*/
541 27+0300, /*Q*/
542 27+0200, /*R*/
543 20+0200, /*S*/
544 23+0200, /*T*/
545 28+0200, /*U*/
546 25+0200, /*V*/
547 36+0200, /*W*/
548 24+0200, /*X*/
549 24+0200, /*Y*/
550 25+0200, /*Z*/
551 13,	 /*[*/
552 0,	 /*\*/
553 13,	 /*]*/
554 0,	 /*^*/
555 0,	 /*_*/
556 11,	 /*` open*/
557 19,	 /*a*/
558 18+0200, /*b*/
559 15,	 /*c*/
560 18+0200, /*d*/
561 16,	 /*e*/
562 11+0200, /*f*/
563 17+0100, /*g*/
564 19+0200, /*h*/
565 9+0200, /*i*/
566 9+0300, /*j*/
567 19+0200, /*k*/
568 9+0200, /*l*/
569 28,	 /*m*/
570 19,	 /*n*/
571 18,	 /*o*/
572 17+0100, /*p*/
573 18+0100, /*q*/
574 13,	 /*r*/
575 14,	 /*s*/
576 10+0200, /*t*/
577 19,	 /*u*/
578 16,	 /*v*/
579 24,	 /*w*/
580 18,	 /*x*/
581 16+0100, /*y*/
582 14,	 /*z*/
583 0,	 /*{*/
584 2,	 /*|*/
585 0,	 /*}*/
586 0,	 /*~*/
587 6,	 /*narrow space*/
588 13,	 /*hyphen*/
589 27,	 /*bullet*/
590 27,	 /*square*/
591 36,	 /*3/4 em*/
592 18,	 /*rule*/
593 27,	 /*1/4*/
594 27,	 /*1/2*/
595 27,	 /*3/4*/
596 36,	 /*minus*/
597 21,	 /*fi*/
598 21,	 /*fl*/
599 21,	 /*ff*/
600 31,	 /*ffi*/
601 31,	 /*ffl*/
602 15,	 /*degree*/
603 19,	 /*dagger*/
604 16,	 /*section*/
605 7,	 /*foot mark*/
606 0,	 /*'*/
607 0,	 /*`*/
608 0,	 /*_*/
609 0,
610 3,	/*half nar sp*/
611 0,
612 0,0,0,0,0,0,0,0,
613 0,0,0,0,0,0,0,0,
614 0,0,0,0,0,0,0,0,
615 0,0,0,0,0,0,0,0,
616 0,0,0,0,0,0,0,0,
617 0,0,0,0,0,0,0,0,
618 0,0,0,0,0,0,0,0,
619 0,0,0,0,0,0,0,0,
620 0,0,0,0,0,
621 20,	 /*registered*/
622 20,	 /*copyright*/
623 0,
624 19,	 /*cent*/
625 };
626 char W3[256-32] = {	/*Times Bold widths*/
627 12,	 /*space*/
628 13,	 /*!*/
629 0,	 /*"*/
630 0,	 /*#*/
631 18,	 /*$*/
632 28,	 /*%*/
633 27,	 /*&*/
634 12,	 /*' close*/
635 16,	 /*(*/
636 16,	 /*)*/
637 18,	 /***/
638 36,	 /*+*/
639 12,	 /*,*/
640 14,	 /*- hyphen*/
641 12,	 /*.*/
642 18,	 /*/*/
643 19+0200, /*0*/
644 19+0200, /*1*/
645 19+0200, /*2*/
646 19+0200, /*3*/
647 19+0200, /*4*/
648 19+0200, /*5*/
649 19+0200, /*6*/
650 19+0200, /*7*/
651 19+0200, /*8*/
652 19+0200, /*9*/
653 13,	 /*:*/
654 13,	 /*;*/
655 0,	 /*<*/
656 36,	 /*=*/
657 0,	 /*>*/
658 22,	 /*?*/
659 0,	 /*@*/
660 28+0200, /*A*/
661 26+0200, /*B*/
662 26+0200, /*C*/
663 29+0200, /*D*/
664 25+0200, /*E*/
665 23+0200, /*F*/
666 28+0200, /*G*/
667 32+0200, /*H*/
668 16+0200, /*I*/
669 21+0200, /*J*/
670 28+0200, /*K*/
671 25+0200, /*L*/
672 36+0200, /*M*/
673 30+0200, /*N*/
674 29+0200, /*O*/
675 25+0200, /*P*/
676 29+0300, /*Q*/
677 28+0200, /*R*/
678 23+0200, /*S*/
679 25+0200, /*T*/
680 29+0200, /*U*/
681 27+0200, /*V*/
682 36+0200, /*W*/
683 27+0200, /*X*/
684 28+0200, /*Y*/
685 27+0200, /*Z*/
686 12,	 /*[*/
687 0,	 /*\*/
688 12,	 /*]*/
689 0,	 /*^*/
690 0,	 /*_*/
691 12,	 /*` open*/
692 19,	 /*a*/
693 19+0200, /*b*/
694 16,	 /*c*/
695 19+0200, /*d*/
696 17,	 /*e*/
697 13+0200, /*f*/
698 18+0100, /*g*/
699 22+0200, /*h*/
700 12+0200, /*i*/
701 12+0300, /*j*/
702 23+0200, /*k*/
703 12+0200, /*l*/
704 32,	 /*m*/
705 22,	 /*n*/
706 18,	 /*o*/
707 20+0100, /*p*/
708 19+0100, /*q*/
709 15,	 /*r*/
710 17,	 /*s*/
711 13+0200, /*t*/
712 21,	 /*u*/
713 19,	 /*v*/
714 27,	 /*w*/
715 21,	 /*x*/
716 19+0100, /*y*/
717 17,	 /*z*/
718 0,	 /*{*/
719 2,	 /*|*/
720 0,	 /*}*/
721 0,	 /*~*/
722 6,	 /*narrow space*/
723 14,	 /*hyphen*/
724 27,	 /*bullet*/
725 27,	 /*square*/
726 36,	 /*3/4 em*/
727 18,	 /*rule*/
728 28,	 /*1/4*/
729 28,	 /*1/2*/
730 28,	 /*3/4*/
731 36,	 /*minus*/
732 22,	 /*fi*/
733 22,	 /*fl*/
734 23,	 /*ff*/
735 33,	 /*ffi*/
736 33,	 /*ffl*/
737 15,	 /*degree*/
738 20,	 /*dagger*/
739 0,	 /*section*/
740 9,	 /*foot mark*/
741 0,	 /*'*/
742 0,	 /*`*/
743 0,	 /*_*/
744 0,
745 3,	/*half nar sp*/
746 0,
747 0,0,0,0,0,0,0,0,
748 0,0,0,0,0,0,0,0,
749 0,0,0,0,0,0,0,0,
750 0,0,0,0,0,0,0,0,
751 0,0,0,0,0,0,0,0,
752 0,0,0,0,0,0,0,0,
753 0,0,0,0,0,0,0,0,
754 0,0,0,0,0,0,0,0,
755 0,0,0,0,0,
756 20,	 /*registered*/
757 20,	 /*copyright*/
758 0,
759 19,	 /*cent*/
760 };
761 
762 /*
763 Modified for Commercial II
764 and with +, -, and = for equations
765 */
766 char W4[256-32] = {	/*Special font widths*/
767 0,0,	 	/*.=Sw+042-40*/
768 13,	 /*"*/
769 29,	 /*#*/
770 0,0,0,0,	 	/*.=Sw+074-40*/
771 0,0,0,0,0,0,0,0,
772 0,0,0,0,0,0,0,0,
773 0,0,0,0,
774 36,	 /*<*/
775 0,	 	/*.=Sw+076-40*/
776 36,	 /*>*/
777 0,	 	/*.=Sw+100-40*/
778 36,	 /*@*/
779 0,0,0,0,0,0,0,	/*.=Sw+134-40*/
780 0,0,0,0,0,0,0,0,
781 0,0,0,0,0,0,0,0,
782 0,0,0,0,
783 15,	 /*\\*/
784 0,	 	/*.=Sw+136-40*/
785 15,	 /*^*/
786 18,	 /*_ underrule*/
787 0,0,0,0,0,0,0,0,
788 0,0,0,0,0,0,0,0,
789 0,0,0,0,0,0,0,0,
790 0,0,0,
791 14,	 /*{*/
792 0,	 	/*.=Sw+175-40*/
793 14,	 /*}*/
794 15,	 /*~*/
795 0,	 	/*.=Sw+220-40*/
796 0,0,0,0,0,0,0,0,
797 0,0,0,0,0,0,0,0,
798 17,	 /*section*/
799 0,		/*.=Sw+222-40*/
800 10,	 /*acute accent*/
801 10,	 /*grave accent*/
802 18,	 /*underrule*/
803 15,	 /*slash (longer)*/
804 0,	 /**/
805 0,	 /**/
806 24,	 /*alpha*/
807 23+0300, /*beta*/
808 23+0100, /*gamma*/
809 19+0200, /*delta*/
810 18,	 /*epsilon*/
811 18+0300, /*zeta*/
812 23+0100, /*eta*/
813 19+0200, /*theta*/
814 13,	 /*iota*/
815 21,	 /*kappa*/
816 22+0200, /*lambda*/
817 25+0100, /*mu*/
818 20,	 /*nu*/
819 20+0300, /*xi*/
820 20,	 /*omicron*/
821 27,	 /*pi*/
822 21+0100, /*rho*/
823 27,	 /*sigma*/
824 20,	 /*tau*/
825 21,	 /*upsilon*/
826 25+0300, /*phi*/
827 22+0100, /*chi*/
828 24+0300, /*psi*/
829 25,	 /*omega*/
830 24+0200, /*Gamma*/
831 26+0200, /*Delta*/
832 28+0200, /*Theta*/
833 28+0200, /*Lambda*/
834 27+0200, /*Xi*/
835 29+0200, /*Pi*/
836 25+0200, /*Sigma*/
837 0,	 /**/
838 28+0200, /*Upsilon*/
839 29+0200, /*Phi*/
840 32+0200, /*Psi*/
841 36+0200, /*Omega*/
842 30,	 /*square root*/
843 18+0100, /*terminal sigma*/
844 18,	 /*root en*/
845 36,	 /*>=*/
846 36,	 /*<=*/
847 36,	 /*identically equal*/
848 27,	 /*minus*/
849 36,	 /*approx =*/
850 36,	 /*approximates*/
851 36,	 /*not equal*/
852 36,	 /*right arrow*/
853 36,	 /*left arrow*/
854 18,	 /*up arrow*/
855 18,	 /*down arrow*/
856 27,	 /*equal*/
857 27,	 /*multiply*/
858 27,	 /*divide*/
859 36,	 /*plus-minus*/
860 36,	 /*cup (union)*/
861 36,	 /*cap (intersection)*/
862 36,	 /*subset of*/
863 36,	 /*superset of*/
864 36,	 /*improper subset*/
865 36,	 /*improper superset*/
866 34,	 /*infinity*/
867 21,	 /*partial derivative*/
868 36+0200, /*gradient*/
869 22,	 /*not*/
870 24,	 /*integral sign*/
871 27,	 /*proportional to*/
872 28,	 /*empty set*/
873 27,	 /*member of*/
874 27,	 /*plus*/
875 0,
876 0,
877 0,	 /*box vert rule (was 2.)*/
878 0,
879 17,	 /*dbl dagger*/
880 42,	 /*right hand*/
881 42,	 /*left hand*/
882 16,	 /*math * */
883 41,	 /*bell system sign*/
884 9,	 /*or*/
885 27,	 /*circle*/
886 9,	 /*left top (of big curly)*/
887 9,	 /*left bottom*/
888 9,	 /*right top*/
889 9,	 /*right bot*/
890 9,	 /*left center of big curly bracket*/
891 9,	 /*right center of big curly bracket*/
892 9,	 /*bold vertical*/
893 9,	 /*left floor (left bot of big sq bract)*/
894 9,	 /*right floor (rb of ")*/
895 9,	 /*left ceiling (lt of ")*/
896 9 }; /*right ceiling (rt of ")*/
897