%!PS-Adobe-2.0
%%Creator: dvips 5.519 Copyright 1986, 1993 Radical Eye Software
%%CreationDate: Thu Jul 28 14:55:21 1994
%%Pages: 27
%%PageOrder: Ascend
%%BoundingBox: 0 0 612 792
%%EndComments
%DVIPSCommandLine: dvips -f
%DVIPSSource: Common TeX output 1994.07.28:1453
%%BeginProcSet: tex.pro
/TeXDict 250 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N
/X{S N}B /TR{translate}N /isls false N /vsize 11 72 mul N /hsize 8.5 72
mul N /landplus90{false}def /@rigin{isls{[0 landplus90{1 -1}{-1 1}
ifelse 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale
isls{landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div
hsize mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul
TR matrix currentmatrix dup dup 4 get round 4 exch put dup dup 5 get
round 5 exch put setmatrix}N /@landscape{/isls true N}B /@manualfeed{
statusdict /manualfeed true put}B /@copies{/#copies X}B /FMat[1 0 0 -1 0
0]N /FBB[0 0 0 0]N /nn 0 N /IE 0 N /ctr 0 N /df-tail{/nn 8 dict N nn
begin /FontType 3 N /FontMatrix fntrx N /FontBBox FBB N string /base X
array /BitMaps X /BuildChar{CharBuilder}N /Encoding IE N end dup{/foo
setfont}2 array copy cvx N load 0 nn put /ctr 0 N[}B /df{/sf 1 N /fntrx
FMat N df-tail}B /dfs{div /sf X /fntrx[sf 0 0 sf neg 0 0]N df-tail}B /E{
pop nn dup definefont setfont}B /ch-width{ch-data dup length 5 sub get}
B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{128 ch-data dup
length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub get 127 sub}B
/ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data dup type
/stringtype ne{ctr get /ctr ctr 1 add N}if}B /id 0 N /rw 0 N /rc 0 N /gp
0 N /cp 0 N /G 0 N /sf 0 N /CharBuilder{save 3 1 roll S dup /base get 2
index get S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx 0 ch-xoff
ch-yoff ch-height sub ch-xoff ch-width add ch-yoff setcachedevice
ch-width ch-height true[1 0 0 -1 -.1 ch-xoff sub ch-yoff .1 add]{
ch-image}imagemask restore}B /D{/cc X dup type /stringtype ne{]}if nn
/base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{dup dup length 1
sub dup 2 index S get sf div put}if put /ctr ctr 1 add N}B /I{cc 1 add D
}B /bop{userdict /bop-hook known{bop-hook}if /SI save N @rigin 0 0
moveto /V matrix currentmatrix dup 1 get dup mul exch 0 get dup mul add
.99 lt{/QV}{/RV}ifelse load def pop pop}N /eop{SI restore showpage
userdict /eop-hook known{eop-hook}if}N /@start{userdict /start-hook
known{start-hook}if pop /VResolution X /Resolution X 1000 div /DVImag X
/IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn put}for
65781.76 div /vsize X 65781.76 div /hsize X}N /p{show}N /RMat[1 0 0 -1 0
0]N /BDot 260 string N /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V
{}B /RV statusdict begin /product where{pop product dup length 7 ge{0 7
getinterval dup(Display)eq exch 0 4 getinterval(NeXT)eq or}{pop false}
ifelse}{false}ifelse end{{gsave TR -.1 -.1 TR 1 1 scale rulex ruley
false RMat{BDot}imagemask grestore}}{{gsave TR -.1 -.1 TR rulex ruley
scale 1 1 false RMat{BDot}imagemask grestore}}ifelse B /QV{gsave
transform round exch round exch itransform moveto rulex 0 rlineto 0
ruley neg rlineto rulex neg 0 rlineto fill grestore}B /a{moveto}B /delta
0 N /tail{dup /delta X 0 rmoveto}B /M{S p delta add tail}B /b{S p tail}
B /c{-4 M}B /d{-3 M}B /e{-2 M}B /f{-1 M}B /g{0 M}B /h{1 M}B /i{2 M}B /j{
3 M}B /k{4 M}B /w{0 rmoveto}B /l{p -4 w}B /m{p -3 w}B /n{p -2 w}B /o{p
-1 w}B /q{p 1 w}B /r{p 2 w}B /s{p 3 w}B /t{p 4 w}B /x{0 S rmoveto}B /y{
3 2 roll p a}B /bos{/SS save N}B /eos{SS restore}B end
%%EndProcSet
%%BeginProcSet: mac.MDII.pro
systemdict/currentpacking known{currentpacking true setpacking}if /LW{0}def
/LW+{LW 2 eq}bind def /ok{systemdict/statusdict known dup{LW 0 gt and}if}bind
def /md 250 dict def md begin /av 0 def /T true def/F false def/mtx matrix
def/s75 75 string def/s8 8 string def/s1( )def/pxs 1 def/pys 1 def 1 0 mtx
defaultmatrix dtransform exch atan/pa exch def/nlw .24 def/ppr[-32 -29.52 762
582.48]def /pgs 1 def/por true def/xb 500 array def/so true def/tso true
def/fillflag false def/pnm 1 def/fmv true def /sfl false def/ma 0
def/invertflag false def/dbinvertflag false def/xflip false def/yflip false
def/noflips true def/scaleby96 false def/fNote true def/fBitStretch true def
/fg(Rvd\001\001\000\000\177)def /bdf{bind def}bind def /xdf{exch def}bdf /xl{
neg exch neg translate}bdf /fp{pnsh 0 ne pnsv 0 ne and}bdf /nop{}bdf/lnop[
/nop load]cvx bdf /vrb[{fp{fg 6 get 0 ne{gsave stroke grestore}{gsave 1
setlinewidth pnsh pnsv scale stroke grestore}ifelse}if newpath}bind /eofill
load dup /newpath load 2 index dup{clip newpath}bind{}bind dup 2 copy]def
currentscreen/spf xdf/rot xdf/freq xdf /doop{vrb exch get exec}bdf /psu{/tso
xdf /fNote xdf/fBitStretch xdf/scaleby96 xdf/yflip xdf/xflip xdf /invertflag
xdf/dbinvertflag invertflag statusdict begin version cvr 47.0 ge product
(LaserWriter)eq not and end invertflag and{not}if def xflip yflip or{/noflips
false def}if /pgs xdf 2 index .72 mul exch div/pys xdf div .72 mul/pxs xdf ppr
astore pop/por xdf sn and/so xdf}bdf /tab{statusdict /11x17 known{statusdict
begin /11x17 load end}{statusdict /setpage known{statusdict begin 792 1224 1
setpage end}{statusdict /setpageparams known{statusdict begin 792 1224 0 1
setpageparams end}if}ifelse}ifelse}bdf /txpose{pxs pys scale ppr aload pop por
{noflips{pop exch neg exch translate pop 1 -1 scale}if xflip yflip and{pop
exch neg exch translate 180 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg
ppr 2 get ppr 0 get neg sub neg translate}if xflip yflip not and{pop exch neg
exch translate pop 180 rotate ppr 3 get ppr 1 get neg sub neg 0 translate}if
yflip xflip not and{ppr 1 get neg ppr 0 get neg translate}if}{noflips{
translate pop pop 270 rotate 1 -1 scale}if xflip yflip and{translate pop pop
90 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg
sub neg translate}if xflip yflip not and{translate pop pop 90 rotate ppr 3 get
ppr 1 get neg sub neg 0 translate}if yflip xflip not and{translate pop pop 270
rotate ppr 2 get ppr 0 get neg sub neg 0 exch translate}if}ifelse statusdict
begin waittimeout 300 lt{/waittimeout 300 def}if end scaleby96{ppr aload pop 4
-1 roll add 2 div 3 1 roll add 2 div 2 copy translate .96 dup scale neg exch
neg exch translate}if}bdf /fr{4 copy ppr aload pop 3 -1 roll add 3 1 roll exch
add 6 2 roll 3 -1 roll sub 3 1 roll exch sub 3 -1 roll exch div 3 1 roll div
exch scale pop pop xl}bdf /obl{{0.212557 mul}{pop 0}ifelse}bdf /sfd{ps fg 5 -1
roll get mul 100 div 0 ps 5 -1 roll obl ps neg 0 0 6a astore makefont setfont}
bdf /fnt{findfont sfd}bdf /bt{sa 3 1 roll 3 index and put}bdf /sa
(\000\000\000\000\000\000\000\000\000\000)def /fs{0 1 bt 1 2 bt 2 4 bt 3 8 bt
4 16 bt 5 32 bt 6 64 bt 7 128 bt sa exch 8 exch put}bdf /mx1 matrix def /mx2
matrix def /mx3 matrix def /bu{currentpoint currentgray currentlinewidth
currentlinecap currentlinejoin currentdash exch aload length fg 5 sfl{1}{0}
ifelse put pnsv pnsh 2t aload pop 3a aload pop mx2 aload pop mx1 aload pop mtx
currentmatrix aload pop mx3 aload pop ps pm restore/ps xdf mx3 astore pop}bdf
/bn{/pm save def mx3 setmatrix newpath 0 0 moveto ct dup 39 get 0 exch
getinterval cvx exec mtx astore setmatrix mx1 astore pop mx2 astore pop 3a
astore pop 2t astore pop/pnsh xdf/pnsv xdf gw /sfl fg 5 get 0 ne def array
astore exch setdash setlinejoin setlinecap setlinewidth setgray moveto}bdf /fc
{save vmstatus exch sub 50000 lt{(%%[|0|]%%)=print flush}if pop restore}bdf
/tc{32768 div add 3 1 roll 32768 div add 2t astore pop}bdf /3a[0 0 0]def /2t 2
array def /tp{3a astore pop}bdf /tt{mx2 currentmatrix pop currentpoint 2 copy
2t aload pop qa 2 copy translate 3a aload pop exch dup 0 eq{pop}{1 eq{-1 1}{1
-1}ifelse scale}ifelse rotate pop neg exch neg exch translate moveto}bdf /te{
mx2 setmatrix}bdf /th{3 -1 roll div 3 1 roll exch div 2 copy mx1 scale pop
scale/sfl true def}bdf /tu{1 1 mx1 itransform scale/sfl false def}bdf /ts{1 1
mx1 transform scale/sfl true def}bdf /fz{/ps xdf}bdf /dv{dup 0 ne{div}{pop}
ifelse}bdf /pop4{pop pop pop pop}bdf /it{sfl{mx1 itransform}if}bdf /gm{exch it
moveto}bdf/rm{it rmoveto}bdf /lm{currentpoint sfl{mx1 transform}if exch pop
sub 0 exch it rmoveto}bdf /fm{statusdict/manualfeed known}bdf /se{statusdict
exch/manualfeed exch put}bdf /mf{dup/ma exch def 0 gt{fm se/t1 5 st ok ma 1 gt
and{/t2 0 st/t3 0 st statusdict/manualfeedtimeout 3600 put}if}if}bdf /jn{
/statusdict where exch pop{statusdict exch /jobname exch put}if}bdf /pen{pnm
mul/pnsh xdf pnm mul/pnsv xdf pnsh setlinewidth}bdf /min{2 copy gt{exch}if pop
}bdf /max{2 copy lt{exch}if pop}bdf /dh{fg 6 1 put array astore dup{1 pxs div
mul exch}forall astore exch pop exch pop exch setdash}bdf /ih[currentdash]def
/rh{fg 6 0 put ih aload pop setdash}bdf /dl{gsave nlw pys div setlinewidth 0
setgray}bdf /dlin{exch currentpoint currentlinewidth 2 div dup translate
newpath moveto lineto currentpoint stroke grestore moveto}bdf /lin{fg 6 get 0
ne{exch lineto currentpoint 0 doop moveto}{exch currentpoint/pnlv xdf/pnlh xdf
gsave newpath/@1 xdf/@2 xdf fp{pnlh @2 lt{pnlv @1 ge{pnlh pnlv moveto @2 @1
lineto pnsh 0 rlineto 0 pnsv rlineto pnlh pnsh add pnlv pnsv add lineto pnsh
neg 0 rlineto}{pnlh pnlv moveto pnsh 0 rlineto @2 pnsh add @1 lineto 0 pnsv
rlineto pnsh neg 0 rlineto pnlh pnlv pnsv add lineto}ifelse}{pnlv @1 gt{@2 @1
moveto pnsh 0 rlineto pnlh pnsh add pnlv lineto 0 pnsv rlineto pnsh neg 0
rlineto @2 @1 pnsv add lineto}{pnlh pnlv moveto pnsh 0 rlineto 0 pnsv rlineto
@2 pnsh add @1 pnsv add lineto pnsh neg 0 rlineto 0 pnsv neg rlineto}ifelse}
ifelse closepath fill}if @2 @1 grestore moveto}ifelse}bdf /gw{/pnm fg 3 get fg
4 get div def}bdf /lw{fg exch 4 exch put fg exch 3 exch put gw pnsv pnsh pen}
bdf /barc{/@1 xdf/@2 xdf/@3 xdf/@4 xdf/@5 xdf /@6 xdf/@7 xdf/@8 xdf gsave @5
@7 add 2 div @6 @8 add 2 div translate newpath 0 0 moveto @5 @7 sub @6 @8 sub
mtx currentmatrix pop scale @1{newpath}if 0 0 0.5 @4 @3 arc @4 @3 sub abs 360
ge{closepath}if mtx setmatrix @2 doop grestore}bdf /ar{dup 0 eq barc}bdf /ov{
0 exch 360 exch true barc}bdf /rc{/@t xdf currentpoint 6 2 roll newpath 4 copy
4 2 roll exch moveto 6 -1 roll lineto lineto lineto closepath @t doop moveto}
bdf /mup{dup pnsh 2 div le exch pnsv 2 div le or}bdf /rr{/@1 xdf 2. div/@2 xdf
2. div/@3 xdf /@4 xdf/@5 xdf/@6 xdf/@7 xdf @7 @5 eq @6 @4 eq @2 mup or or{@7
@6 @5 @4 @1 rc}{@4 @6 sub 2. div dup @2 lt{/@2 xdf}{pop}ifelse @5 @7 sub 2.
div dup @2 lt{/@2 xdf}{pop}ifelse @1 0 eq{/@2 @2 pnsh 2 div 2 copy gt{sub def}
{0 pop4}ifelse}if currentpoint newpath @4 @6 add 2. div @7 moveto @4 @7 @4 @5
@2 arcto pop4 @4 @5 @6 @5 @2 arcto pop4 @6 @5 @6 @7 @2 arcto pop4 @6 @7 @4 @7
@2 arcto pop4 closepath @1 doop moveto}ifelse}bdf /pr{gsave newpath/pl{exch
moveto/pl{exch lineto}def}def}bdf /pl{exch lineto}bdf /ep{dup 0 eq{{moveto}{
exch lin}{}{(%%[|1|]%%)= flush}pathforall pop grestore}{doop grestore}ifelse
currentpoint newpath moveto}bdf /gr{64. div setgray}bdf /pat{s8 copy pop 9.375
pa por not{90 add}if{1 add 4 mul cvi s8 exch get exch 1 add 4 mul cvi 7 sub
bitshift 1 and}setscreen gr}bdf /sg{freq rot/spf load setscreen gr}bdf /dc{
transform round .5 sub exch round .5 sub exch itransform}bdf /sn{
userdict/smooth4 known}bdf /x8{3 bitshift}bdf /x4{2 bitshift}bdf /d4{-2
bitshift}bdf /d8{-3 bitshift}bdf /rb{15 add -4 bitshift 1 bitshift}bdf /db{
/@7 save def/@1 xdf/@2 xdf/@3 xdf/@4 xdf/@5 xdf/@6 @5 @3 4 add mul def dc
translate scale/xdbit 1 1 idtransform abs/ydbit exch def abs def{0 0 1 ydbit
add 1 10 rc clip}if @1 0 eq @1 4 eq or{1 setgray ydbit 0 1 ydbit add 1 2 rc}
if @1 3 eq @1 7 eq or{1}{0}ifelse setgray/@9 @1 0 eq @1 1 eq @1 3 eq or or
dbinvertflag xor def/@13 @6 def @2 fBitStretch or{/@10 @4 x4 def/@11 @3 x4
def/@12 @10 rb def/@13 @12 @11 mul def/@15 1 1 dtransform abs/calcY 1 index
def round cvi/@14 exch def abs/calcX 1 index def round cvi scaleby96 not{1 add
}if def/@16 @15 rb def/@17 @16 @14 mul def}if sn @13 60000 lt and @2
fBitStretch or and{mtx currentmatrix dup 1 get exch 2 get 0. eq exch 0. eq and
@17 60000 lt and fBitStretch and{@16 3 bitshift @14 @9[calcX 0 0 calcY 0 0]{
@17 string @13 string currentfile @6 string readhexstring pop 1 index @4 @3 @5
@12 @2 smooth4 @10 @11 @12 dup string 5 index @15 @14 @16 dup string stretch}
imagemask}{@12 x8 @11 @9[@10 0 0 @11 0 0]{@13 string currentfile @6 string
readhexstring pop 1 index @4 @3 @5 @12 @2 smooth4}imagemask}ifelse}{@5 3
bitshift @3 4 add @9[@4 0 0 @3 0 2]{currentfile @6 string readhexstring pop}
imagemask}ifelse @7 restore}bdf /multibit{/mbdeep exch def/mbY exch def/mbX
exch def save mbX mbY mbdeep[mbX 0 0 mbY 0 0]{currentfile picstr readhexstring
pop}image restore}bdf /wd 16 dict def /mfont 14 dict def /mdf{mfont wcheck not
{/mfont 14 dict def}if mfont begin xdf end}bdf /cf{{1 index/FID ne{def}{pop
pop}ifelse}forall}bdf/rf{/@1 exch def/@2 exch def FontDirectory @2 known{