xref: /csrg-svn/old/roff/nroff_term/tab37.c (revision 14357)

/*	tab37.c	4.1	83/08/05	*/
#define INCH 240
/*
 * Model 37 TeleType
 * nroff driving tables
 * width and code tables
 */

struct {
	int bset;
	int breset;
	int Hor;
	int Vert;
	int Newline;
	int Char;
	int Em;
	int Halfline;
	int Adj;
	char *twinit;
	char *twrest;
	char *twnl;
	char *hlr;
	char *hlf;
	char *flr;
	char *bdon;
	char *bdoff;
	char *ploton;
	char *plotoff;
	char *up;
	char *down;
	char *right;
	char *left;
	char *codetab[256-32];
	int zzz;
	} t = {
/*bset*/	0,
/*breset*/	0,
/*Hor*/		INCH/10,
/*Vert*/	INCH/12,
/*Newline*/	INCH/6,
/*Char*/	INCH/10,
/*Em*/		INCH/10,
/*Halfline*/	INCH/12,
/*Adj*/		INCH/10,
/*twinit*/	"",
/*twrest*/	"",
/*twnl*/	"\n",
/*hlr*/		"\0338",
/*hlf*/		"\0339",
/*flr*/		"\0337",
/*bdon*/	"",
/*bdoff*/	"",
/*ploton*/	"",
/*plotoff*/	"",
/*up*/		"",
/*down*/	"",
/*right*/	"",
/*left*/	"",
/*codetab*/
"\001 ",	/*space*/
"\001!",	/*!*/
"\001\"",	/*"*/
"\001#",	/*#*/
"\001$",	/*$*/
"\001%",	/*%*/
"\001&",	/*&*/
"\001'",	/*' close*/
"\001(",	/*(*/
"\001)",	/*)*/
"\001*",	/***/
"\001+",	/*+*/
"\001,",	/*,*/
"\001-",	/*- hyphen*/
"\001.",	/*.*/
"\001/",	/*/*/
"\2010",	/*0*/
"\2011",	/*1*/
"\2012",	/*2*/
"\2013",	/*3*/
"\2014",	/*4*/
"\2015",	/*5*/
"\2016",	/*6*/
"\2017",	/*7*/
"\2018",	/*8*/
"\2019",	/*9*/
"\001:",	/*:*/
"\001;",	/*;*/
"\001<",	/*<*/
"\001=",	/*=*/
"\001>",	/*>*/
"\001?",	/*?*/
"\001@",	/*@*/
"\201A",	/*A*/
"\201B",	/*B*/
"\201C",	/*C*/
"\201D",	/*D*/
"\201E",	/*E*/
"\201F",	/*F*/
"\201G",	/*G*/
"\201H",	/*H*/
"\201I",	/*I*/
"\201J",	/*J*/
"\201K",	/*K*/
"\201L",	/*L*/
"\201M",	/*M*/
"\201N",	/*N*/
"\201O",	/*O*/
"\201P",	/*P*/
"\201Q",	/*Q*/
"\201R",	/*R*/
"\201S",	/*S*/
"\201T",	/*T*/
"\201U",	/*U*/
"\201V",	/*V*/
"\201W",	/*W*/
"\201X",	/*X*/
"\201Y",	/*Y*/
"\201Z",	/*Z*/
"\001[",	/*[*/
"\001\\",	/*\*/
"\001]",	/*]*/
"\001^",	/*^*/
"\001_",	/*_ dash*/
"\001`",	/*` open*/
"\201a",	/*a*/
"\201b",	/*b*/
"\201c",	/*c*/
"\201d",	/*d*/
"\201e",	/*e*/
"\201f",	/*f*/
"\201g",	/*g*/
"\201h",	/*h*/
"\201i",	/*i*/
"\201j",	/*j*/
"\201k",	/*k*/
"\201l",	/*l*/
"\201m",	/*m*/
"\201n",	/*n*/
"\201o",	/*o*/
"\201p",	/*p*/
"\201q",	/*q*/
"\201r",	/*r*/
"\201s",	/*s*/
"\201t",	/*t*/
"\201u",	/*u*/
"\201v",	/*v*/
"\201w",	/*w*/
"\201x",	/*x*/
"\201y",	/*y*/
"\201z",	/*z*/
"\001{",	/*{*/
"\001|",	/*|*/
"\001}",	/*}*/
"\001~",	/*~*/
"\000\0",	/*narrow sp*/
"\001-",	 /*hyphen*/
"\001o\b+",	 /*bullet*/
"\002\[]",	 /*square*/
"\001-",	 /*3/4 em*/
"\001_",	 /*rule*/
"\0031/4",	/*1/4*/
"\0031/2",	/*1/2*/
"\0033/4",	/*3/4*/
"\001-",	 /*minus*/
"\202fi",	 /*fi*/
"\202fl",	 /*fl*/
"\202ff",	 /*ff*/
"\203ffi",	 /*ffi*/
"\203ffl",	 /*ffl*/
"\001\0338o\0339",	 /*degree*/
"\001|\b-",	 /*dagger*/
"\000\0",	 /*section*/
"\001'",	 /*foot mark*/
"\001'",	 /*acute accent*/
"\001`",	 /*grave accent*/
"\001_",	 /*underrule*/
"\001/",	 /*slash (longer)*/
"\000\0",	/*half narrow space*/
"\001 ",	/*unpaddable space*/
"\201\016A\017", /*alpha*/
"\201\016B\017", /*beta*/
"\201\016\\\017", /*gamma*/
"\201\016D\017", /*delta*/
"\201\016S\017", /*epsilon*/
"\201\016Q\017", /*zeta*/
"\201\016N\017", /*eta*/
"\201\016O\017", /*theta*/
"\201i",	 /*iota*/
"\201k",	 /*kappa*/
"\201\016L\017", /*lambda*/
"\201\016M\017", /*mu*/
"\201\016@\017", /*nu*/
"\201\016X\017", /*xi*/
"\201o",	 /*omicron*/
"\201\016J\017", /*pi*/
"\201\016K\017", /*rho*/
"\201\016Y\017", /*sigma*/
"\201\016I\017", /*tau*/
"\201v",	 /*upsilon*/
"\201\016U\017", /*phi*/
"\201x",	 /*chi*/
"\201\016V\017", /*psi*/
"\201\016C\017", /*omega*/
"\201\016G\017", /*Gamma*/
"\201\016W\017", /*Delta*/
"\201\016T\017", /*Theta*/
"\201\016E\017", /*Lambda*/
"\000\0",	 /*Xi*/
"\201\016P\017", /*Pi*/
"\201\016R\017", /*Sigma*/
"\000\0",	 /**/
"\201Y",	 /*Upsilon*/
"\201\016F\017", /*Phi*/
"\201\016H\017", /*Psi*/
"\201\016Z\017", /*Omega*/
"\000\0",	 /*square root*/
"\000\0",	 /*terminal sigma*/
"\000\0",	 /*root en*/
"\001>\b_",	 /*>=*/
"\001<\b_",	 /*<=*/
"\001=\b_",	 /*identically equal*/
"\001-",	 /*equation minus*/
"\001=\b~",	 /*approx =*/
"\001\0339~\0338",	 /*approximates*/
"\001=\b/",	 /*not equal*/
"\002->",	 /*right arrow*/
"\002<-",	 /*left arrow*/
"\001|\b^",	 /*up arrow*/
"\000\0",	 /*down arrow*/
"\001=",	 /*equation equal*/
"\001x",	 /*multiply*/
"\001/",	 /*divide*/
"\001+\b_",	 /*plus-minus*/
"\001U",	 /*cup (union)*/
"\000\0",	 /*cap (intersection)*/
"\000\0",	 /*subset of*/
"\000\0",	 /*superset of*/
"\000\0",	 /*improper subset*/
"\000\0",	 /* improper superset*/
"\002oo",	 /*infinity*/
"\001\016]\017", /*partial derivative*/
"\001\016[\017", /*gradient*/
"\001\016_\017", /*not*/
"\001\016^\017", /*integral sign*/
"\000\0",	 /*proportional to*/
"\000\0",	 /*empty set*/
"\000\0",	 /*member of*/
"\001+",	 /*equation plus*/
"\001\0338r\0339",	 /*registered*/
"\001\0338c\0339",	 /*copyright*/
"\001|",	 /*box rule */
"\001c\b/",	 /*cent sign*/
"\001|\b=",	 /*dbl dagger*/
"\002=>",	 /*right hand*/
"\002<=",	 /*left hand*/
"\001*",	 /*math * */
"\000\0",	 /*bell system sign*/
"\001|",	 /*or (was star)*/
"\001O",	 /*circle*/
"\001|",	 /*left top (of big curly)*/
"\001|",	 /*left bottom*/
"\001|",	 /*right top*/
"\001|",	 /*right bot*/
"\001|",	 /*left center of big curly bracket*/
"\001|",	 /*right center of big curly bracket*/
"\001|",	/*bold vertical*/
"\001|",	/*left floor (left bot of big sq bract)*/
"\001|",	/*right floor (rb of ")*/
"\001|",	/*left ceiling (lt of ")*/
"\001|"};	/*right ceiling (rt of ")*/