tmac/tmac.psold

   1 .\" In the newer PostScript printers, the text fonts contain all ISO Latin-1
   2 .\" characters.  The font description files that comes with groff match
   3 .\" these fonts.  The text fonts in older PostScript printers are missing
   4 .\" some of these characters.  This file prevents those characters from
   5 .\" being used.  This will allow the PostScript output to be printed on both
   6 .\" old and new printers.  The effect of this file can be undone by
   7 .\" tmac.psnew.
   8 .nr _C \n(.C
   9 .cp 0
  10 .\" Define an accented character.
  11 .de ps-achar
  12 .\" Note that character definitions are always interpreted with
  13 .\" compatibility mode off.
  14 .char \\$1 \\$3\
  15 \k[acc]\
  16 \h'(u;-\w'\\$2'-\w'\\$3'/2+\\\\n[skw]+(\w'x'*0)-\\\\n[skw])'\
  17 \v'(u;\w'x'*0+\\\\n[rst]+(\w'\\$3'*0)-\\\\n[rst])'\
  18 \\$2\
  19 \v'(u;\w'x'*0-\\\\n[rst]+(\w'\\$3'*0)+\\\\n[rst])'\
  20 \h'|\\\\n[acc]u'
  21 .ie '\\$3'\(.i' .hcode \\$1i
  22 .el .hcode \\$1\\$3
  23 ..
  24 .ps-achar \['y] \(aa y
  25 .ps-achar \['Y] \(aa Y
  26 .char \[12] \v'-.7m\s[\\n(.s*6u/10u]+.7m'1\v'-.7m\s0+.7m'\
  27 \(f/\s[\\n(.s*6u/10u]2\s0
  28 .char \[14] \v'-.7m\s[\\n(.s*6u/10u]+.7m'1\v'-.7m\s0+.7m'\
  29 \(f/\s[\\n(.s*6u/10u]4\s0
  30 .char \[34] \v'-.7m\s[\\n(.s*6u/10u]+.7m'3\v'-.7m\s0+.7m'\
  31 \(f/\s[\\n(.s*6u/10u]4\s0
  32 .char \[S1] \v'-.2m'\s-31\s+3\v'+.2m'
  33 .char \[S2] \v'-.2m'\s-32\s+3\v'+.2m'
  34 .char \[S3] \v'-.2m'\s-33\s+3\v'+.2m'
  35 .char \[bb] |
  36 .char \[de] \fS\(de
  37 .char \[-D] \Z'\v'-.1m'-'D
  38 .char \[TP] \
  39 I\h'-.25m'\v'-.33m'\s'\En(.s*6u/10u'\v'.33m'D\v'-.33m'\s0\v'.33m'
  40 .char \[Sd] \Z'\v'-.3m'\h'.2m'-'\(pd
  41 .char \[Tp] \zlp
  42 .tr \[char166]\[bb]
  43 .tr \[char176]\[de]
  44 .tr \[char177]\[+-]
  45 .tr \[char178]\[S2]
  46 .tr \[char179]\[S3]
  47 .tr \[char181]\[*m]
  48 .tr \[char185]\[S1]
  49 .tr \[char188]\[14]
  50 .tr \[char189]\[12]
  51 .tr \[char190]\[34]
  52 .tr \[char208]\[-D]
  53 .tr \[char215]\[mu]
  54 .tr \[char221]\['Y]
  55 .tr \[char222]\[TP]
  56 .tr \[char240]\[Sd]
  57 .tr \[char247]\[di]
  58 .tr \[char253]\['y]
  59 .tr \[char254]\[Tp]
  60 .cp \n(_C