1: #ifndef lint
   2: static char sccsid[] = "@(#)tab3.c	4.1 6/7/82";
   3: #endif lint
   4: 
   5: #define BYTE 8
   6: #define PAIR(A,B) (A|(B<<BYTE))
   7: /*
   8: character name and code tables
   9: default width tables
  10: modified for BTL special font version 4
  11: and Commercial II
  12: */
  13: 
  14: int chtab [] = {
  15: PAIR('h','y'), 0200,    /*hyphen*/
  16: PAIR('b','u'), 0201,    /*bullet*/
  17: PAIR('s','q'), 0202,    /*square*/
  18: PAIR('e','m'), 0203,    /*3/4em*/
  19: PAIR('r','u'), 0204,    /*rule*/
  20: PAIR('1','4'), 0205,    /*1/4*/
  21: PAIR('1','2'), 0206,    /*1/2*/
  22: PAIR('3','4'), 0207,    /*3/4*/
  23: PAIR('m','i'), 0302,    /*equation minus*/
  24: PAIR('f','i'), 0211,    /*fi*/
  25: PAIR('f','l'), 0212,    /*fl*/
  26: PAIR('f','f'), 0213,    /*ff*/
  27: PAIR('F','i'), 0214,    /*ffi*/
  28: PAIR('F','l'), 0215,    /*ffl*/
  29: PAIR('d','e'), 0216,    /*degree*/
  30: PAIR('d','g'), 0217,    /*dagger*/
  31: PAIR('s','c'), 0220,    /*section*/
  32: PAIR('f','m'), 0221,    /*foot mark*/
  33: PAIR('a','a'), 0222,    /*acute accent*/
  34: PAIR('g','a'), 0223,    /*grave accent*/
  35: PAIR('u','l'), 0224,    /*underrule*/
  36: PAIR('s','l'), 0225,    /*slash (longer)*/
  37: PAIR('*','a'), 0230,    /*alpha*/
  38: PAIR('*','b'), 0231,    /*beta*/
  39: PAIR('*','g'), 0232,    /*gamma*/
  40: PAIR('*','d'), 0233,    /*delta*/
  41: PAIR('*','e'), 0234,    /*epsilon*/
  42: PAIR('*','z'), 0235,    /*zeta*/
  43: PAIR('*','y'), 0236,    /*eta*/
  44: PAIR('*','h'), 0237,    /*theta*/
  45: PAIR('*','i'), 0240,    /*iota*/
  46: PAIR('*','k'), 0241,    /*kappa*/
  47: PAIR('*','l'), 0242,    /*lambda*/
  48: PAIR('*','m'), 0243,    /*mu*/
  49: PAIR('*','n'), 0244,    /*nu*/
  50: PAIR('*','c'), 0245,    /*xi*/
  51: PAIR('*','o'), 0246,    /*omicron*/
  52: PAIR('*','p'), 0247,    /*pi*/
  53: PAIR('*','r'), 0250,    /*rho*/
  54: PAIR('*','s'), 0251,    /*sigma*/
  55: PAIR('*','t'), 0252,    /*tau*/
  56: PAIR('*','u'), 0253,    /*upsilon*/
  57: PAIR('*','f'), 0254,    /*phi*/
  58: PAIR('*','x'), 0255,    /*chi*/
  59: PAIR('*','q'), 0256,    /*psi*/
  60: PAIR('*','w'), 0257,    /*omega*/
  61: PAIR('*','A'), 0101,    /*Alpha*/
  62: PAIR('*','B'), 0102,    /*Beta*/
  63: PAIR('*','G'), 0260,    /*Gamma*/
  64: PAIR('*','D'), 0261,    /*Delta*/
  65: PAIR('*','E'), 0105,    /*Epsilon*/
  66: PAIR('*','Z'), 0132,    /*Zeta*/
  67: PAIR('*','Y'), 0110,    /*Eta*/
  68: PAIR('*','H'), 0262,    /*Theta*/
  69: PAIR('*','I'), 0111,    /*Iota*/
  70: PAIR('*','K'), 0113,    /*Kappa*/
  71: PAIR('*','L'), 0263,    /*Lambda*/
  72: PAIR('*','M'), 0115,    /*Mu*/
  73: PAIR('*','N'), 0116,    /*Nu*/
  74: PAIR('*','C'), 0264,    /*Xi*/
  75: PAIR('*','O'), 0117,    /*Omicron*/
  76: PAIR('*','P'), 0265,    /*Pi*/
  77: PAIR('*','R'), 0120,    /*Rho*/
  78: PAIR('*','S'), 0266,    /*Sigma*/
  79: PAIR('*','T'), 0124,    /*Tau*/
  80: PAIR('*','U'), 0270,    /*Upsilon*/
  81: PAIR('*','F'), 0271,    /*Phi*/
  82: PAIR('*','X'), 0130,    /*Chi*/
  83: PAIR('*','Q'), 0272,    /*Psi*/
  84: PAIR('*','W'), 0273,    /*Omega*/
  85: PAIR('s','r'), 0274,    /*square root*/
  86: PAIR('t','s'), 0275,    /*terminal sigma*/
  87: PAIR('r','n'), 0276,    /*root en*/
  88: PAIR('>','='), 0277,    /*>=*/
  89: PAIR('<','='), 0300,    /*<=*/
  90: PAIR('=','='), 0301,    /*identically equal*/
  91: PAIR('~','='), 0303,    /*approx =*/
  92: PAIR('a','p'), 0304,    /*approximates*/
  93: PAIR('!','='), 0305,    /*not equal*/
  94: PAIR('-','>'), 0306,    /*right arrow*/
  95: PAIR('<','-'), 0307,    /*left arrow*/
  96: PAIR('u','a'), 0310,    /*up arrow*/
  97: PAIR('d','a'), 0311,    /*down arrow*/
  98: PAIR('e','q'), 0312,    /*equation equal*/
  99: PAIR('m','u'), 0313,    /*multiply*/
 100: PAIR('d','i'), 0314,    /*divide*/
 101: PAIR('+','-'), 0315,    /*plus-minus*/
 102: PAIR('c','u'), 0316,    /*cup (union)*/
 103: PAIR('c','a'), 0317,    /*cap (intersection)*/
 104: PAIR('s','b'), 0320,    /*subset of*/
 105: PAIR('s','p'), 0321,    /*superset of*/
 106: PAIR('i','b'), 0322,    /*improper subset*/
 107: PAIR('i','p'), 0323,    /*  " superset*/
 108: PAIR('i','f'), 0324,    /*infinity*/
 109: PAIR('p','d'), 0325,    /*partial derivative*/
 110: PAIR('g','r'), 0326,    /*gradient*/
 111: PAIR('n','o'), 0327,    /*not*/
 112: PAIR('i','s'), 0330,    /*integral sign*/
 113: PAIR('p','t'), 0331,    /*proportional to*/
 114: PAIR('e','s'), 0332,    /*empty set*/
 115: PAIR('m','o'), 0333,    /*member of*/
 116: PAIR('p','l'), 0334,    /*equation plus*/
 117: PAIR('r','g'), 0335,    /*registered*/
 118: PAIR('c','o'), 0336,    /*copyright*/
 119: PAIR('b','r'), 0337,    /*box vert rule*/
 120: PAIR('c','t'), 0340,    /*cent sign*/
 121: PAIR('d','d'), 0341,    /*dbl dagger*/
 122: PAIR('r','h'), 0342,    /*right hand*/
 123: PAIR('l','h'), 0343,    /*left hand*/
 124: PAIR('*','*'), 0344,    /*math * */
 125: PAIR('b','s'), 0345,    /*bell system sign*/
 126: PAIR('o','r'), 0346,    /*or*/
 127: PAIR('c','i'), 0347,    /*circle*/
 128: PAIR('l','t'), 0350,    /*left top (of big curly)*/
 129: PAIR('l','b'), 0351,    /*left bottom*/
 130: PAIR('r','t'), 0352,    /*right top*/
 131: PAIR('r','b'), 0353,    /*right bot*/
 132: PAIR('l','k'), 0354,    /*left center of big curly bracket*/
 133: PAIR('r','k'), 0355,    /*right center of big curly bracket*/
 134: PAIR('b','v'), 0356,    /*bold vertical*/
 135: PAIR('l','f'), 0357,    /*left floor (left bot of big sq bract)*/
 136: PAIR('r','f'), 0360,    /*right floor (rb of ")*/
 137: PAIR('l','c'), 0361,    /*left ceiling (lt of ")*/
 138: PAIR('r','c'), 0362,    /*right ceiling (rt of ")*/
 139: 0,0};
 140: 
 141: char codetab[256-32] = {    /*cat codes*/
 142: 00, /*space*/
 143: 0145,   /*!*/
 144: 0230,   /*"*/
 145: 0337,   /*#*/
 146: 0155,   /*$*/
 147: 053,    /*%*/
 148: 050,    /*&*/
 149: 032,    /*' close*/
 150: 0132,   /*(*/
 151: 0133,   /*)*/
 152: 0122,   /***/
 153: 0143,   /*+*/
 154: 047,    /*,*/
 155: 040,    /*- hyphen*/
 156: 044,    /*.*/
 157: 043,    /*/*/
 158: 0110,   /*0*/
 159: 0111,   /*1*/
 160: 0112,   /*2*/
 161: 0113,   /*3*/
 162: 0114,   /*4*/
 163: 0115,   /*5*/
 164: 0116,   /*6*/
 165: 0117,   /*7*/
 166: 0120,   /*8*/
 167: 0121,   /*9*/
 168: 0142,   /*:*/
 169: 023,    /*;*/
 170: 0303,   /*<*/
 171: 0140,   /*=*/
 172: 0301,   /*>*/
 173: 0147,   /*?*/
 174: 0222,   /*@*/
 175: 0103,   /*A*/
 176: 075,    /*B*/
 177: 070,    /*C*/
 178: 074,    /*D*/
 179: 072,    /*E*/
 180: 0101,   /*F*/
 181: 065,    /*G*/
 182: 060,    /*H*/
 183: 066,    /*I*/
 184: 0105,   /*J*/
 185: 0107,   /*K*/
 186: 063,    /*L*/
 187: 062,    /*M*/
 188: 061,    /*N*/
 189: 057,    /*O*/
 190: 067,    /*P*/
 191: 055,    /*Q*/
 192: 064,    /*R*/
 193: 076,    /*S*/
 194: 056,    /*T*/
 195: 0106,   /*U*/
 196: 071,    /*V*/
 197: 0104,   /*W*/
 198: 0102,   /*X*/
 199: 077,    /*Y*/
 200: 073,    /*Z*/
 201: 0134,   /*[*/
 202: 0241,   /*\*/
 203: 0135,   /*]*/
 204: 0336,   /*^*/
 205: 0240,   /*_*/
 206: 030,    /*` open*/
 207: 025,    /*a*/
 208: 012,    /*b*/
 209: 027,    /*c*/
 210: 011,    /*d*/
 211: 031,    /*e*/
 212: 014,    /*f*/
 213: 045,    /*g*/
 214: 001,    /*h*/
 215: 006,    /*i*/
 216: 015,    /*j*/
 217: 017,    /*k*/
 218: 005,    /*l*/
 219: 004,    /*m*/
 220: 003,    /*n*/
 221: 033,    /*o*/
 222: 021,    /*p*/
 223: 042,    /*q*/
 224: 035,    /*r*/
 225: 010,    /*s*/
 226: 002,    /*t*/
 227: 016,    /*u*/
 228: 037,    /*v*/
 229: 041,    /*w*/
 230: 013,    /*x*/
 231: 051,    /*y*/
 232: 007,    /*z*/
 233: 0332,   /*{*/
 234: 0151,   /*|*/
 235: 0333,   /*}*/
 236: 0342,   /*~*/
 237: 00, /*narrow space*/
 238: 040,    /*hyphen*/
 239: 0146,   /*bullet*/
 240: 0154,   /*square*/
 241: 022,    /*3/4 em*/
 242: 026,    /*rule*/
 243: 034,    /*1/4*/
 244: 036,    /*1/2*/
 245: 046,    /*3/4*/
 246: 0123,   /*minus*/
 247: 0124,   /*fi*/
 248: 0125,   /*fl*/
 249: 0126,   /*ff*/
 250: 0131,   /*ffi*/
 251: 0130,   /*ffl*/
 252: 0136,   /*degree*/
 253: 0137,   /*dagger*/
 254: 0355,   /*section*/
 255: 0150,   /*foot mark*/
 256: 0334,   /*acute accent*/
 257: 0335,   /*grave accent*/
 258: 0240,   /*underrule*/
 259: 0304,   /*slash (longer)*/
 260: 00, /*half nar sp*/
 261: 00, /**/
 262: 0225,   /*alpha*/
 263: 0212,   /*beta*/
 264: 0245,   /*gamma*/
 265: 0211,   /*delta*/
 266: 0231,   /*epsilon*/
 267: 0207,   /*zeta*/
 268: 0214,   /*eta*/
 269: 0202,   /*theta*/
 270: 0206,   /*iota*/
 271: 0217,   /*kappa*/
 272: 0205,   /*lambda*/
 273: 0204,   /*mu*/
 274: 0203,   /*nu*/
 275: 0213,   /*xi*/
 276: 0233,   /*omicron*/
 277: 0221,   /*pi*/
 278: 0235,   /*rho*/
 279: 0210,   /*sigma*/
 280: 0237,   /*tau*/
 281: 0216,   /*upsilon*/
 282: 0215,   /*phi*/
 283: 0227,   /*chi*/
 284: 0201,   /*psi*/
 285: 0251,   /*omega*/
 286: 0265,   /*Gamma*/
 287: 0274,   /*Delta*/
 288: 0256,   /*Theta*/
 289: 0263,   /*Lambda*/
 290: 0302,   /*Xi*/
 291: 0267,   /*Pi*/
 292: 0276,   /*Sigma*/
 293: 00, /**/
 294: 0306,   /*Upsilon*/
 295: 0255,   /*Phi*/
 296: 0242,   /*Psi*/
 297: 0257,   /*Omega*/
 298: 0275,   /*square root*/
 299: 0262,   /*terminal sigma (was root em)*/
 300: 0261,   /*root en*/
 301: 0327,   /*>=*/
 302: 0326,   /*<=*/
 303: 0330,   /*identically equal*/
 304: 0264,   /*equation minus*/
 305: 0277,   /*approx =*/
 306: 0272,   /*approximates*/
 307: 0331,   /*not equal*/
 308: 0354,   /*right arrow*/
 309: 0234,   /*left arrow*/
 310: 0236,   /*up arrow*/
 311: 0223,   /*down arrow*/
 312: 0232,   /*equation equal*/
 313: 0323,   /*multiply*/
 314: 0324,   /*divide*/
 315: 0325,   /*plus-minus*/
 316: 0260,   /*cup (union)*/
 317: 0305,   /*cap (intersection)*/
 318: 0270,   /*subset of*/
 319: 0271,   /*superset of*/
 320: 0350,   /*improper subset*/
 321: 0246,   /* improper superset*/
 322: 0244,   /*infinity*/
 323: 0273,   /*partial derivative*/
 324: 0253,   /*gradient*/
 325: 0307,   /*not*/
 326: 0266,   /*integral sign*/
 327: 0247,   /*proportional to*/
 328: 0343,   /*empty set*/
 329: 0341,   /*member of*/
 330: 0353,   /*equation plus*/
 331: 0141,   /*registered*/
 332: 0153,   /*copyright*/
 333: 0346,   /*box rule (was parallel sign)*/
 334: 0127,   /*cent sign*/
 335: 0345,   /*dbl dagger*/
 336: 0250,   /*right hand*/
 337: 0340,   /*left hand*/
 338: 0347,   /*math * */
 339: 0243,   /*bell system sign*/
 340: 0226,   /*or (was star)*/
 341: 0351,   /*circle*/
 342: 0311,   /*left top (of big curly)*/
 343: 0314,   /*left bottom*/
 344: 0315,   /*right top*/
 345: 0317,   /*right bot*/
 346: 0313,   /*left center of big curly bracket*/
 347: 0316,   /*right center of big curly bracket*/
 348: 0312,   /*bold vertical*/
 349: 0321,   /*left floor (left bot of big sq bract)*/
 350: 0320,   /*right floor (rb of ")*/
 351: 0322,   /*left ceiling (lt of ")*/
 352: 0310};  /*right ceiling (rt of ")*/
 353: 
 354: /*modified for Commercial II*/
 355: char W1[256-32] = { /*Times Roman widths*/
 356: 12,  /*space*/
 357: 12,  /*!*/
 358: 0,   /*"*/
 359: 0,   /*#*/
 360: 19,  /*$*/
 361: 29,  /*%*/
 362: 28,  /*&*/
 363: 12,  /*' close*/
 364: 16,  /*(*/
 365: 16,  /*)*/
 366: 16,  /***/
 367: 36,  /*+*/
 368: 12,  /*,*/
 369: 13,  /*- hyphen*/
 370: 10,  /*.*/
 371: 17,  /*/*/
 372: 19+0200, /*0*/
 373: 19+0200, /*1*/
 374: 19+0200, /*2*/
 375: 19+0200, /*3*/
 376: 19+0200, /*4*/
 377: 19+0200, /*5*/
 378: 19+0200, /*6*/
 379: 19+0200, /*7*/
 380: 19+0200, /*8*/
 381: 19+0200, /*9*/
 382: 10,  /*:*/
 383: 12,  /*;*/
 384: 0,   /*<*/
 385: 36,  /*=*/
 386: 0,   /*>*/
 387: 20,  /*?*/
 388: 0,   /*@*/
 389: 29+0200, /*A*/
 390: 23+0200, /*B*/
 391: 26+0200, /*C*/
 392: 30+0200, /*D*/
 393: 24+0200, /*E*/
 394: 23+0200, /*F*/
 395: 30+0200, /*G*/
 396: 29+0200, /*H*/
 397: 13+0200, /*I*/
 398: 16+0200, /*J*/
 399: 28+0200, /*K*/
 400: 24+0200, /*L*/
 401: 35+0200, /*M*/
 402: 29+0200, /*N*/
 403: 27+0200, /*O*/
 404: 22+0200, /*P*/
 405: 27+0300, /*Q*/
 406: 27+0200, /*R*/
 407: 20+0200, /*S*/
 408: 24+0200, /*T*/
 409: 29+0200, /*U*/
 410: 27+0200, /*V*/
 411: 36+0200, /*W*/
 412: 28+0200, /*X*/
 413: 27+0200, /*Y*/
 414: 23+0200, /*Z*/
 415: 14,  /*[*/
 416: 0,   /*\*/
 417: 14,  /*]*/
 418: 0,   /*^*/
 419: 0,   /*_*/
 420: 12,  /*` open*/
 421: 17,  /*a*/
 422: 20+0200, /*b*/
 423: 16,  /*c*/
 424: 20+0200, /*d*/
 425: 18,  /*e*/
 426: 13+0200, /*f*/
 427: 18+0100, /*g*/
 428: 21+0200, /*h*/
 429: 10+0200, /*i*/
 430: 9+0300, /*j*/
 431: 20+0200, /*k*/
 432: 10+0200, /*l*/
 433: 32,  /*m*/
 434: 21,  /*n*/
 435: 20,  /*o*/
 436: 19+0100, /*p*/
 437: 19+0100, /*q*/
 438: 14,  /*r*/
 439: 15,  /*s*/
 440: 12+0200, /*t*/
 441: 21,  /*u*/
 442: 20,  /*v*/
 443: 26,  /*w*/
 444: 20,  /*x*/
 445: 18+0100, /*y*/
 446: 17,  /*z*/
 447: 0,   /*{*/
 448: 2,   /*|*/
 449: 0,   /*}*/
 450: 0,   /*~*/
 451: 6,   /*narrow space*/
 452: 13,  /*hyphen*/
 453: 27,  /*bullet*/
 454: 27,  /*square*/
 455: 36,  /*3/4 em*/
 456: 18,  /*rule*/
 457: 29,  /*1/4*/
 458: 29,  /*1/2*/
 459: 29,  /*3/4*/
 460: 36,  /*minus*/
 461: 21,  /*fi*/
 462: 21,  /*fl*/
 463: 24,  /*ff*/
 464: 32,  /*ffi*/
 465: 32,  /*ffl*/
 466: 15,  /*degree*/
 467: 20,  /*dagger*/
 468: 0,   /*section*/
 469: 8,   /*foot mark*/
 470: 0,   /*'*/
 471: 0,   /*`*/
 472: 0,   /*_*/
 473: 0,
 474: 3,  /*half nar sp*/
 475: 0,
 476: 0,0,0,0,0,0,0,0,
 477: 0,0,0,0,0,0,0,0,
 478: 0,0,0,0,0,0,0,0,
 479: 0,0,0,0,0,0,0,0,
 480: 0,0,0,0,0,0,0,0,
 481: 0,0,0,0,0,0,0,0,
 482: 0,0,0,0,0,0,0,0,
 483: 0,0,0,0,0,0,0,0,
 484: 0,0,0,0,0,
 485: 20,  /*registered*/
 486: 20,  /*copyright*/
 487: 0,
 488: 19,  /*cent*/
 489: };
 490: 
 491: char W2[256-32] = { /*Times Italic widths*/
 492: 12,  /*space*/
 493: 13,  /*!*/
 494: 0,   /*"*/
 495: 0,   /*#*/
 496: 19,  /*$*/
 497: 27,  /*%*/
 498: 26,  /*&*/
 499: 11,  /*' close*/
 500: 15,  /*(*/
 501: 15,  /*)*/
 502: 16,  /***/
 503: 36,  /*+*/
 504: 11,  /*,*/
 505: 13,  /*- hyphen*/
 506: 11,  /*.*/
 507: 9,   /*/*/
 508: 19+0200, /*0*/
 509: 19+0200, /*1*/
 510: 19+0200, /*2*/
 511: 19+0200, /*3*/
 512: 19+0200, /*4*/
 513: 19+0200, /*5*/
 514: 19+0200, /*6*/
 515: 19+0200, /*7*/
 516: 19+0200, /*8*/
 517: 19+0200, /*9*/
 518: 11,  /*:*/
 519: 11,  /*;*/
 520: 0,   /*<*/
 521: 36,  /*=*/
 522: 0,   /*>*/
 523: 20,  /*?*/
 524: 0,   /*@*/
 525: 25+0200, /*A*/
 526: 24+0200, /*B*/
 527: 26+0200, /*C*/
 528: 27+0200, /*D*/
 529: 23+0200, /*E*/
 530: 21+0200, /*F*/
 531: 27+0200, /*G*/
 532: 29+0200, /*H*/
 533: 14+0200, /*I*/
 534: 16+0200, /*J*/
 535: 28+0200, /*K*/
 536: 24+0200, /*L*/
 537: 34+0200, /*M*/
 538: 27+0200, /*N*/
 539: 27+0200, /*O*/
 540: 22+0200, /*P*/
 541: 27+0300, /*Q*/
 542: 27+0200, /*R*/
 543: 20+0200, /*S*/
 544: 23+0200, /*T*/
 545: 28+0200, /*U*/
 546: 25+0200, /*V*/
 547: 36+0200, /*W*/
 548: 24+0200, /*X*/
 549: 24+0200, /*Y*/
 550: 25+0200, /*Z*/
 551: 13,  /*[*/
 552: 0,   /*\*/
 553: 13,  /*]*/
 554: 0,   /*^*/
 555: 0,   /*_*/
 556: 11,  /*` open*/
 557: 19,  /*a*/
 558: 18+0200, /*b*/
 559: 15,  /*c*/
 560: 18+0200, /*d*/
 561: 16,  /*e*/
 562: 11+0200, /*f*/
 563: 17+0100, /*g*/
 564: 19+0200, /*h*/
 565: 9+0200, /*i*/
 566: 9+0300, /*j*/
 567: 19+0200, /*k*/
 568: 9+0200, /*l*/
 569: 28,  /*m*/
 570: 19,  /*n*/
 571: 18,  /*o*/
 572: 17+0100, /*p*/
 573: 18+0100, /*q*/
 574: 13,  /*r*/
 575: 14,  /*s*/
 576: 10+0200, /*t*/
 577: 19,  /*u*/
 578: 16,  /*v*/
 579: 24,  /*w*/
 580: 18,  /*x*/
 581: 16+0100, /*y*/
 582: 14,  /*z*/
 583: 0,   /*{*/
 584: 2,   /*|*/
 585: 0,   /*}*/
 586: 0,   /*~*/
 587: 6,   /*narrow space*/
 588: 13,  /*hyphen*/
 589: 27,  /*bullet*/
 590: 27,  /*square*/
 591: 36,  /*3/4 em*/
 592: 18,  /*rule*/
 593: 27,  /*1/4*/
 594: 27,  /*1/2*/
 595: 27,  /*3/4*/
 596: 36,  /*minus*/
 597: 21,  /*fi*/
 598: 21,  /*fl*/
 599: 21,  /*ff*/
 600: 31,  /*ffi*/
 601: 31,  /*ffl*/
 602: 15,  /*degree*/
 603: 19,  /*dagger*/
 604: 16,  /*section*/
 605: 7,   /*foot mark*/
 606: 0,   /*'*/
 607: 0,   /*`*/
 608: 0,   /*_*/
 609: 0,
 610: 3,  /*half nar sp*/
 611: 0,
 612: 0,0,0,0,0,0,0,0,
 613: 0,0,0,0,0,0,0,0,
 614: 0,0,0,0,0,0,0,0,
 615: 0,0,0,0,0,0,0,0,
 616: 0,0,0,0,0,0,0,0,
 617: 0,0,0,0,0,0,0,0,
 618: 0,0,0,0,0,0,0,0,
 619: 0,0,0,0,0,0,0,0,
 620: 0,0,0,0,0,
 621: 20,  /*registered*/
 622: 20,  /*copyright*/
 623: 0,
 624: 19,  /*cent*/
 625: };
 626: char W3[256-32] = { /*Times Bold widths*/
 627: 12,  /*space*/
 628: 13,  /*!*/
 629: 0,   /*"*/
 630: 0,   /*#*/
 631: 18,  /*$*/
 632: 28,  /*%*/
 633: 27,  /*&*/
 634: 12,  /*' close*/
 635: 16,  /*(*/
 636: 16,  /*)*/
 637: 18,  /***/
 638: 36,  /*+*/
 639: 12,  /*,*/
 640: 14,  /*- hyphen*/
 641: 12,  /*.*/
 642: 18,  /*/*/
 643: 19+0200, /*0*/
 644: 19+0200, /*1*/
 645: 19+0200, /*2*/
 646: 19+0200, /*3*/
 647: 19+0200, /*4*/
 648: 19+0200, /*5*/
 649: 19+0200, /*6*/
 650: 19+0200, /*7*/
 651: 19+0200, /*8*/
 652: 19+0200, /*9*/
 653: 13,  /*:*/
 654: 13,  /*;*/
 655: 0,   /*<*/
 656: 36,  /*=*/
 657: 0,   /*>*/
 658: 22,  /*?*/
 659: 0,   /*@*/
 660: 28+0200, /*A*/
 661: 26+0200, /*B*/
 662: 26+0200, /*C*/
 663: 29+0200, /*D*/
 664: 25+0200, /*E*/
 665: 23+0200, /*F*/
 666: 28+0200, /*G*/
 667: 32+0200, /*H*/
 668: 16+0200, /*I*/
 669: 21+0200, /*J*/
 670: 28+0200, /*K*/
 671: 25+0200, /*L*/
 672: 36+0200, /*M*/
 673: 30+0200, /*N*/
 674: 29+0200, /*O*/
 675: 25+0200, /*P*/
 676: 29+0300, /*Q*/
 677: 28+0200, /*R*/
 678: 23+0200, /*S*/
 679: 25+0200, /*T*/
 680: 29+0200, /*U*/
 681: 27+0200, /*V*/
 682: 36+0200, /*W*/
 683: 27+0200, /*X*/
 684: 28+0200, /*Y*/
 685: 27+0200, /*Z*/
 686: 12,  /*[*/
 687: 0,   /*\*/
 688: 12,  /*]*/
 689: 0,   /*^*/
 690: 0,   /*_*/
 691: 12,  /*` open*/
 692: 19,  /*a*/
 693: 19+0200, /*b*/
 694: 16,  /*c*/
 695: 19+0200, /*d*/
 696: 17,  /*e*/
 697: 13+0200, /*f*/
 698: 18+0100, /*g*/
 699: 22+0200, /*h*/
 700: 12+0200, /*i*/
 701: 12+0300, /*j*/
 702: 23+0200, /*k*/
 703: 12+0200, /*l*/
 704: 32,  /*m*/
 705: 22,  /*n*/
 706: 18,  /*o*/
 707: 20+0100, /*p*/
 708: 19+0100, /*q*/
 709: 15,  /*r*/
 710: 17,  /*s*/
 711: 13+0200, /*t*/
 712: 21,  /*u*/
 713: 19,  /*v*/
 714: 27,  /*w*/
 715: 21,  /*x*/
 716: 19+0100, /*y*/
 717: 17,  /*z*/
 718: 0,   /*{*/
 719: 2,   /*|*/
 720: 0,   /*}*/
 721: 0,   /*~*/
 722: 6,   /*narrow space*/
 723: 14,  /*hyphen*/
 724: 27,  /*bullet*/
 725: 27,  /*square*/
 726: 36,  /*3/4 em*/
 727: 18,  /*rule*/
 728: 28,  /*1/4*/
 729: 28,  /*1/2*/
 730: 28,  /*3/4*/
 731: 36,  /*minus*/
 732: 22,  /*fi*/
 733: 22,  /*fl*/
 734: 23,  /*ff*/
 735: 33,  /*ffi*/
 736: 33,  /*ffl*/
 737: 15,  /*degree*/
 738: 20,  /*dagger*/
 739: 0,   /*section*/
 740: 9,   /*foot mark*/
 741: 0,   /*'*/
 742: 0,   /*`*/
 743: 0,   /*_*/
 744: 0,
 745: 3,  /*half nar sp*/
 746: 0,
 747: 0,0,0,0,0,0,0,0,
 748: 0,0,0,0,0,0,0,0,
 749: 0,0,0,0,0,0,0,0,
 750: 0,0,0,0,0,0,0,0,
 751: 0,0,0,0,0,0,0,0,
 752: 0,0,0,0,0,0,0,0,
 753: 0,0,0,0,0,0,0,0,
 754: 0,0,0,0,0,0,0,0,
 755: 0,0,0,0,0,
 756: 20,  /*registered*/
 757: 20,  /*copyright*/
 758: 0,
 759: 19,  /*cent*/
 760: };
 761: 
 762: /*
 763: Modified for Commercial II
 764: and with +, -, and = for equations
 765: */
 766: char W4[256-32] = { /*Special font widths*/
 767: 0,0,        /*.=Sw+042-40*/
 768: 13,  /*"*/
 769: 29,  /*#*/
 770: 0,0,0,0,        /*.=Sw+074-40*/
 771: 0,0,0,0,0,0,0,0,
 772: 0,0,0,0,0,0,0,0,
 773: 0,0,0,0,
 774: 36,  /*<*/
 775: 0,      /*.=Sw+076-40*/
 776: 36,  /*>*/
 777: 0,      /*.=Sw+100-40*/
 778: 36,  /*@*/
 779: 0,0,0,0,0,0,0,  /*.=Sw+134-40*/
 780: 0,0,0,0,0,0,0,0,
 781: 0,0,0,0,0,0,0,0,
 782: 0,0,0,0,
 783: 15,  /*\\*/
 784: 0,      /*.=Sw+136-40*/
 785: 15,  /*^*/
 786: 18,  /*_ underrule*/
 787: 0,0,0,0,0,0,0,0,
 788: 0,0,0,0,0,0,0,0,
 789: 0,0,0,0,0,0,0,0,
 790: 0,0,0,
 791: 14,  /*{*/
 792: 0,      /*.=Sw+175-40*/
 793: 14,  /*}*/
 794: 15,  /*~*/
 795: 0,      /*.=Sw+220-40*/
 796: 0,0,0,0,0,0,0,0,
 797: 0,0,0,0,0,0,0,0,
 798: 17,  /*section*/
 799: 0,      /*.=Sw+222-40*/
 800: 10,  /*acute accent*/
 801: 10,  /*grave accent*/
 802: 18,  /*underrule*/
 803: 15,  /*slash (longer)*/
 804: 0,   /**/
 805: 0,   /**/
 806: 24,  /*alpha*/
 807: 23+0300, /*beta*/
 808: 23+0100, /*gamma*/
 809: 19+0200, /*delta*/
 810: 18,  /*epsilon*/
 811: 18+0300, /*zeta*/
 812: 23+0100, /*eta*/
 813: 19+0200, /*theta*/
 814: 13,  /*iota*/
 815: 21,  /*kappa*/
 816: 22+0200, /*lambda*/
 817: 25+0100, /*mu*/
 818: 20,  /*nu*/
 819: 20+0300, /*xi*/
 820: 20,  /*omicron*/
 821: 27,  /*pi*/
 822: 21+0100, /*rho*/
 823: 27,  /*sigma*/
 824: 20,  /*tau*/
 825: 21,  /*upsilon*/
 826: 25+0300, /*phi*/
 827: 22+0100, /*chi*/
 828: 24+0300, /*psi*/
 829: 25,  /*omega*/
 830: 24+0200, /*Gamma*/
 831: 26+0200, /*Delta*/
 832: 28+0200, /*Theta*/
 833: 28+0200, /*Lambda*/
 834: 27+0200, /*Xi*/
 835: 29+0200, /*Pi*/
 836: 25+0200, /*Sigma*/
 837: 0,   /**/
 838: 28+0200, /*Upsilon*/
 839: 29+0200, /*Phi*/
 840: 32+0200, /*Psi*/
 841: 36+0200, /*Omega*/
 842: 30,  /*square root*/
 843: 18+0100, /*terminal sigma*/
 844: 18,  /*root en*/
 845: 36,  /*>=*/
 846: 36,  /*<=*/
 847: 36,  /*identically equal*/
 848: 27,  /*minus*/
 849: 36,  /*approx =*/
 850: 36,  /*approximates*/
 851: 36,  /*not equal*/
 852: 36,  /*right arrow*/
 853: 36,  /*left arrow*/
 854: 18,  /*up arrow*/
 855: 18,  /*down arrow*/
 856: 27,  /*equal*/
 857: 27,  /*multiply*/
 858: 27,  /*divide*/
 859: 36,  /*plus-minus*/
 860: 36,  /*cup (union)*/
 861: 36,  /*cap (intersection)*/
 862: 36,  /*subset of*/
 863: 36,  /*superset of*/
 864: 36,  /*improper subset*/
 865: 36,  /*improper superset*/
 866: 34,  /*infinity*/
 867: 21,  /*partial derivative*/
 868: 36+0200, /*gradient*/
 869: 22,  /*not*/
 870: 24,  /*integral sign*/
 871: 27,  /*proportional to*/
 872: 28,  /*empty set*/
 873: 27,  /*member of*/
 874: 27,  /*plus*/
 875: 0,
 876: 0,
 877: 0,   /*box vert rule (was 2.)*/
 878: 0,
 879: 17,  /*dbl dagger*/
 880: 42,  /*right hand*/
 881: 42,  /*left hand*/
 882: 16,  /*math * */
 883: 41,  /*bell system sign*/
 884: 9,   /*or*/
 885: 27,  /*circle*/
 886: 9,   /*left top (of big curly)*/
 887: 9,   /*left bottom*/
 888: 9,   /*right top*/
 889: 9,   /*right bot*/
 890: 9,   /*left center of big curly bracket*/
 891: 9,   /*right center of big curly bracket*/
 892: 9,   /*bold vertical*/
 893: 9,   /*left floor (left bot of big sq bract)*/
 894: 9,   /*right floor (rb of ")*/
 895: 9,   /*left ceiling (lt of ")*/
 896: 9 }; /*right ceiling (rt of ")*/

Defined variables

W1 defined in line 355; used 2 times
W2 defined in line 491; used 2 times
W3 defined in line 626; used 2 times
W4 defined in line 766; used 2 times
chtab defined in line 14; never used
codetab defined in line 141; never used
sccsid defined in line 2; never used

Defined macros

BYTE defined in line 5; used 1 times
  • in line 6
PAIR defined in line 6; used 124 times
Last modified: 1982-08-05
Generated: 2016-12-26
Generated by src2html V0.67
page hit count: 2165
Valid CSS Valid XHTML 1.0 Strict