2 % Version 3.3.2 prologue for text files.
20 /pagebbox [0 0 612 792] def
22 /inch {72 mul} bind def
23 /min {2 copy gt {exch} if pop} bind def
25 /show {show} bind def % so later references don't bind
26 /stringwidth {stringwidth} bind def
29 counttomark 2 idiv {def} repeat pop
31 landscape {/orientation 90 orientation add def} if
32 font findfont pointsize scalefont setfont
33 /charwidth (M) stringwidth pop def
34 /linespace pointsize pointsize .10 mul add neg def
37 xcenter ycenter translate
38 orientation rotation mul rotate
39 width 2 div neg height 2 div translate
40 xoffset inch yoffset inch neg translate
41 margin 2 div dup neg translate
42 magnification dup aspectratio mul scale
43 height width div 1 min dup scale
48 useclippath userdict /gotpagebbox known not and {
49 /pagebbox [clippath pathbbox newpath] def
50 roundpage currentdict /roundpagebbox known and {roundpagebbox} if
53 4 -1 roll exch 4 1 roll 4 copy
54 landscape {4 2 roll} if
57 add 2 div /xcenter exch def
58 add 2 div /ycenter exch def
59 userdict /gotpagebbox true put
62 /pagesetup {/page exch def 0 0 moveto 0} bind def
65 counttomark 2 idiv {charwidth mul currentpoint exch pop moveto show} repeat
66 linespace add dup 0 exch moveto
69 /l {show linespace add dup 0 exch moveto} bind def
72 counttomark 2 idiv {charwidth mul currentpoint exch pop moveto show} repeat
75 /done {/lastpage where {pop lastpage} if} def