%!PS-Adobe-2.0 EPSF-1.2
%%Creator: FreeHand
%%Title: Draft
%%CreationDate: 1/10/90 8:56 AM
%%BoundingBox: 61 269 594 792
%%DocumentProcSets: FreeHand_header 2 0
%%DocumentSuppliedProcSets: FreeHand_header 2 0
%%ColorUsage: Color
%%DocumentCustomColors: (Mauve)
%%CMYKCustomColor: 0.3 0.4 0.05 0  (Mauve)
%%CMYKProcessColor: 0 0 0 0.1  (Black10)
%%+ 0 0 0 0.2  (Black20)
%%+ 0 0 0 0.3  (Black30)
%%+ 0 0 0 0.05  (Black5)
%%+ 0 0 0 0.4  (Black40)
%%+ 0 0 0 0.5  (Black50)
%%+ 0 0 0 0.6  (Black60)
%%+ 0 0 0 0.7  (Black70)
%%+ 0 0 0 0.8  (Black80)
%%+ 0 0 0 0.9  (Black90)
%%DocumentFonts: Symbol
%%+Helvetica-Bold
%%DocumentNeededFonts: Symbol
%%+Helvetica-Bold
%%EndComments
%%BeginProcSet: FreeHand_header 2 0
/FreeHandDict 200 dict def
FreeHandDict begin
/currentpacking where{pop true setpacking}if
/bdf{bind def}bind def
/bdef{bind def}bdf
/xdf{exch def}bdf
/ndf{1 index where{pop pop pop}{dup xcheck{bind}if def}ifelse}bdf
/min{2 copy gt{exch}if pop}bdf
/max{2 copy lt{exch}if pop}bdf
/dr{transform .25 sub round .25 add
exch .25 sub round .25 add exch itransform}bdf
/curveto{dr curveto}bdf
/lineto{dr lineto}bdf
/moveto{dr moveto}bdf
/graystep 1 256 div def
/bottom -0 def
/delta -0 def
/frac -0 def
/left -0 def
/numsteps -0 def
/numsteps1 -0 def
/radius -0 def
/right -0 def
/top -0 def
/x -0 def
/y -0 def
/df currentflat def
/tempstr 1 string def
/clipflatness 3 def
/inverted?
0 currenttransfer exec .5 ge def
/concatprocs{
/proc2 exch cvlit def/proc1 exch cvlit def
/newproc proc1 length proc2 length add array def
newproc 0 proc1 putinterval newproc proc1 length proc2 putinterval
newproc cvx}bdf
/storerect{/top xdf/right xdf/bottom xdf/left xdf}bdf
/rectpath{newpath left bottom moveto left top lineto
right top lineto right bottom lineto closepath}bdf
/sf{dup 0 eq{pop df dup 3 mul}{dup} ifelse /clipflatness xdf setflat}bdf
version cvr 38.0 le
{/setrgbcolor{
currenttransfer exec 3 1 roll
currenttransfer exec 3 1 roll
currenttransfer exec 3 1 roll
setrgbcolor}bdf}if
/gettint{0 get}bdf
/puttint{0 exch put}bdf
/vms{/vmsv save def}bdf
/vmr{vmsv restore}bdf
/vmrs{vmr vms}bdf
/CD{/NF exch def
{exch dup/FID ne{exch NF 3 1 roll put}
{pop pop}ifelse}forall NF}bdf
/MN{1 index length/Len exch def
dup length Len add string dup
Len 4 -1 roll putinterval dup 0 4 -1 roll putinterval}bdf
/RC{256 string cvs(|______)anchorsearch
{1 index MN cvn/NewN exch def cvn
findfont dup maxlength dict CD dup/FontName NewN put dup
/Encoding MacVec put NewN exch definefont pop}{pop}ifelse}bdf
/RF{dup FontDirectory exch known{pop}{RC}ifelse}bdf
/FF{dup 256 string cvs(|______)exch MN cvn dup FontDirectory exch known
{exch}if pop findfont}bdf
userdict begin /BDFontDict 20 dict def end
BDFontDict begin
/bu{}def
/bn{}def
/setTxMode{pop}def
/gm{moveto}def
/show{pop}def
/gr{pop}def
/fnt{pop pop pop}def
/fs{pop}def
/fz{pop}def
/lin{pop pop}def
end
/MacVec 256 array def
MacVec 0 /Helvetica findfont
/Encoding get 0 128 getinterval putinterval
MacVec 127 /DEL put MacVec 16#27 /quotesingle put MacVec 16#60 /grave put
/NUL/SOH/STX/ETX/EOT/ENQ/ACK/BEL/BS/HT/LF/VT/FF/CR/SO/SI
/DLE/DC1/DC2/DC3/DC4/NAK/SYN/ETB/CAN/EM/SUB/ESC/FS/GS/RS/US
MacVec 0 32 getinterval astore pop
/Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis/Udieresis/aacute
/agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave
/ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute
/ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis
/dagger/degree/cent/sterling/section/bullet/paragraph/germandbls
/register/copyright/trademark/acute/dieresis/notequal/AE/Oslash
/infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff/summation
/product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash
/questiondown/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft
/guillemotright/ellipsis/nbspace/Agrave/Atilde/Otilde/OE/oe
/endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide/lozenge
/ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright/fi/fl
/daggerdbl/periodcentered/quotesinglbase/quotedblbase
/perthousand/Acircumflex/Ecircumflex/Aacute
/Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave/Oacute/Ocircumflex
/apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde
/macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron
MacVec 128 128 getinterval astore pop
/fps{currentflat exch dup 0 le{pop 1}if
{dup setflat 3 index stopped
{1.3 mul dup 3 index gt{pop setflat pop pop stop}if}{exit}ifelse
}loop pop setflat pop pop
}bdf
/fp{100 currentflat fps}bdf
/rfp{clipflatness currentflat fps}bdf
/fcp{100 clipflatness fps}bdf
/fclip{{clip}fcp}bdf
/feoclip{{eoclip}fcp}bdf
end %. FreeHandDict
%%EndProcSet
%%BeginSetup
FreeHandDict begin
/ccmyk{dup 5 -1 roll sub 0 max exch}ndf
/setcmykcolor{1 exch sub ccmyk ccmyk ccmyk pop setrgbcolor}ndf
/setcmykcoloroverprint{4{dup -1 eq{pop 0}if 4 1 roll}repeat setcmykcolor}ndf
/findcmykcustomcolor{5 /packedarray where{pop packedarray}{array astore readonly}ifelse}ndf
/setcustomcolor{exch aload pop pop 4{4 index mul 4 1 roll}repeat setcmykcolor pop}ndf
/setseparationgray{1 exch sub dup dup dup setcmykcolor}ndf
/setoverprint{pop}ndf
/currentoverprint false ndf
/colorimage{pop pop
[5 -1 roll/exec cvx 6 -1 roll/exec cvx 7 -1 roll/exec cvx 8 -1 roll/exec cvx
/exch cvx/pop cvx/exch cvx/pop cvx/exch cvx/pop cvx/invbuf cvx]cvx image}
%. version 47.1 of Postscript defines colorimage incorrectly (rgb model only)
version cvr 47.1 le{userdict begin bdf end}{ndf}ifelse
/customcolorimage{pop image}ndf
/separationimage{image}ndf
/newcmykcustomcolor{6 /packedarray where{pop packedarray}{array astore readonly}ifelse}ndf
/inkoverprint false ndf
/setinkoverprint{pop}ndf
/overprintprocess{pop}ndf
/setspotcolor
{spots exch get 0 5 getinterval exch setcustomcolor}ndf
/currentcolortransfer{currenttransfer dup dup dup}ndf
/setcolortransfer{systemdict begin settransfer end pop pop pop}ndf
/setimagecmyk{dup length 4 eq
{aload pop}
{aload pop spots exch get 0 4 getinterval aload pop 4
{4 index mul 4 1 roll}repeat 5 -1 roll pop} ifelse
systemdict /colorimage known{version cvr 47.1 gt}{false}ifelse
not{pop 1 currentgray sub}if
/ik xdf /iy xdf /im xdf /ic xdf
}ndf
/setcolor{dup length 4 eq
{aload overprintprocess setcmykcolor}
{aload 1 get spots exch get 5 get setinkoverprint setspotcolor}
ifelse}ndf
/bc2[0 0]def
/bc4[0 0 0 0]def
/c1[0 0 0 0]def
/c2[0 0 0 0]def
/absmax{2 copy abs exch abs gt{exch}if pop}bdf
/calcstep
{c1 length 4 eq
{
0 1 3
{c1 1 index get
c2 3 -1 roll get
sub
}for
absmax absmax absmax
}
{
bc2 c1 1 get 1 exch put
c1 gettint c2 gettint
sub abs
}ifelse
graystep div abs round dup 0 eq{pop 1}if
dup /numsteps xdf 1 sub dup 0 eq{pop 1}if /numsteps1 xdf
}bdf
/cblend{
c1 length 4 eq
{
0 1 3
{bc4 exch
c1 1 index get
c2 2 index get
1 index sub
frac mul add put
}for bc4
}{
bc2
c1 gettint
c2 gettint
1 index sub
frac mul add
puttint bc2
}ifelse
setcolor
}bdf
/logtaper{/frac frac 9 mul 1 add log def}bdf
/imbits 1 def
/iminv false def
/invbuf{0 1 2 index length 1 sub{dup 2 index exch get 255 exch sub 2 index 3 1 roll put}for}bdf
/cyanrp{currentfile cyanbuf readhexstring pop iminv{invbuf}if}def
/magentarp{cyanbuf magentabuf copy}bdf
/yellowrp{cyanbuf yellowbuf copy}bdf
/blackrp{cyanbuf blackbuf copy}bdf
/fixtransfer{
dup{ic mul ic sub 1 add}concatprocs exch
dup{im mul im sub 1 add}concatprocs exch
dup{iy mul iy sub 1 add}concatprocs exch
{ik mul ik sub 1 add}concatprocs
currentcolortransfer
5 -1 roll exch concatprocs 7 1 roll
4 -1 roll exch concatprocs 6 1 roll
3 -1 roll exch concatprocs 5 1 roll
concatprocs 4 1 roll
setcolortransfer
}bdf
/textopf false def
/curtextmtx{}def
/otw .25 def
/msf{dup/curtextmtx xdf makefont setfont}bdf
/makesetfont/msf load def
/curtextheight{.707104 .707104 curtextmtx dtransform
dup mul exch dup mul add sqrt}bdf
/ta{1 index
{tempstr 0 2 index put tempstr 2 index
gsave exec grestore
tempstr stringwidth rmoveto
5 index eq{6 index 6 index rmoveto}if
3 index 3 index rmoveto
}forall 7{pop}repeat}bdf
/sts{setcolor textopf setoverprint/ts{awidthshow}def exec}bdf
/stol{setlinewidth setcolor textopf setoverprint newpath
/ts{{false charpath stroke}ta}def exec}bdf
/currentpacking where{pop false setpacking}if
%%EndSetup
/spots[1 0 0 0 (Process Cyan) false newcmykcustomcolor
0 1 0 0 (Process Magenta) false newcmykcustomcolor
0 0 1 0 (Process Yellow) false newcmykcustomcolor
0 0 0 1 (Process Black) false newcmykcustomcolor
0.3 0.4 0.05 0  (Mauve) false
newcmykcustomcolor
]def
vms
gsave 100 currentscreen pop exch pop currentscreen exch pop exch pop setscreen
%%IncludeFont: Helvetica-Bold
/f1 /|______Helvetica-Bold dup RF findfont def
{
f1 [84.852905 84.852905 -84.852905 84.852905 0 0] makesetfont
211.401917 373.505249 moveto
0 0 32 0 0 (D) ts
266.713745 428.817078 moveto
0 0 32 0 0 (R) ts
326.272339 488.375702 moveto
0 0 32 0 0 (A) ts
385.830994 547.934326 moveto
0 0 32 0 0 (FT) ts
} 
[0 0 0 0.1]
sts
vmrs
grestore
vmr
end  % FreeHandDict
%%EndDocument: _