xref: /csrg-svn/old/roff/nroff/ntab.c (revision 7076)
1*7076Srrh #ifndef lint
2*7076Srrh static char sccsid[] = "@(#)ntab.c	4.1 06/07/82";
3*7076Srrh #endif lint
4*7076Srrh 
5*7076Srrh #define BYTE 8
6*7076Srrh #define PAIR(A,B) (A|(B<<BYTE))
7*7076Srrh /*
8*7076Srrh character name tables
9*7076Srrh modified for BTL special font version 4
10*7076Srrh and Commercial II
11*7076Srrh */
12*7076Srrh 
13*7076Srrh 
14*7076Srrh int chtab [] = {
15*7076Srrh PAIR('h','y'), 0200,	/*hyphen*/
16*7076Srrh PAIR('b','u'), 0201,	/*bullet*/
17*7076Srrh PAIR('s','q'), 0202,	/*square*/
18*7076Srrh PAIR('e','m'), 0203,	/*3/4em*/
19*7076Srrh PAIR('r','u'), 0204,	/*rule*/
20*7076Srrh PAIR('1','4'), 0205,	/*1/4*/
21*7076Srrh PAIR('1','2'), 0206,	/*1/2*/
22*7076Srrh PAIR('3','4'), 0207,	/*3/4*/
23*7076Srrh PAIR('m','i'), 0302,	/*equation minus*/
24*7076Srrh PAIR('f','i'), 0211,	/*fi*/
25*7076Srrh PAIR('f','l'), 0212,	/*fl*/
26*7076Srrh PAIR('f','f'), 0213,	/*ff*/
27*7076Srrh PAIR('F','i'), 0214,	/*ffi*/
28*7076Srrh PAIR('F','l'), 0215,	/*ffl*/
29*7076Srrh PAIR('d','e'), 0216,	/*degree*/
30*7076Srrh PAIR('d','g'), 0217,	/*dagger*/
31*7076Srrh PAIR('s','c'), 0220,	/*section*/
32*7076Srrh PAIR('f','m'), 0221,	/*foot mark*/
33*7076Srrh PAIR('a','a'), 0222,	/*acute accent*/
34*7076Srrh PAIR('g','a'), 0223,	/*grave accent*/
35*7076Srrh PAIR('u','l'), 0224,	/*underrule*/
36*7076Srrh PAIR('s','l'), 0225,	/*slash (longer)*/
37*7076Srrh PAIR('*','a'), 0230,	/*alpha*/
38*7076Srrh PAIR('*','b'), 0231,	/*beta*/
39*7076Srrh PAIR('*','g'), 0232,	/*gamma*/
40*7076Srrh PAIR('*','d'), 0233,	/*delta*/
41*7076Srrh PAIR('*','e'), 0234,	/*epsilon*/
42*7076Srrh PAIR('*','z'), 0235,	/*zeta*/
43*7076Srrh PAIR('*','y'), 0236,	/*eta*/
44*7076Srrh PAIR('*','h'), 0237,	/*theta*/
45*7076Srrh PAIR('*','i'), 0240,	/*iota*/
46*7076Srrh PAIR('*','k'), 0241,	/*kappa*/
47*7076Srrh PAIR('*','l'), 0242,	/*lambda*/
48*7076Srrh PAIR('*','m'), 0243,	/*mu*/
49*7076Srrh PAIR('*','n'), 0244,	/*nu*/
50*7076Srrh PAIR('*','c'), 0245,	/*xi*/
51*7076Srrh PAIR('*','o'), 0246,	/*omicron*/
52*7076Srrh PAIR('*','p'), 0247,	/*pi*/
53*7076Srrh PAIR('*','r'), 0250,	/*rho*/
54*7076Srrh PAIR('*','s'), 0251,	/*sigma*/
55*7076Srrh PAIR('*','t'), 0252,	/*tau*/
56*7076Srrh PAIR('*','u'), 0253,	/*upsilon*/
57*7076Srrh PAIR('*','f'), 0254,	/*phi*/
58*7076Srrh PAIR('*','x'), 0255,	/*chi*/
59*7076Srrh PAIR('*','q'), 0256,	/*psi*/
60*7076Srrh PAIR('*','w'), 0257,	/*omega*/
61*7076Srrh PAIR('*','A'), 0101,	/*Alpha*/
62*7076Srrh PAIR('*','B'), 0102,	/*Beta*/
63*7076Srrh PAIR('*','G'), 0260,	/*Gamma*/
64*7076Srrh PAIR('*','D'), 0261,	/*Delta*/
65*7076Srrh PAIR('*','E'), 0105,	/*Epsilon*/
66*7076Srrh PAIR('*','Z'), 0132,	/*Zeta*/
67*7076Srrh PAIR('*','Y'), 0110,	/*Eta*/
68*7076Srrh PAIR('*','H'), 0262,	/*Theta*/
69*7076Srrh PAIR('*','I'), 0111,	/*Iota*/
70*7076Srrh PAIR('*','K'), 0113,	/*Kappa*/
71*7076Srrh PAIR('*','L'), 0263,	/*Lambda*/
72*7076Srrh PAIR('*','M'), 0115,	/*Mu*/
73*7076Srrh PAIR('*','N'), 0116,	/*Nu*/
74*7076Srrh PAIR('*','C'), 0264,	/*Xi*/
75*7076Srrh PAIR('*','O'), 0117,	/*Omicron*/
76*7076Srrh PAIR('*','P'), 0265,	/*Pi*/
77*7076Srrh PAIR('*','R'), 0120,	/*Rho*/
78*7076Srrh PAIR('*','S'), 0266,	/*Sigma*/
79*7076Srrh PAIR('*','T'), 0124,	/*Tau*/
80*7076Srrh PAIR('*','U'), 0270,	/*Upsilon*/
81*7076Srrh PAIR('*','F'), 0271,	/*Phi*/
82*7076Srrh PAIR('*','X'), 0130,	/*Chi*/
83*7076Srrh PAIR('*','Q'), 0272,	/*Psi*/
84*7076Srrh PAIR('*','W'), 0273,	/*Omega*/
85*7076Srrh PAIR('s','r'), 0274,	/*square root*/
86*7076Srrh PAIR('t','s'), 0275,	/*terminal sigma*/
87*7076Srrh PAIR('r','n'), 0276,	/*root en*/
88*7076Srrh PAIR('>','='), 0277,	/*>=*/
89*7076Srrh PAIR('<','='), 0300,	/*<=*/
90*7076Srrh PAIR('=','='), 0301,	/*identically equal*/
91*7076Srrh PAIR('~','='), 0303,	/*approx =*/
92*7076Srrh PAIR('a','p'), 0304,	/*approximates*/
93*7076Srrh PAIR('!','='), 0305,	/*not equal*/
94*7076Srrh PAIR('-','>'), 0306,	/*right arrow*/
95*7076Srrh PAIR('<','-'), 0307,	/*left arrow*/
96*7076Srrh PAIR('u','a'), 0310,	/*up arrow*/
97*7076Srrh PAIR('d','a'), 0311,	/*down arrow*/
98*7076Srrh PAIR('e','q'), 0312,	/*equation equal*/
99*7076Srrh PAIR('m','u'), 0313,	/*multiply*/
100*7076Srrh PAIR('d','i'), 0314,	/*divide*/
101*7076Srrh PAIR('+','-'), 0315,	/*plus-minus*/
102*7076Srrh PAIR('c','u'), 0316,	/*cup (union)*/
103*7076Srrh PAIR('c','a'), 0317,	/*cap (intersection)*/
104*7076Srrh PAIR('s','b'), 0320,	/*subset of*/
105*7076Srrh PAIR('s','p'), 0321,	/*superset of*/
106*7076Srrh PAIR('i','b'), 0322,	/*improper subset*/
107*7076Srrh PAIR('i','p'), 0323,	/*  " superset*/
108*7076Srrh PAIR('i','f'), 0324,	/*infinity*/
109*7076Srrh PAIR('p','d'), 0325,	/*partial derivative*/
110*7076Srrh PAIR('g','r'), 0326,	/*gradient*/
111*7076Srrh PAIR('n','o'), 0327,	/*not*/
112*7076Srrh PAIR('i','s'), 0330,	/*integral sign*/
113*7076Srrh PAIR('p','t'), 0331,	/*proportional to*/
114*7076Srrh PAIR('e','s'), 0332,	/*empty set*/
115*7076Srrh PAIR('m','o'), 0333,	/*member of*/
116*7076Srrh PAIR('p','l'), 0334,	/*equation plus*/
117*7076Srrh PAIR('r','g'), 0335,	/*registered*/
118*7076Srrh PAIR('c','o'), 0336,	/*copyright*/
119*7076Srrh PAIR('b','r'), 0337,	/*box vert rule*/
120*7076Srrh PAIR('c','t'), 0340,	/*cent sign*/
121*7076Srrh PAIR('d','d'), 0341,	/*dbl dagger*/
122*7076Srrh PAIR('r','h'), 0342,	/*right hand*/
123*7076Srrh PAIR('l','h'), 0343,	/*left hand*/
124*7076Srrh PAIR('*','*'), 0344,	/*math * */
125*7076Srrh PAIR('b','s'), 0345,	/*bell system sign*/
126*7076Srrh PAIR('o','r'), 0346,	/*or*/
127*7076Srrh PAIR('c','i'), 0347,	/*circle*/
128*7076Srrh PAIR('l','t'), 0350,	/*left top (of big curly)*/
129*7076Srrh PAIR('l','b'), 0351,	/*left bottom*/
130*7076Srrh PAIR('r','t'), 0352,	/*right top*/
131*7076Srrh PAIR('r','b'), 0353,	/*right bot*/
132*7076Srrh PAIR('l','k'), 0354,	/*left center of big curly bracket*/
133*7076Srrh PAIR('r','k'), 0355,	/*right center of big curly bracket*/
134*7076Srrh PAIR('b','v'), 0356,	/*bold vertical*/
135*7076Srrh PAIR('l','f'), 0357,	/*left floor (left bot of big sq bract)*/
136*7076Srrh PAIR('r','f'), 0360,	/*right floor (rb of ")*/
137*7076Srrh PAIR('l','c'), 0361,	/*left ceiling (lt of ")*/
138*7076Srrh PAIR('r','c'), 0362,	/*right ceiling (rt of ")*/
139*7076Srrh 0,0};
140