xref: /csrg-svn/old/roff/nroff_term/tab37.c (revision 35268)
1*35268Sbostic /*	tab37.c	4.2	88/07/22	*/
214357Ssam #define INCH 240
314357Ssam /*
414357Ssam  * Model 37 TeleType
514357Ssam  * nroff driving tables
614357Ssam  * width and code tables
714357Ssam  */
814357Ssam 
914357Ssam struct {
1014357Ssam 	int bset;
1114357Ssam 	int breset;
1214357Ssam 	int Hor;
1314357Ssam 	int Vert;
1414357Ssam 	int Newline;
1514357Ssam 	int Char;
1614357Ssam 	int Em;
1714357Ssam 	int Halfline;
1814357Ssam 	int Adj;
1914357Ssam 	char *twinit;
2014357Ssam 	char *twrest;
2114357Ssam 	char *twnl;
2214357Ssam 	char *hlr;
2314357Ssam 	char *hlf;
2414357Ssam 	char *flr;
2514357Ssam 	char *bdon;
2614357Ssam 	char *bdoff;
2714357Ssam 	char *ploton;
2814357Ssam 	char *plotoff;
2914357Ssam 	char *up;
3014357Ssam 	char *down;
3114357Ssam 	char *right;
3214357Ssam 	char *left;
3314357Ssam 	char *codetab[256-32];
3414357Ssam 	int zzz;
3514357Ssam 	} t = {
3614357Ssam /*bset*/	0,
3714357Ssam /*breset*/	0,
3814357Ssam /*Hor*/		INCH/10,
3914357Ssam /*Vert*/	INCH/12,
4014357Ssam /*Newline*/	INCH/6,
4114357Ssam /*Char*/	INCH/10,
4214357Ssam /*Em*/		INCH/10,
4314357Ssam /*Halfline*/	INCH/12,
4414357Ssam /*Adj*/		INCH/10,
4514357Ssam /*twinit*/	"",
4614357Ssam /*twrest*/	"",
4714357Ssam /*twnl*/	"\n",
4814357Ssam /*hlr*/		"\0338",
4914357Ssam /*hlf*/		"\0339",
5014357Ssam /*flr*/		"\0337",
5114357Ssam /*bdon*/	"",
5214357Ssam /*bdoff*/	"",
5314357Ssam /*ploton*/	"",
5414357Ssam /*plotoff*/	"",
5514357Ssam /*up*/		"",
5614357Ssam /*down*/	"",
5714357Ssam /*right*/	"",
5814357Ssam /*left*/	"",
5914357Ssam /*codetab*/
6014357Ssam "\001 ",	/*space*/
6114357Ssam "\001!",	/*!*/
6214357Ssam "\001\"",	/*"*/
6314357Ssam "\001#",	/*#*/
6414357Ssam "\001$",	/*$*/
6514357Ssam "\001%",	/*%*/
6614357Ssam "\001&",	/*&*/
6714357Ssam "\001'",	/*' close*/
6814357Ssam "\001(",	/*(*/
6914357Ssam "\001)",	/*)*/
7014357Ssam "\001*",	/***/
7114357Ssam "\001+",	/*+*/
7214357Ssam "\001,",	/*,*/
7314357Ssam "\001-",	/*- hyphen*/
7414357Ssam "\001.",	/*.*/
7514357Ssam "\001/",	/*/*/
7614357Ssam "\2010",	/*0*/
7714357Ssam "\2011",	/*1*/
7814357Ssam "\2012",	/*2*/
7914357Ssam "\2013",	/*3*/
8014357Ssam "\2014",	/*4*/
8114357Ssam "\2015",	/*5*/
8214357Ssam "\2016",	/*6*/
8314357Ssam "\2017",	/*7*/
8414357Ssam "\2018",	/*8*/
8514357Ssam "\2019",	/*9*/
8614357Ssam "\001:",	/*:*/
8714357Ssam "\001;",	/*;*/
8814357Ssam "\001<",	/*<*/
8914357Ssam "\001=",	/*=*/
9014357Ssam "\001>",	/*>*/
9114357Ssam "\001?",	/*?*/
9214357Ssam "\001@",	/*@*/
9314357Ssam "\201A",	/*A*/
9414357Ssam "\201B",	/*B*/
9514357Ssam "\201C",	/*C*/
9614357Ssam "\201D",	/*D*/
9714357Ssam "\201E",	/*E*/
9814357Ssam "\201F",	/*F*/
9914357Ssam "\201G",	/*G*/
10014357Ssam "\201H",	/*H*/
10114357Ssam "\201I",	/*I*/
10214357Ssam "\201J",	/*J*/
10314357Ssam "\201K",	/*K*/
10414357Ssam "\201L",	/*L*/
10514357Ssam "\201M",	/*M*/
10614357Ssam "\201N",	/*N*/
10714357Ssam "\201O",	/*O*/
10814357Ssam "\201P",	/*P*/
10914357Ssam "\201Q",	/*Q*/
11014357Ssam "\201R",	/*R*/
11114357Ssam "\201S",	/*S*/
11214357Ssam "\201T",	/*T*/
11314357Ssam "\201U",	/*U*/
11414357Ssam "\201V",	/*V*/
11514357Ssam "\201W",	/*W*/
11614357Ssam "\201X",	/*X*/
11714357Ssam "\201Y",	/*Y*/
11814357Ssam "\201Z",	/*Z*/
11914357Ssam "\001[",	/*[*/
12014357Ssam "\001\\",	/*\*/
12114357Ssam "\001]",	/*]*/
12214357Ssam "\001^",	/*^*/
12314357Ssam "\001_",	/*_ dash*/
12414357Ssam "\001`",	/*` open*/
12514357Ssam "\201a",	/*a*/
12614357Ssam "\201b",	/*b*/
12714357Ssam "\201c",	/*c*/
12814357Ssam "\201d",	/*d*/
12914357Ssam "\201e",	/*e*/
13014357Ssam "\201f",	/*f*/
13114357Ssam "\201g",	/*g*/
13214357Ssam "\201h",	/*h*/
13314357Ssam "\201i",	/*i*/
13414357Ssam "\201j",	/*j*/
13514357Ssam "\201k",	/*k*/
13614357Ssam "\201l",	/*l*/
13714357Ssam "\201m",	/*m*/
13814357Ssam "\201n",	/*n*/
13914357Ssam "\201o",	/*o*/
14014357Ssam "\201p",	/*p*/
14114357Ssam "\201q",	/*q*/
14214357Ssam "\201r",	/*r*/
14314357Ssam "\201s",	/*s*/
14414357Ssam "\201t",	/*t*/
14514357Ssam "\201u",	/*u*/
14614357Ssam "\201v",	/*v*/
14714357Ssam "\201w",	/*w*/
14814357Ssam "\201x",	/*x*/
14914357Ssam "\201y",	/*y*/
15014357Ssam "\201z",	/*z*/
15114357Ssam "\001{",	/*{*/
15214357Ssam "\001|",	/*|*/
15314357Ssam "\001}",	/*}*/
15414357Ssam "\001~",	/*~*/
15514357Ssam "\000\0",	/*narrow sp*/
15614357Ssam "\001-",	 /*hyphen*/
15714357Ssam "\001o\b+",	 /*bullet*/
158*35268Sbostic "\002[]",	 /*square*/
15914357Ssam "\001-",	 /*3/4 em*/
16014357Ssam "\001_",	 /*rule*/
16114357Ssam "\0031/4",	/*1/4*/
16214357Ssam "\0031/2",	/*1/2*/
16314357Ssam "\0033/4",	/*3/4*/
16414357Ssam "\001-",	 /*minus*/
16514357Ssam "\202fi",	 /*fi*/
16614357Ssam "\202fl",	 /*fl*/
16714357Ssam "\202ff",	 /*ff*/
16814357Ssam "\203ffi",	 /*ffi*/
16914357Ssam "\203ffl",	 /*ffl*/
17014357Ssam "\001\0338o\0339",	 /*degree*/
17114357Ssam "\001|\b-",	 /*dagger*/
17214357Ssam "\000\0",	 /*section*/
17314357Ssam "\001'",	 /*foot mark*/
17414357Ssam "\001'",	 /*acute accent*/
17514357Ssam "\001`",	 /*grave accent*/
17614357Ssam "\001_",	 /*underrule*/
17714357Ssam "\001/",	 /*slash (longer)*/
17814357Ssam "\000\0",	/*half narrow space*/
17914357Ssam "\001 ",	/*unpaddable space*/
18014357Ssam "\201\016A\017", /*alpha*/
18114357Ssam "\201\016B\017", /*beta*/
18214357Ssam "\201\016\\\017", /*gamma*/
18314357Ssam "\201\016D\017", /*delta*/
18414357Ssam "\201\016S\017", /*epsilon*/
18514357Ssam "\201\016Q\017", /*zeta*/
18614357Ssam "\201\016N\017", /*eta*/
18714357Ssam "\201\016O\017", /*theta*/
18814357Ssam "\201i",	 /*iota*/
18914357Ssam "\201k",	 /*kappa*/
19014357Ssam "\201\016L\017", /*lambda*/
19114357Ssam "\201\016M\017", /*mu*/
19214357Ssam "\201\016@\017", /*nu*/
19314357Ssam "\201\016X\017", /*xi*/
19414357Ssam "\201o",	 /*omicron*/
19514357Ssam "\201\016J\017", /*pi*/
19614357Ssam "\201\016K\017", /*rho*/
19714357Ssam "\201\016Y\017", /*sigma*/
19814357Ssam "\201\016I\017", /*tau*/
19914357Ssam "\201v",	 /*upsilon*/
20014357Ssam "\201\016U\017", /*phi*/
20114357Ssam "\201x",	 /*chi*/
20214357Ssam "\201\016V\017", /*psi*/
20314357Ssam "\201\016C\017", /*omega*/
20414357Ssam "\201\016G\017", /*Gamma*/
20514357Ssam "\201\016W\017", /*Delta*/
20614357Ssam "\201\016T\017", /*Theta*/
20714357Ssam "\201\016E\017", /*Lambda*/
20814357Ssam "\000\0",	 /*Xi*/
20914357Ssam "\201\016P\017", /*Pi*/
21014357Ssam "\201\016R\017", /*Sigma*/
21114357Ssam "\000\0",	 /**/
21214357Ssam "\201Y",	 /*Upsilon*/
21314357Ssam "\201\016F\017", /*Phi*/
21414357Ssam "\201\016H\017", /*Psi*/
21514357Ssam "\201\016Z\017", /*Omega*/
21614357Ssam "\000\0",	 /*square root*/
21714357Ssam "\000\0",	 /*terminal sigma*/
21814357Ssam "\000\0",	 /*root en*/
21914357Ssam "\001>\b_",	 /*>=*/
22014357Ssam "\001<\b_",	 /*<=*/
22114357Ssam "\001=\b_",	 /*identically equal*/
22214357Ssam "\001-",	 /*equation minus*/
22314357Ssam "\001=\b~",	 /*approx =*/
22414357Ssam "\001\0339~\0338",	 /*approximates*/
22514357Ssam "\001=\b/",	 /*not equal*/
22614357Ssam "\002->",	 /*right arrow*/
22714357Ssam "\002<-",	 /*left arrow*/
22814357Ssam "\001|\b^",	 /*up arrow*/
22914357Ssam "\000\0",	 /*down arrow*/
23014357Ssam "\001=",	 /*equation equal*/
23114357Ssam "\001x",	 /*multiply*/
23214357Ssam "\001/",	 /*divide*/
23314357Ssam "\001+\b_",	 /*plus-minus*/
23414357Ssam "\001U",	 /*cup (union)*/
23514357Ssam "\000\0",	 /*cap (intersection)*/
23614357Ssam "\000\0",	 /*subset of*/
23714357Ssam "\000\0",	 /*superset of*/
23814357Ssam "\000\0",	 /*improper subset*/
23914357Ssam "\000\0",	 /* improper superset*/
24014357Ssam "\002oo",	 /*infinity*/
24114357Ssam "\001\016]\017", /*partial derivative*/
24214357Ssam "\001\016[\017", /*gradient*/
24314357Ssam "\001\016_\017", /*not*/
24414357Ssam "\001\016^\017", /*integral sign*/
24514357Ssam "\000\0",	 /*proportional to*/
24614357Ssam "\000\0",	 /*empty set*/
24714357Ssam "\000\0",	 /*member of*/
24814357Ssam "\001+",	 /*equation plus*/
24914357Ssam "\001\0338r\0339",	 /*registered*/
25014357Ssam "\001\0338c\0339",	 /*copyright*/
25114357Ssam "\001|",	 /*box rule */
25214357Ssam "\001c\b/",	 /*cent sign*/
25314357Ssam "\001|\b=",	 /*dbl dagger*/
25414357Ssam "\002=>",	 /*right hand*/
25514357Ssam "\002<=",	 /*left hand*/
25614357Ssam "\001*",	 /*math * */
25714357Ssam "\000\0",	 /*bell system sign*/
25814357Ssam "\001|",	 /*or (was star)*/
25914357Ssam "\001O",	 /*circle*/
26014357Ssam "\001|",	 /*left top (of big curly)*/
26114357Ssam "\001|",	 /*left bottom*/
26214357Ssam "\001|",	 /*right top*/
26314357Ssam "\001|",	 /*right bot*/
26414357Ssam "\001|",	 /*left center of big curly bracket*/
26514357Ssam "\001|",	 /*right center of big curly bracket*/
26614357Ssam "\001|",	/*bold vertical*/
26714357Ssam "\001|",	/*left floor (left bot of big sq bract)*/
26814357Ssam "\001|",	/*right floor (rb of ")*/
26914357Ssam "\001|",	/*left ceiling (lt of ")*/
27014357Ssam "\001|"};	/*right ceiling (rt of ")*/
271