1 %!PS-Adobe-2.0 EPSF-2.0
3 %%DocumentFonts: Helvetica
4 %%BoundingBox: 50 50 356 302
10 /gnulinewidth 5.000 def
21 /Lshow { currentpoint stroke M
23 /Rshow { currentpoint stroke M
24 dup stringwidth pop neg vshift R show } def
25 /Cshow { currentpoint stroke M
26 dup stringwidth pop -2 div vshift R show } def
27 /DL { Color {setrgbcolor Solid {pop []} if 0 setdash }
28 {pop pop pop Solid {pop []} if 0 setdash} ifelse } def
29 /BL { stroke gnulinewidth 2 mul setlinewidth } def
30 /AL { stroke gnulinewidth 2 div setlinewidth } def
31 /PL { stroke gnulinewidth setlinewidth } def
32 /LTb { BL [] 0 0 0 DL } def
33 /LTa { AL [1 dl 2 dl] 0 setdash 0 0 0 setrgbcolor } def
34 /LT0 { PL [] 0 1 0 DL } def
35 /LT1 { PL [4 dl 2 dl] 0 0 1 DL } def
36 /LT2 { PL [2 dl 3 dl] 1 0 0 DL } def
37 /LT3 { PL [1 dl 1.5 dl] 1 0 1 DL } def
38 /LT4 { PL [5 dl 2 dl 1 dl 2 dl] 0 1 1 DL } def
39 /LT5 { PL [4 dl 3 dl 1 dl 3 dl] 1 1 0 DL } def
40 /LT6 { PL [2 dl 2 dl 2 dl 4 dl] 0 0 0 DL } def
41 /LT7 { PL [2 dl 2 dl 2 dl 2 dl 2 dl 4 dl] 1 0.3 0 DL } def
42 /LT8 { PL [2 dl 2 dl 2 dl 2 dl 2 dl 2 dl 2 dl 4 dl] 0.5 0.5 0.5 DL } def
43 /P { stroke [] 0 setdash
44 currentlinewidth 2 div sub M
45 0 currentlinewidth V stroke } def
46 /D { stroke [] 0 setdash 2 copy vpt add M
47 hpt neg vpt neg V hpt vpt neg V
48 hpt vpt V hpt neg vpt V closepath stroke
50 /A { stroke [] 0 setdash vpt sub M 0 vpt2 V
52 hpt neg vpt neg R hpt2 0 V stroke
54 /B { stroke [] 0 setdash 2 copy exch hpt sub exch vpt add M
55 0 vpt2 neg V hpt2 0 V 0 vpt2 V
56 hpt2 neg 0 V closepath stroke
58 /C { stroke [] 0 setdash exch hpt sub exch vpt add M
59 hpt2 vpt2 neg V currentpoint stroke M
60 hpt2 neg 0 R hpt2 vpt2 V stroke } def
61 /T { stroke [] 0 setdash 2 copy vpt 1.12 mul add M
62 hpt neg vpt -1.62 mul V
64 hpt neg vpt 1.62 mul V closepath stroke
74 /Helvetica findfont 140 scalefont setfont