![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tab3.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / troff / ancient.nroff|
Return to tab3.c CVS log | Up to [Research Unix] / researchv10no / cmd / troff / ancient.nroff |
1.1 root 1: #define BYTE 8
2: #define PAIR(A,B) (A|(B<<BYTE))
3: /*
4: character name and code tables
5: default width tables
6: modified for BTL special font version 4
7: and Commercial II
8: */
9:
10: int chtab [] = {
11: PAIR('h','y'), 0200, /*hyphen*/
12: PAIR('b','u'), 0201, /*bullet*/
13: PAIR('s','q'), 0202, /*square*/
14: PAIR('e','m'), 0203, /*3/4em*/
15: PAIR('r','u'), 0204, /*rule*/
16: PAIR('1','4'), 0205, /*1/4*/
17: PAIR('1','2'), 0206, /*1/2*/
18: PAIR('3','4'), 0207, /*3/4*/
19: PAIR('m','i'), 0302, /*equation minus*/
20: PAIR('f','i'), 0211, /*fi*/
21: PAIR('f','l'), 0212, /*fl*/
22: PAIR('f','f'), 0213, /*ff*/
23: PAIR('F','i'), 0214, /*ffi*/
24: PAIR('F','l'), 0215, /*ffl*/
25: PAIR('d','e'), 0216, /*degree*/
26: PAIR('d','g'), 0217, /*dagger*/
27: PAIR('s','c'), 0220, /*section*/
28: PAIR('f','m'), 0221, /*foot mark*/
29: PAIR('a','a'), 0222, /*acute accent*/
30: PAIR('g','a'), 0223, /*grave accent*/
31: PAIR('u','l'), 0224, /*underrule*/
32: PAIR('s','l'), 0225, /*slash (longer)*/
33: PAIR('*','a'), 0230, /*alpha*/
34: PAIR('*','b'), 0231, /*beta*/
35: PAIR('*','g'), 0232, /*gamma*/
36: PAIR('*','d'), 0233, /*delta*/
37: PAIR('*','e'), 0234, /*epsilon*/
38: PAIR('*','z'), 0235, /*zeta*/
39: PAIR('*','y'), 0236, /*eta*/
40: PAIR('*','h'), 0237, /*theta*/
41: PAIR('*','i'), 0240, /*iota*/
42: PAIR('*','k'), 0241, /*kappa*/
43: PAIR('*','l'), 0242, /*lambda*/
44: PAIR('*','m'), 0243, /*mu*/
45: PAIR('*','n'), 0244, /*nu*/
46: PAIR('*','c'), 0245, /*xi*/
47: PAIR('*','o'), 0246, /*omicron*/
48: PAIR('*','p'), 0247, /*pi*/
49: PAIR('*','r'), 0250, /*rho*/
50: PAIR('*','s'), 0251, /*sigma*/
51: PAIR('*','t'), 0252, /*tau*/
52: PAIR('*','u'), 0253, /*upsilon*/
53: PAIR('*','f'), 0254, /*phi*/
54: PAIR('*','x'), 0255, /*chi*/
55: PAIR('*','q'), 0256, /*psi*/
56: PAIR('*','w'), 0257, /*omega*/
57: PAIR('*','A'), 0101, /*Alpha*/
58: PAIR('*','B'), 0102, /*Beta*/
59: PAIR('*','G'), 0260, /*Gamma*/
60: PAIR('*','D'), 0261, /*Delta*/
61: PAIR('*','E'), 0105, /*Epsilon*/
62: PAIR('*','Z'), 0132, /*Zeta*/
63: PAIR('*','Y'), 0110, /*Eta*/
64: PAIR('*','H'), 0262, /*Theta*/
65: PAIR('*','I'), 0111, /*Iota*/
66: PAIR('*','K'), 0113, /*Kappa*/
67: PAIR('*','L'), 0263, /*Lambda*/
68: PAIR('*','M'), 0115, /*Mu*/
69: PAIR('*','N'), 0116, /*Nu*/
70: PAIR('*','C'), 0264, /*Xi*/
71: PAIR('*','O'), 0117, /*Omicron*/
72: PAIR('*','P'), 0265, /*Pi*/
73: PAIR('*','R'), 0120, /*Rho*/
74: PAIR('*','S'), 0266, /*Sigma*/
75: PAIR('*','T'), 0124, /*Tau*/
76: PAIR('*','U'), 0270, /*Upsilon*/
77: PAIR('*','F'), 0271, /*Phi*/
78: PAIR('*','X'), 0130, /*Chi*/
79: PAIR('*','Q'), 0272, /*Psi*/
80: PAIR('*','W'), 0273, /*Omega*/
81: PAIR('s','r'), 0274, /*square root*/
82: PAIR('t','s'), 0275, /*terminal sigma*/
83: PAIR('r','n'), 0276, /*root en*/
84: PAIR('>','='), 0277, /*>=*/
85: PAIR('<','='), 0300, /*<=*/
86: PAIR('=','='), 0301, /*identically equal*/
87: PAIR('~','='), 0303, /*approx =*/
88: PAIR('a','p'), 0304, /*approximates*/
89: PAIR('!','='), 0305, /*not equal*/
90: PAIR('-','>'), 0306, /*right arrow*/
91: PAIR('<','-'), 0307, /*left arrow*/
92: PAIR('u','a'), 0310, /*up arrow*/
93: PAIR('d','a'), 0311, /*down arrow*/
94: PAIR('e','q'), 0312, /*equation equal*/
95: PAIR('m','u'), 0313, /*multiply*/
96: PAIR('d','i'), 0314, /*divide*/
97: PAIR('+','-'), 0315, /*plus-minus*/
98: PAIR('c','u'), 0316, /*cup (union)*/
99: PAIR('c','a'), 0317, /*cap (intersection)*/
100: PAIR('s','b'), 0320, /*subset of*/
101: PAIR('s','p'), 0321, /*superset of*/
102: PAIR('i','b'), 0322, /*improper subset*/
103: PAIR('i','p'), 0323, /* " superset*/
104: PAIR('i','f'), 0324, /*infinity*/
105: PAIR('p','d'), 0325, /*partial derivative*/
106: PAIR('g','r'), 0326, /*gradient*/
107: PAIR('n','o'), 0327, /*not*/
108: PAIR('i','s'), 0330, /*integral sign*/
109: PAIR('p','t'), 0331, /*proportional to*/
110: PAIR('e','s'), 0332, /*empty set*/
111: PAIR('m','o'), 0333, /*member of*/
112: PAIR('p','l'), 0334, /*equation plus*/
113: PAIR('r','g'), 0335, /*registered*/
114: PAIR('c','o'), 0336, /*copyright*/
115: PAIR('b','r'), 0337, /*box vert rule*/
116: PAIR('c','t'), 0340, /*cent sign*/
117: PAIR('d','d'), 0341, /*dbl dagger*/
118: PAIR('r','h'), 0342, /*right hand*/
119: PAIR('l','h'), 0343, /*left hand*/
120: PAIR('*','*'), 0344, /*math * */
121: PAIR('b','s'), 0345, /*bell system sign*/
122: PAIR('o','r'), 0346, /*or*/
123: PAIR('c','i'), 0347, /*circle*/
124: PAIR('l','t'), 0350, /*left top (of big curly)*/
125: PAIR('l','b'), 0351, /*left bottom*/
126: PAIR('r','t'), 0352, /*right top*/
127: PAIR('r','b'), 0353, /*right bot*/
128: PAIR('l','k'), 0354, /*left center of big curly bracket*/
129: PAIR('r','k'), 0355, /*right center of big curly bracket*/
130: PAIR('b','v'), 0356, /*bold vertical*/
131: PAIR('l','f'), 0357, /*left floor (left bot of big sq bract)*/
132: PAIR('r','f'), 0360, /*right floor (rb of ")*/
133: PAIR('l','c'), 0361, /*left ceiling (lt of ")*/
134: PAIR('r','c'), 0362, /*right ceiling (rt of ")*/
135: 0,0};
136:
137: char codetab[256-32] = { /*cat codes*/
138: 00, /*space*/
139: 0145, /*!*/
140: 0230, /*"*/
141: 0337, /*#*/
142: 0155, /*$*/
143: 053, /*%*/
144: 050, /*&*/
145: 032, /*' close*/
146: 0132, /*(*/
147: 0133, /*)*/
148: 0122, /***/
149: 0143, /*+*/
150: 047, /*,*/
151: 040, /*- hyphen*/
152: 044, /*.*/
153: 043, /*/*/
154: 0110, /*0*/
155: 0111, /*1*/
156: 0112, /*2*/
157: 0113, /*3*/
158: 0114, /*4*/
159: 0115, /*5*/
160: 0116, /*6*/
161: 0117, /*7*/
162: 0120, /*8*/
163: 0121, /*9*/
164: 0142, /*:*/
165: 023, /*;*/
166: 0303, /*<*/
167: 0140, /*=*/
168: 0301, /*>*/
169: 0147, /*?*/
170: 0222, /*@*/
171: 0103, /*A*/
172: 075, /*B*/
173: 070, /*C*/
174: 074, /*D*/
175: 072, /*E*/
176: 0101, /*F*/
177: 065, /*G*/
178: 060, /*H*/
179: 066, /*I*/
180: 0105, /*J*/
181: 0107, /*K*/
182: 063, /*L*/
183: 062, /*M*/
184: 061, /*N*/
185: 057, /*O*/
186: 067, /*P*/
187: 055, /*Q*/
188: 064, /*R*/
189: 076, /*S*/
190: 056, /*T*/
191: 0106, /*U*/
192: 071, /*V*/
193: 0104, /*W*/
194: 0102, /*X*/
195: 077, /*Y*/
196: 073, /*Z*/
197: 0134, /*[*/
198: 0241, /*\*/
199: 0135, /*]*/
200: 0336, /*^*/
201: 0240, /*_*/
202: 030, /*` open*/
203: 025, /*a*/
204: 012, /*b*/
205: 027, /*c*/
206: 011, /*d*/
207: 031, /*e*/
208: 014, /*f*/
209: 045, /*g*/
210: 001, /*h*/
211: 006, /*i*/
212: 015, /*j*/
213: 017, /*k*/
214: 005, /*l*/
215: 004, /*m*/
216: 003, /*n*/
217: 033, /*o*/
218: 021, /*p*/
219: 042, /*q*/
220: 035, /*r*/
221: 010, /*s*/
222: 002, /*t*/
223: 016, /*u*/
224: 037, /*v*/
225: 041, /*w*/
226: 013, /*x*/
227: 051, /*y*/
228: 007, /*z*/
229: 0332, /*{*/
230: 0151, /*|*/
231: 0333, /*}*/
232: 0342, /*~*/
233: 00, /*narrow space*/
234: 040, /*hyphen*/
235: 0146, /*bullet*/
236: 0154, /*square*/
237: 022, /*3/4 em*/
238: 026, /*rule*/
239: 034, /*1/4*/
240: 036, /*1/2*/
241: 046, /*3/4*/
242: 0123, /*minus*/
243: 0124, /*fi*/
244: 0125, /*fl*/
245: 0126, /*ff*/
246: 0131, /*ffi*/
247: 0130, /*ffl*/
248: 0136, /*degree*/
249: 0137, /*dagger*/
250: 0355, /*section*/
251: 0150, /*foot mark*/
252: 0334, /*acute accent*/
253: 0335, /*grave accent*/
254: 0240, /*underrule*/
255: 0304, /*slash (longer)*/
256: 00, /*half nar sp*/
257: 00, /**/
258: 0225, /*alpha*/
259: 0212, /*beta*/
260: 0245, /*gamma*/
261: 0211, /*delta*/
262: 0231, /*epsilon*/
263: 0207, /*zeta*/
264: 0214, /*eta*/
265: 0202, /*theta*/
266: 0206, /*iota*/
267: 0217, /*kappa*/
268: 0205, /*lambda*/
269: 0204, /*mu*/
270: 0203, /*nu*/
271: 0213, /*xi*/
272: 0233, /*omicron*/
273: 0221, /*pi*/
274: 0235, /*rho*/
275: 0210, /*sigma*/
276: 0237, /*tau*/
277: 0216, /*upsilon*/
278: 0215, /*phi*/
279: 0227, /*chi*/
280: 0201, /*psi*/
281: 0251, /*omega*/
282: 0265, /*Gamma*/
283: 0274, /*Delta*/
284: 0256, /*Theta*/
285: 0263, /*Lambda*/
286: 0302, /*Xi*/
287: 0267, /*Pi*/
288: 0276, /*Sigma*/
289: 00, /**/
290: 0306, /*Upsilon*/
291: 0255, /*Phi*/
292: 0242, /*Psi*/
293: 0257, /*Omega*/
294: 0275, /*square root*/
295: 0262, /*terminal sigma (was root em)*/
296: 0261, /*root en*/
297: 0327, /*>=*/
298: 0326, /*<=*/
299: 0330, /*identically equal*/
300: 0264, /*equation minus*/
301: 0277, /*approx =*/
302: 0272, /*approximates*/
303: 0331, /*not equal*/
304: 0354, /*right arrow*/
305: 0234, /*left arrow*/
306: 0236, /*up arrow*/
307: 0223, /*down arrow*/
308: 0232, /*equation equal*/
309: 0323, /*multiply*/
310: 0324, /*divide*/
311: 0325, /*plus-minus*/
312: 0260, /*cup (union)*/
313: 0305, /*cap (intersection)*/
314: 0270, /*subset of*/
315: 0271, /*superset of*/
316: 0350, /*improper subset*/
317: 0246, /* improper superset*/
318: 0244, /*infinity*/
319: 0273, /*partial derivative*/
320: 0253, /*gradient*/
321: 0307, /*not*/
322: 0266, /*integral sign*/
323: 0247, /*proportional to*/
324: 0343, /*empty set*/
325: 0341, /*member of*/
326: 0353, /*equation plus*/
327: 0141, /*registered*/
328: 0153, /*copyright*/
329: 0346, /*box rule (was parallel sign)*/
330: 0127, /*cent sign*/
331: 0345, /*dbl dagger*/
332: 0250, /*right hand*/
333: 0340, /*left hand*/
334: 0347, /*math * */
335: 0243, /*bell system sign*/
336: 0226, /*or (was star)*/
337: 0351, /*circle*/
338: 0311, /*left top (of big curly)*/
339: 0314, /*left bottom*/
340: 0315, /*right top*/
341: 0317, /*right bot*/
342: 0313, /*left center of big curly bracket*/
343: 0316, /*right center of big curly bracket*/
344: 0312, /*bold vertical*/
345: 0321, /*left floor (left bot of big sq bract)*/
346: 0320, /*right floor (rb of ")*/
347: 0322, /*left ceiling (lt of ")*/
348: 0310}; /*right ceiling (rt of ")*/
349:
350:
351: /* include default font character width tables */
352:
353: #ifdef unix
354: #include "fonts.d/ftR.c" /* Roman */
355: #include "fonts.d/ftI.c" /* Italic */
356: #include "fonts.d/ftB.c" /* Bold */
357: #include "fonts.d/ftS.c" /* Special */
358: #endif
359:
360: #ifdef ibm
361: #include "ftR.c"
362: #include "ftI.c"
363: #include "ftB.c"
364: #include "ftS.c"
365: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.