iwpc98.ps

clustering tools and may use for research

%!PS (but not EPSF; comments have been disabled)
%DVIPSCommandLine: dvips -f paper
%DVIPSParameters: dpi=300, compressed, comments removed
%DVIPSSource:  TeX output 1998.04.07:1635
/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 round sub abs 0.00001 lt{round}if}
forall round exch round exch]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 sub]/id ch-image N /rw ch-width 7 add 8 idiv string N /rc 0 N /gp 0 N
/cp 0 N{rc 0 ne{rc 1 sub /rc X rw}{G}ifelse}imagemask restore}B /G{{id
gp get /gp gp 1 add N dup 18 mod S 18 idiv pl S get exec}loop}B /adv{cp
add /cp X}B /chg{rw cp id gp 4 index getinterval putinterval dup gp add
/gp X adv}B /nd{/cp 0 N rw exit}B /lsh{rw cp 2 copy get dup 0 eq{pop 1}{
dup 255 eq{pop 254}{dup dup add 255 and S 1 and or}ifelse}ifelse put 1
adv}B /rsh{rw cp 2 copy get dup 0 eq{pop 128}{dup 255 eq{pop 127}{dup 2
idiv S 128 and or}ifelse}ifelse put 1 adv}B /clr{rw cp 2 index string
putinterval adv}B /set{rw cp fillstr 0 4 index getinterval putinterval
adv}B /fillstr 18 string 0 1 17{2 copy 255 put pop}for N /pl[{adv 1 chg}
{adv 1 chg nd}{1 add chg}{1 add chg nd}{adv lsh}{adv lsh nd}{adv rsh}{
adv rsh nd}{1 add adv}{/rc X nd}{1 add set}{1 add clr}{adv 2 chg}{adv 2
chg nd}{pop nd}]dup{bind pop}forall N /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 userdict
/eop-hook known{eop-hook}if showpage}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 newpath 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
TeXDict begin /rf{findfont dup length 1 add dict begin{1 index /FID ne 2
index /UniqueID ne and{def}{pop pop}ifelse}forall[1 index 0 6 -1 roll
exec 0 exch 5 -1 roll VResolution Resolution div mul neg 0 0]/Metrics
exch def dict begin Encoding{exch dup type /integertype ne{pop pop 1 sub
dup 0 le{pop}{[}ifelse}{FontMatrix 0 get div Metrics 0 get div def}
ifelse}forall Metrics /Metrics currentdict end def[2 index currentdict
end definefont 3 -1 roll makefont /setfont load]cvx def}def
/ObliqueSlant{dup sin S cos div neg}B /SlantFont{4 index mul add}def
/ExtendFont{3 -1 roll mul exch}def /ReEncodeFont{/Encoding exch def}def
end
TeXDict begin /SDict 200 dict N SDict begin /@SpecialDefaults{/hs 612 N
/vs 792 N /ho 0 N /vo 0 N /hsc 1 N /vsc 1 N /ang 0 N /CLIP 0 N /rwiSeen
false N /rhiSeen false N /letter{}N /note{}N /a4{}N /legal{}N}B
/@scaleunit 100 N /@hscale{@scaleunit div /hsc X}B /@vscale{@scaleunit
div /vsc X}B /@hsize{/hs X /CLIP 1 N}B /@vsize{/vs X /CLIP 1 N}B /@clip{
/CLIP 2 N}B /@hoffset{/ho X}B /@voffset{/vo X}B /@angle{/ang X}B /@rwi{
10 div /rwi X /rwiSeen true N}B /@rhi{10 div /rhi X /rhiSeen true N}B
/@llx{/llx X}B /@lly{/lly X}B /@urx{/urx X}B /@ury{/ury X}B /magscale
true def end /@MacSetUp{userdict /md known{userdict /md get type
/dicttype eq{userdict begin md length 10 add md maxlength ge{/md md dup
length 20 add dict copy def}if end md begin /letter{}N /note{}N /legal{}
N /od{txpose 1 0 mtx defaultmatrix dtransform S atan/pa X newpath
clippath mark{transform{itransform moveto}}{transform{itransform lineto}
}{6 -2 roll transform 6 -2 roll transform 6 -2 roll transform{
itransform 6 2 roll itransform 6 2 roll itransform 6 2 roll curveto}}{{
closepath}}pathforall newpath counttomark array astore /gc xdf pop ct 39
0 put 10 fz 0 fs 2 F/|______Courier fnt invertflag{PaintBlack}if}N
/txpose{pxs pys scale ppr aload pop por{noflips{pop S neg S TR pop 1 -1
scale}if xflip yflip and{pop S neg S TR 180 rotate 1 -1 scale ppr 3 get
ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg TR}if xflip yflip
not and{pop S neg S TR pop 180 rotate ppr 3 get ppr 1 get neg sub neg 0
TR}if yflip xflip not and{ppr 1 get neg ppr 0 get neg TR}if}{noflips{TR
pop pop 270 rotate 1 -1 scale}if xflip yflip and{TR 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
TR}if xflip yflip not and{TR pop pop 90 rotate ppr 3 get ppr 1 get neg
sub neg 0 TR}if yflip xflip not and{TR pop pop 270 rotate ppr 2 get ppr
0 get neg sub neg 0 S TR}if}ifelse scaleby96{ppr aload pop 4 -1 roll add
2 div 3 1 roll add 2 div 2 copy TR .96 dup scale neg S neg S TR}if}N /cp
{pop pop showpage pm restore}N end}if}if}N /normalscale{Resolution 72
div VResolution 72 div neg scale magscale{DVImag dup scale}if 0 setgray}
N /psfts{S 65781.76 div N}N /startTexFig{/psf$SavedState save N userdict
maxlength dict begin /magscale true def normalscale currentpoint TR
/psf$ury psfts /psf$urx psfts /psf$lly psfts /psf$llx psfts /psf$y psfts
/psf$x psfts currentpoint /psf$cy X /psf$cx X /psf$sx psf$x psf$urx
psf$llx sub div N /psf$sy psf$y psf$ury psf$lly sub div N psf$sx psf$sy
scale psf$cx psf$sx div psf$llx sub psf$cy psf$sy div psf$ury sub TR
/showpage{}N /erasepage{}N /copypage{}N /p 3 def @MacSetUp}N /doclip{
psf$llx psf$lly psf$urx psf$ury currentpoint 6 2 roll newpath 4 copy 4 2
roll moveto 6 -1 roll S lineto S lineto S lineto closepath clip newpath
moveto}N /endTexFig{end psf$SavedState restore}N /@beginspecial{SDict
begin /SpecialSave save N gsave normalscale currentpoint TR
@SpecialDefaults count /ocount X /dcount countdictstack N}N /@setspecial
{CLIP 1 eq{newpath 0 0 moveto hs 0 rlineto 0 vs rlineto hs neg 0 rlineto
closepath clip}if ho vo TR hsc vsc scale ang rotate rwiSeen{rwi urx llx
sub div rhiSeen{rhi ury lly sub div}{dup}ifelse scale llx neg lly neg TR
}{rhiSeen{rhi ury lly sub div dup scale llx neg lly neg TR}if}ifelse
CLIP 2 eq{newpath llx lly moveto urx lly lineto urx ury lineto llx ury
lineto closepath clip}if /showpage{}N /erasepage{}N /copypage{}N newpath
}N /@endspecial{count ocount sub{pop}repeat countdictstack dcount sub{
end}repeat grestore SpecialSave restore end}N /@defspecial{SDict begin}
N /@fedspecial{end}B /li{lineto}B /rl{rlineto}B /rc{rcurveto}B /np{
/SaveX currentpoint /SaveY X N 1 setlinecap newpath}N /st{stroke SaveX
SaveY moveto}N /fil{fill SaveX SaveY moveto}N /ellipse{/endangle X
/startangle X /yrad X /xrad X /savematrix matrix currentmatrix N TR xrad
yrad scale 0 0 1 startangle endangle arc savematrix setmatrix}N end
TeXDict begin 40258431 52099146 1000 300 300 (paper.dvi)
@start /Fa 51 123 df<EBF00338018807EA030400061302EA0E1C001C13041308EB00
08481330383BC050383E4188381C220838184204EA3C4438778584EA700738E003081300
A21410A2006013200070134000301380381C0700EA03F8181A7B991D>38
D<130413181330136013C013801201EA0300A21206120E120C121C1218A212381230A212
70A21260A312E0A35AA51260A31220123012107E0E267B9B10>40
D<134013601320133013101318AB1338A21330A21370A2136013E013C0A2120113801203
13001206A25A5A12105A5A5A0D267F9B10>I<121812381278123812081210A21220A212
401280050B7D830C>44 D<EAFF80A2130009037D880E>I<1230127812F0126005047C83
0C>I<1308131813301370EA01F0EA0E70EA00E0A4EA01C0A4EA0380A4EA0700A45AEAFF
E00D187C9714>49 D<133E13C3380101801202380481C0134138088380120438070300EA
00065BEA01F0EA00187FA2130EA21260EAE01CA2EA8038EA4030EA20E0EA1F8012187D97
14>51 D<3809C0403817E080EA1FF1383C1F00EA3002EA6006EA4004EA800CEA00081318
5BA21370136013E05B1201A25B1203A348C7FC7E12187B9714>55
D<137CEA0186EA0703120E000C1380121C1238A3130714005BEA1817EA0C27EA07CEEA00
0E130C131C1318EAE0305BEA80C0EAC380003EC7FC11187C9714>57
D<1420146014E0A2130114F0EB0270A213041308A21310A213201340A2EB8038EBFFF838
0100381202A25AA25A121838FE01FF181A7E991D>65 D<EB0F82EB7062EBC0163803801E
3807000C120E5A121800381308123000701300A25AA41420A314401260148038300100EA
1006EA0C18EA03E0171A7A991B>67 D<0003B5FC380070071403140113E0A43801C080A3
13C13803FF001381A3EA0702EB0004A21408120E1418141014304813E0B5FC181A7D991A
>69 D<0003B5FC380070071403140113E0A43801C080A313C13803FF001381A3EA070290
C7FCA3120EA4121EEAFFC0181A7D9919>I<EB0FC1EB3021EBC0133801800F3807000612
0E120C5A00381304123000701300A25AA3EB07FEEB0070A4006013E0A27EEA1801380C06
40EA03F8181A7A991E>I<EA03FFEA0070A313E0A4EA01C0A4EA0380A4EA0700A4120EA4
5AEAFF80101A7D990F>73 D<EA03FFEA0070A35BA4485AA4485AA448C7FC1410A2142012
0E1460144014C0381C0380B5FC141A7D9918>76 D<D803F8EB1FC0D80078EB3C00A2155C
01B85BA290389C0138A239011C0270A21404140800025C1410A214200004EB41C0A21481
A239080F0380A2130EEA180C4AC7FC39FE083FE0221A7D9922>I<3903F007F839007800
C01580A290389C0100A3138E38010E0213061307A238020384A3EB01C4000413C8A2EB00
E8A24813F01470A21218142012FE1D1A7D991D>I<EB1F80EB70603801C0303803001800
06131C000E130C5A0018130E123812301270A248131CA31438A21430147014E014C03860
018038700300EA3806EA1C1CEA07E0171A7A991D>I<3803FFF83800701C1406140713E0
A43801C00EA2141C143838038060EBFF80EB8000A248C7FCA4120EA45AB47E181A7D991A
>I<3803FFF03800701C140E140713E0A43801C00E141C143814E03803FF80EB80C01460
1470EA0700A4000E13E0A214E114E248136238FF803C181A7D991C>82
D<EB3F10EB60903801807013004813201206A31400120713C0EA03F8EA01FEEA007FEB0F
8013031301A21220A238600300A21306EA700CEAC818EA87E0141A7D9916>I<383FFFFC
38381C0C00201304124013381280A338007000A45BA4485AA4485AA41207EAFFF8161A79
991B>I<387FE0FF380E00181410A2481320A4481340A4481380A438E00100A31302A25B
EA60085BEA3860EA0F80181A78991D>I<3AFF87FC1FC03A3C00E007000038140413015D
1302001C5C13045D13085D13105DD920E1C7FC134014E2138014E4EA1D0014E8121E1470
121C146012181440221A789926>87 D<3901FF07F839007801C00138138090383C0300EB
1C025CEB1E08EB0E105C6D5A5CA21303A2497E13091311EB20E01340497E380100705A00
021378000C1338121CB448B4FC1D1A7E991D>I<EA03CCEA0E2EEA181C123812301270EA
E038A4EAC072A3EA60F2EA6134EA1E180F107C8F14>97 D<127E120EA35AA45AA2EA3BC0
EA3C301278EA7018A3EAE038A4EAC070136013E0EA60C0EA6380EA1E000D1A7C9912>I<
EA01E0EA0618120CEA1838EA3010EA7000126012E0A413081310EA6020EA30C0EA1F000D
107C8F12>I<EB1F801303A3EB0700A4130EA2EA03CEEA0E2EEA181C123812301270485A
A4EAC072A3EA60F2EA6134EA1E18111A7C9914>I<EA01E0EA0E18EA1C08123812701310
EAFFE0EAE000A41308EA60101320EA30C0EA1F000D107C8F12>I<1307EB0980131BEB3B
00133813301370A4EA07FFEA00E0A5485AA5485AA490C7FC5AA21206126612E412CC1270
112181990C>I<13F338038B8038060700120E120C121CEA380EA4EA301CA3EA183C5BEA
07B8EA0038A25B1260EAE0E0EAC1C0007FC7FC11177E8F12>I<EA1F801203A348C7FCA4
120EA2137CEA0F86EA1E07A2121CA2EA380EA35B00701380A21338EB3900EAE019EA600E
111A7E9914>I<1203120712061200A61238124C124E128E129CA2121C1238A212701272
A212E212E41264123808197C980C>I<EA1F801203A3EA0700A4120EA2130E1313EA1C27
13431380EA1F00123CEA3F80EA39C0EA38E0EA70E2A313E4EAE064EA6038101A7E9912>