tests/test36.out

   1 %!PS-Adobe-2.0
   2 statusdict /setduplexmode known {
   3   false statusdict /setduplexmode get exec
   4 } if
   5 /Ps     10 def
   6 /SPs    7 def
   7 /Lh     11 def
   8 /Rm     575 def
   9 /Tm     746 def
  10 /Bh     15 def
  11 /Bf     15 def
  12 /CF     /Courier findfont Ps scalefont def
  13 /IF     /Courier-Oblique findfont Ps scalefont def
  14 /BF     /Courier-Bold findfont Ps scalefont def
  15 /CFs    /Courier findfont SPs scalefont def
  16 /IFs    /Courier-Oblique findfont SPs scalefont def
  17 /BFs    /Courier-Bold findfont SPs scalefont def
  18 /HF     /Helvetica findfont Ps scalefont def
  19 /Li CFs setfont (1234567890) stringwidth pop def
  20 /Nl     { /Vpos Vpos Lh sub def } def
  21 /Lpt    { 0 Vpos moveto } def
  22 /Gb     {
  23                 } def
  24 /Ip     { Gb .5 setlinewidth
  25                 0 Tm moveto 0 Bh neg rlineto Rm 0 rlineto 0 Bh rlineto closepath
  26                 gsave .98 setgray fill grestore stroke
  27                 0 0 moveto 0 Bf rlineto Rm 0 rlineto 0 Bf neg rlineto closepath
  28                 gsave .98 setgray fill grestore stroke
  29                 0 Bf moveto 0 Tm Bh sub lineto stroke newpath
  30                 } def
  31 /Cp     { Ip .3 setlinewidth newpath
  32                 Li 0 Bf add moveto Li Tm Bh sub lineto stroke newpath
  33                 } def
  34 /So     { gsave dup stringwidth pop Ps 3 div 0 exch rmoveto 0 rlineto fill grestore } def
  35 /Ul     { gsave dup stringwidth pop 0 -1 rmoveto 0 rlineto fill grestore } def
  36 /Bs     { gsave dup show grestore 0.5 0.5 rmoveto show } def
  37 <</PageSize [605 806]>> setpagedevice
  38 %%Trailer
  39 %%EOF