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