1*48303Sbostic /*- 2*48303Sbostic * Copyright (c) 1991 The Regents of the University of California. 3*48303Sbostic * All rights reserved. 4*48303Sbostic * 5*48303Sbostic * %sccs.include.proprietary.c% 6*48303Sbostic */ 7*48303Sbostic 87076Srrh #ifndef lint 9*48303Sbostic static char sccsid[] = "@(#)ntab.c 4.2 (Berkeley) 04/18/91"; 10*48303Sbostic #endif /* not lint */ 117076Srrh 127076Srrh #define BYTE 8 137076Srrh #define PAIR(A,B) (A|(B<<BYTE)) 147076Srrh /* 157076Srrh character name tables 167076Srrh modified for BTL special font version 4 177076Srrh and Commercial II 187076Srrh */ 197076Srrh 207076Srrh 217076Srrh int chtab [] = { 227076Srrh PAIR('h','y'), 0200, /*hyphen*/ 237076Srrh PAIR('b','u'), 0201, /*bullet*/ 247076Srrh PAIR('s','q'), 0202, /*square*/ 257076Srrh PAIR('e','m'), 0203, /*3/4em*/ 267076Srrh PAIR('r','u'), 0204, /*rule*/ 277076Srrh PAIR('1','4'), 0205, /*1/4*/ 287076Srrh PAIR('1','2'), 0206, /*1/2*/ 297076Srrh PAIR('3','4'), 0207, /*3/4*/ 307076Srrh PAIR('m','i'), 0302, /*equation minus*/ 317076Srrh PAIR('f','i'), 0211, /*fi*/ 327076Srrh PAIR('f','l'), 0212, /*fl*/ 337076Srrh PAIR('f','f'), 0213, /*ff*/ 347076Srrh PAIR('F','i'), 0214, /*ffi*/ 357076Srrh PAIR('F','l'), 0215, /*ffl*/ 367076Srrh PAIR('d','e'), 0216, /*degree*/ 377076Srrh PAIR('d','g'), 0217, /*dagger*/ 387076Srrh PAIR('s','c'), 0220, /*section*/ 397076Srrh PAIR('f','m'), 0221, /*foot mark*/ 407076Srrh PAIR('a','a'), 0222, /*acute accent*/ 417076Srrh PAIR('g','a'), 0223, /*grave accent*/ 427076Srrh PAIR('u','l'), 0224, /*underrule*/ 437076Srrh PAIR('s','l'), 0225, /*slash (longer)*/ 447076Srrh PAIR('*','a'), 0230, /*alpha*/ 457076Srrh PAIR('*','b'), 0231, /*beta*/ 467076Srrh PAIR('*','g'), 0232, /*gamma*/ 477076Srrh PAIR('*','d'), 0233, /*delta*/ 487076Srrh PAIR('*','e'), 0234, /*epsilon*/ 497076Srrh PAIR('*','z'), 0235, /*zeta*/ 507076Srrh PAIR('*','y'), 0236, /*eta*/ 517076Srrh PAIR('*','h'), 0237, /*theta*/ 527076Srrh PAIR('*','i'), 0240, /*iota*/ 537076Srrh PAIR('*','k'), 0241, /*kappa*/ 547076Srrh PAIR('*','l'), 0242, /*lambda*/ 557076Srrh PAIR('*','m'), 0243, /*mu*/ 567076Srrh PAIR('*','n'), 0244, /*nu*/ 577076Srrh PAIR('*','c'), 0245, /*xi*/ 587076Srrh PAIR('*','o'), 0246, /*omicron*/ 597076Srrh PAIR('*','p'), 0247, /*pi*/ 607076Srrh PAIR('*','r'), 0250, /*rho*/ 617076Srrh PAIR('*','s'), 0251, /*sigma*/ 627076Srrh PAIR('*','t'), 0252, /*tau*/ 637076Srrh PAIR('*','u'), 0253, /*upsilon*/ 647076Srrh PAIR('*','f'), 0254, /*phi*/ 657076Srrh PAIR('*','x'), 0255, /*chi*/ 667076Srrh PAIR('*','q'), 0256, /*psi*/ 677076Srrh PAIR('*','w'), 0257, /*omega*/ 687076Srrh PAIR('*','A'), 0101, /*Alpha*/ 697076Srrh PAIR('*','B'), 0102, /*Beta*/ 707076Srrh PAIR('*','G'), 0260, /*Gamma*/ 717076Srrh PAIR('*','D'), 0261, /*Delta*/ 727076Srrh PAIR('*','E'), 0105, /*Epsilon*/ 737076Srrh PAIR('*','Z'), 0132, /*Zeta*/ 747076Srrh PAIR('*','Y'), 0110, /*Eta*/ 757076Srrh PAIR('*','H'), 0262, /*Theta*/ 767076Srrh PAIR('*','I'), 0111, /*Iota*/ 777076Srrh PAIR('*','K'), 0113, /*Kappa*/ 787076Srrh PAIR('*','L'), 0263, /*Lambda*/ 797076Srrh PAIR('*','M'), 0115, /*Mu*/ 807076Srrh PAIR('*','N'), 0116, /*Nu*/ 817076Srrh PAIR('*','C'), 0264, /*Xi*/ 827076Srrh PAIR('*','O'), 0117, /*Omicron*/ 837076Srrh PAIR('*','P'), 0265, /*Pi*/ 847076Srrh PAIR('*','R'), 0120, /*Rho*/ 857076Srrh PAIR('*','S'), 0266, /*Sigma*/ 867076Srrh PAIR('*','T'), 0124, /*Tau*/ 877076Srrh PAIR('*','U'), 0270, /*Upsilon*/ 887076Srrh PAIR('*','F'), 0271, /*Phi*/ 897076Srrh PAIR('*','X'), 0130, /*Chi*/ 907076Srrh PAIR('*','Q'), 0272, /*Psi*/ 917076Srrh PAIR('*','W'), 0273, /*Omega*/ 927076Srrh PAIR('s','r'), 0274, /*square root*/ 937076Srrh PAIR('t','s'), 0275, /*terminal sigma*/ 947076Srrh PAIR('r','n'), 0276, /*root en*/ 957076Srrh PAIR('>','='), 0277, /*>=*/ 967076Srrh PAIR('<','='), 0300, /*<=*/ 977076Srrh PAIR('=','='), 0301, /*identically equal*/ 987076Srrh PAIR('~','='), 0303, /*approx =*/ 997076Srrh PAIR('a','p'), 0304, /*approximates*/ 1007076Srrh PAIR('!','='), 0305, /*not equal*/ 1017076Srrh PAIR('-','>'), 0306, /*right arrow*/ 1027076Srrh PAIR('<','-'), 0307, /*left arrow*/ 1037076Srrh PAIR('u','a'), 0310, /*up arrow*/ 1047076Srrh PAIR('d','a'), 0311, /*down arrow*/ 1057076Srrh PAIR('e','q'), 0312, /*equation equal*/ 1067076Srrh PAIR('m','u'), 0313, /*multiply*/ 1077076Srrh PAIR('d','i'), 0314, /*divide*/ 1087076Srrh PAIR('+','-'), 0315, /*plus-minus*/ 1097076Srrh PAIR('c','u'), 0316, /*cup (union)*/ 1107076Srrh PAIR('c','a'), 0317, /*cap (intersection)*/ 1117076Srrh PAIR('s','b'), 0320, /*subset of*/ 1127076Srrh PAIR('s','p'), 0321, /*superset of*/ 1137076Srrh PAIR('i','b'), 0322, /*improper subset*/ 1147076Srrh PAIR('i','p'), 0323, /* " superset*/ 1157076Srrh PAIR('i','f'), 0324, /*infinity*/ 1167076Srrh PAIR('p','d'), 0325, /*partial derivative*/ 1177076Srrh PAIR('g','r'), 0326, /*gradient*/ 1187076Srrh PAIR('n','o'), 0327, /*not*/ 1197076Srrh PAIR('i','s'), 0330, /*integral sign*/ 1207076Srrh PAIR('p','t'), 0331, /*proportional to*/ 1217076Srrh PAIR('e','s'), 0332, /*empty set*/ 1227076Srrh PAIR('m','o'), 0333, /*member of*/ 1237076Srrh PAIR('p','l'), 0334, /*equation plus*/ 1247076Srrh PAIR('r','g'), 0335, /*registered*/ 1257076Srrh PAIR('c','o'), 0336, /*copyright*/ 1267076Srrh PAIR('b','r'), 0337, /*box vert rule*/ 1277076Srrh PAIR('c','t'), 0340, /*cent sign*/ 1287076Srrh PAIR('d','d'), 0341, /*dbl dagger*/ 1297076Srrh PAIR('r','h'), 0342, /*right hand*/ 1307076Srrh PAIR('l','h'), 0343, /*left hand*/ 1317076Srrh PAIR('*','*'), 0344, /*math * */ 1327076Srrh PAIR('b','s'), 0345, /*bell system sign*/ 1337076Srrh PAIR('o','r'), 0346, /*or*/ 1347076Srrh PAIR('c','i'), 0347, /*circle*/ 1357076Srrh PAIR('l','t'), 0350, /*left top (of big curly)*/ 1367076Srrh PAIR('l','b'), 0351, /*left bottom*/ 1377076Srrh PAIR('r','t'), 0352, /*right top*/ 1387076Srrh PAIR('r','b'), 0353, /*right bot*/ 1397076Srrh PAIR('l','k'), 0354, /*left center of big curly bracket*/ 1407076Srrh PAIR('r','k'), 0355, /*right center of big curly bracket*/ 1417076Srrh PAIR('b','v'), 0356, /*bold vertical*/ 1427076Srrh PAIR('l','f'), 0357, /*left floor (left bot of big sq bract)*/ 1437076Srrh PAIR('r','f'), 0360, /*right floor (rb of ")*/ 1447076Srrh PAIR('l','c'), 0361, /*left ceiling (lt of ")*/ 1457076Srrh PAIR('r','c'), 0362, /*right ceiling (rt of ")*/ 1467076Srrh 0,0}; 147