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

Defined variables

W1 defined in line 351; used 1 times
W2 defined in line 487; used 1 times
W3 defined in line 622; used 1 times
W4 defined in line 762; used 1 times
chtab defined in line 10; never used
codetab defined in line 137; used 1 times

Defined macros

BYTE defined in line 1; used 1 times
  • in line 2
PAIR defined in line 2; used 124 times
Last modified: 1979-01-10
Generated: 2016-12-26
Generated by src2html V0.67
page hit count: 457
Valid CSS Valid XHTML 1.0 Strict