1 #ifndef lint 2 static char ftSsccsid[] = "@(#)ftS.c 4.1 06/07/82"; 3 #endif lint 4 5 /* 6 Modified for Commercial II 7 and with +, -, and = for equations 8 */ 9 char Sw[256-32] { /*Special font widths*/ 10 0,0, /*.=Sw+042-40*/ 11 13, /*"*/ 12 29, /*#*/ 13 0,0,0,0, /*.=Sw+074-40*/ 14 0,0,0,0,0,0,0,0, 15 0,0,0,0,0,0,0,0, 16 0,0,0,0, 17 36, /*<*/ 18 0, /*.=Sw+076-40*/ 19 36, /*>*/ 20 0, /*.=Sw+100-40*/ 21 36, /*@*/ 22 0,0,0,0,0,0,0, /*.=Sw+134-40*/ 23 0,0,0,0,0,0,0,0, 24 0,0,0,0,0,0,0,0, 25 0,0,0,0, 26 15, /*\\*/ 27 0, /*.=Sw+136-40*/ 28 15, /*^*/ 29 18, /*_ underrule*/ 30 0,0,0,0,0,0,0,0, 31 0,0,0,0,0,0,0,0, 32 0,0,0,0,0,0,0,0, 33 0,0,0, 34 14, /*{*/ 35 0, /*.=Sw+175-40*/ 36 14, /*}*/ 37 15, /*~*/ 38 0, /*.=Sw+220-40*/ 39 0,0,0,0,0,0,0,0, 40 0,0,0,0,0,0,0,0, 41 17, /*section*/ 42 0, /*.=Sw+222-40*/ 43 10, /*acute accent*/ 44 10, /*grave accent*/ 45 18, /*underrule*/ 46 15, /*slash (longer)*/ 47 0, /**/ 48 0, /**/ 49 24, /*alpha*/ 50 23+0300, /*beta*/ 51 23+0100, /*gamma*/ 52 19+0200, /*delta*/ 53 18, /*epsilon*/ 54 18+0300, /*zeta*/ 55 23+0100, /*eta*/ 56 19+0200, /*theta*/ 57 13, /*iota*/ 58 21, /*kappa*/ 59 22+0200, /*lambda*/ 60 25+0100, /*mu*/ 61 20, /*nu*/ 62 20+0300, /*xi*/ 63 20, /*omicron*/ 64 27, /*pi*/ 65 21+0100, /*rho*/ 66 27, /*sigma*/ 67 20, /*tau*/ 68 21, /*upsilon*/ 69 25+0300, /*phi*/ 70 22+0100, /*chi*/ 71 24+0300, /*psi*/ 72 25, /*omega*/ 73 24+0200, /*Gamma*/ 74 26+0200, /*Delta*/ 75 28+0200, /*Theta*/ 76 28+0200, /*Lambda*/ 77 27+0200, /*Xi*/ 78 29+0200, /*Pi*/ 79 25+0200, /*Sigma*/ 80 0, /**/ 81 28+0200, /*Upsilon*/ 82 29+0200, /*Phi*/ 83 32+0200, /*Psi*/ 84 36+0200, /*Omega*/ 85 30, /*square root*/ 86 18+0100, /*terminal sigma*/ 87 18, /*root en*/ 88 36, /*>=*/ 89 36, /*<=*/ 90 36, /*identically equal*/ 91 27, /*minus*/ 92 36, /*approx =*/ 93 36, /*approximates*/ 94 36, /*not equal*/ 95 36, /*right arrow*/ 96 36, /*left arrow*/ 97 18, /*up arrow*/ 98 18, /*down arrow*/ 99 27, /*equal*/ 100 27, /*multiply*/ 101 27, /*divide*/ 102 36, /*plus-minus*/ 103 36, /*cup (union)*/ 104 36, /*cap (intersection)*/ 105 36, /*subset of*/ 106 36, /*superset of*/ 107 36, /*improper subset*/ 108 36, /*improper superset*/ 109 34, /*infinity*/ 110 21, /*partial derivative*/ 111 36+0200, /*gradient*/ 112 22, /*not*/ 113 24, /*integral sign*/ 114 27, /*proportional to*/ 115 28, /*empty set*/ 116 27, /*member of*/ 117 27, /*plus*/ 118 0, 119 0, 120 0, /*box vert rule (was 2.)*/ 121 0, 122 17, /*dbl dagger*/ 123 42, /*right hand*/ 124 42, /*left hand*/ 125 16, /*math * */ 126 41, /*bell system sign*/ 127 9, /*or*/ 128 27, /*circle*/ 129 9, /*left top (of big curly)*/ 130 9, /*left bottom*/ 131 9, /*right top*/ 132 9, /*right bot*/ 133 9, /*left center of big curly bracket*/ 134 9, /*right center of big curly bracket*/ 135 9, /*bold vertical*/ 136 9, /*left floor (left bot of big sq bract)*/ 137 9, /*right floor (rb of ")*/ 138 9, /*left ceiling (lt of ")*/ 139 9 }; /*right ceiling (rt of ")*/ 140