1 /*- 2 * %sccs.include.proprietary.c% 3 * 4 * @(#)tab37.c 4.3 (Berkeley) 04/18/91 5 */ 6 7 #define INCH 240 8 /* 9 * Model 37 TeleType 10 * nroff driving tables 11 * width and code tables 12 */ 13 14 struct { 15 int bset; 16 int breset; 17 int Hor; 18 int Vert; 19 int Newline; 20 int Char; 21 int Em; 22 int Halfline; 23 int Adj; 24 char *twinit; 25 char *twrest; 26 char *twnl; 27 char *hlr; 28 char *hlf; 29 char *flr; 30 char *bdon; 31 char *bdoff; 32 char *ploton; 33 char *plotoff; 34 char *up; 35 char *down; 36 char *right; 37 char *left; 38 char *codetab[256-32]; 39 int zzz; 40 } t = { 41 /*bset*/ 0, 42 /*breset*/ 0, 43 /*Hor*/ INCH/10, 44 /*Vert*/ INCH/12, 45 /*Newline*/ INCH/6, 46 /*Char*/ INCH/10, 47 /*Em*/ INCH/10, 48 /*Halfline*/ INCH/12, 49 /*Adj*/ INCH/10, 50 /*twinit*/ "", 51 /*twrest*/ "", 52 /*twnl*/ "\n", 53 /*hlr*/ "\0338", 54 /*hlf*/ "\0339", 55 /*flr*/ "\0337", 56 /*bdon*/ "", 57 /*bdoff*/ "", 58 /*ploton*/ "", 59 /*plotoff*/ "", 60 /*up*/ "", 61 /*down*/ "", 62 /*right*/ "", 63 /*left*/ "", 64 /*codetab*/ 65 "\001 ", /*space*/ 66 "\001!", /*!*/ 67 "\001\"", /*"*/ 68 "\001#", /*#*/ 69 "\001$", /*$*/ 70 "\001%", /*%*/ 71 "\001&", /*&*/ 72 "\001'", /*' close*/ 73 "\001(", /*(*/ 74 "\001)", /*)*/ 75 "\001*", /***/ 76 "\001+", /*+*/ 77 "\001,", /*,*/ 78 "\001-", /*- hyphen*/ 79 "\001.", /*.*/ 80 "\001/", /*/*/ 81 "\2010", /*0*/ 82 "\2011", /*1*/ 83 "\2012", /*2*/ 84 "\2013", /*3*/ 85 "\2014", /*4*/ 86 "\2015", /*5*/ 87 "\2016", /*6*/ 88 "\2017", /*7*/ 89 "\2018", /*8*/ 90 "\2019", /*9*/ 91 "\001:", /*:*/ 92 "\001;", /*;*/ 93 "\001<", /*<*/ 94 "\001=", /*=*/ 95 "\001>", /*>*/ 96 "\001?", /*?*/ 97 "\001@", /*@*/ 98 "\201A", /*A*/ 99 "\201B", /*B*/ 100 "\201C", /*C*/ 101 "\201D", /*D*/ 102 "\201E", /*E*/ 103 "\201F", /*F*/ 104 "\201G", /*G*/ 105 "\201H", /*H*/ 106 "\201I", /*I*/ 107 "\201J", /*J*/ 108 "\201K", /*K*/ 109 "\201L", /*L*/ 110 "\201M", /*M*/ 111 "\201N", /*N*/ 112 "\201O", /*O*/ 113 "\201P", /*P*/ 114 "\201Q", /*Q*/ 115 "\201R", /*R*/ 116 "\201S", /*S*/ 117 "\201T", /*T*/ 118 "\201U", /*U*/ 119 "\201V", /*V*/ 120 "\201W", /*W*/ 121 "\201X", /*X*/ 122 "\201Y", /*Y*/ 123 "\201Z", /*Z*/ 124 "\001[", /*[*/ 125 "\001\\", /*\*/ 126 "\001]", /*]*/ 127 "\001^", /*^*/ 128 "\001_", /*_ dash*/ 129 "\001`", /*` open*/ 130 "\201a", /*a*/ 131 "\201b", /*b*/ 132 "\201c", /*c*/ 133 "\201d", /*d*/ 134 "\201e", /*e*/ 135 "\201f", /*f*/ 136 "\201g", /*g*/ 137 "\201h", /*h*/ 138 "\201i", /*i*/ 139 "\201j", /*j*/ 140 "\201k", /*k*/ 141 "\201l", /*l*/ 142 "\201m", /*m*/ 143 "\201n", /*n*/ 144 "\201o", /*o*/ 145 "\201p", /*p*/ 146 "\201q", /*q*/ 147 "\201r", /*r*/ 148 "\201s", /*s*/ 149 "\201t", /*t*/ 150 "\201u", /*u*/ 151 "\201v", /*v*/ 152 "\201w", /*w*/ 153 "\201x", /*x*/ 154 "\201y", /*y*/ 155 "\201z", /*z*/ 156 "\001{", /*{*/ 157 "\001|", /*|*/ 158 "\001}", /*}*/ 159 "\001~", /*~*/ 160 "\000\0", /*narrow sp*/ 161 "\001-", /*hyphen*/ 162 "\001o\b+", /*bullet*/ 163 "\002[]", /*square*/ 164 "\001-", /*3/4 em*/ 165 "\001_", /*rule*/ 166 "\0031/4", /*1/4*/ 167 "\0031/2", /*1/2*/ 168 "\0033/4", /*3/4*/ 169 "\001-", /*minus*/ 170 "\202fi", /*fi*/ 171 "\202fl", /*fl*/ 172 "\202ff", /*ff*/ 173 "\203ffi", /*ffi*/ 174 "\203ffl", /*ffl*/ 175 "\001\0338o\0339", /*degree*/ 176 "\001|\b-", /*dagger*/ 177 "\000\0", /*section*/ 178 "\001'", /*foot mark*/ 179 "\001'", /*acute accent*/ 180 "\001`", /*grave accent*/ 181 "\001_", /*underrule*/ 182 "\001/", /*slash (longer)*/ 183 "\000\0", /*half narrow space*/ 184 "\001 ", /*unpaddable space*/ 185 "\201\016A\017", /*alpha*/ 186 "\201\016B\017", /*beta*/ 187 "\201\016\\\017", /*gamma*/ 188 "\201\016D\017", /*delta*/ 189 "\201\016S\017", /*epsilon*/ 190 "\201\016Q\017", /*zeta*/ 191 "\201\016N\017", /*eta*/ 192 "\201\016O\017", /*theta*/ 193 "\201i", /*iota*/ 194 "\201k", /*kappa*/ 195 "\201\016L\017", /*lambda*/ 196 "\201\016M\017", /*mu*/ 197 "\201\016@\017", /*nu*/ 198 "\201\016X\017", /*xi*/ 199 "\201o", /*omicron*/ 200 "\201\016J\017", /*pi*/ 201 "\201\016K\017", /*rho*/ 202 "\201\016Y\017", /*sigma*/ 203 "\201\016I\017", /*tau*/ 204 "\201v", /*upsilon*/ 205 "\201\016U\017", /*phi*/ 206 "\201x", /*chi*/ 207 "\201\016V\017", /*psi*/ 208 "\201\016C\017", /*omega*/ 209 "\201\016G\017", /*Gamma*/ 210 "\201\016W\017", /*Delta*/ 211 "\201\016T\017", /*Theta*/ 212 "\201\016E\017", /*Lambda*/ 213 "\000\0", /*Xi*/ 214 "\201\016P\017", /*Pi*/ 215 "\201\016R\017", /*Sigma*/ 216 "\000\0", /**/ 217 "\201Y", /*Upsilon*/ 218 "\201\016F\017", /*Phi*/ 219 "\201\016H\017", /*Psi*/ 220 "\201\016Z\017", /*Omega*/ 221 "\000\0", /*square root*/ 222 "\000\0", /*terminal sigma*/ 223 "\000\0", /*root en*/ 224 "\001>\b_", /*>=*/ 225 "\001<\b_", /*<=*/ 226 "\001=\b_", /*identically equal*/ 227 "\001-", /*equation minus*/ 228 "\001=\b~", /*approx =*/ 229 "\001\0339~\0338", /*approximates*/ 230 "\001=\b/", /*not equal*/ 231 "\002->", /*right arrow*/ 232 "\002<-", /*left arrow*/ 233 "\001|\b^", /*up arrow*/ 234 "\000\0", /*down arrow*/ 235 "\001=", /*equation equal*/ 236 "\001x", /*multiply*/ 237 "\001/", /*divide*/ 238 "\001+\b_", /*plus-minus*/ 239 "\001U", /*cup (union)*/ 240 "\000\0", /*cap (intersection)*/ 241 "\000\0", /*subset of*/ 242 "\000\0", /*superset of*/ 243 "\000\0", /*improper subset*/ 244 "\000\0", /* improper superset*/ 245 "\002oo", /*infinity*/ 246 "\001\016]\017", /*partial derivative*/ 247 "\001\016[\017", /*gradient*/ 248 "\001\016_\017", /*not*/ 249 "\001\016^\017", /*integral sign*/ 250 "\000\0", /*proportional to*/ 251 "\000\0", /*empty set*/ 252 "\000\0", /*member of*/ 253 "\001+", /*equation plus*/ 254 "\001\0338r\0339", /*registered*/ 255 "\001\0338c\0339", /*copyright*/ 256 "\001|", /*box rule */ 257 "\001c\b/", /*cent sign*/ 258 "\001|\b=", /*dbl dagger*/ 259 "\002=>", /*right hand*/ 260 "\002<=", /*left hand*/ 261 "\001*", /*math * */ 262 "\000\0", /*bell system sign*/ 263 "\001|", /*or (was star)*/ 264 "\001O", /*circle*/ 265 "\001|", /*left top (of big curly)*/ 266 "\001|", /*left bottom*/ 267 "\001|", /*right top*/ 268 "\001|", /*right bot*/ 269 "\001|", /*left center of big curly bracket*/ 270 "\001|", /*right center of big curly bracket*/ 271 "\001|", /*bold vertical*/ 272 "\001|", /*left floor (left bot of big sq bract)*/ 273 "\001|", /*right floor (rb of ")*/ 274 "\001|", /*left ceiling (lt of ")*/ 275 "\001|"}; /*right ceiling (rt of ")*/ 276