Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!think.com!spool.mu.edu!snorkelwacker.mit.edu!bloom-picayune.mit.edu!athena.mit.edu!caserta From: caserta@athena.mit.edu (Francesco Caserta) Newsgroups: trial.soc.culture.italian Subject: Brochure in ps su SUBLINK.ORG (parte I) Message-ID: <1991May28.194510.28024@athena.mit.edu> Date: 28 May 91 19:45:10 GMT Article-I.D.: athena.1991May28.194510.28024 Sender: news@athena.mit.edu (News system) Organization: Massachusetts Institute of Technology Lines: 1612 Questo documento, prima parte di due parti, contiene un brochure in postscript su Sublink.org che mi e' stato spedito da Ugo Cei (cei@ipvvis.unipv.it). I due files devono essere concatenati. ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ %!PS-Adobe-2.0 %%Creator: dvips, version 5.4 (C) 1986-90 Radical Eye Software %%Title: leaflet.dvi %%Pages: 4 1 %%BoundingBox: 0 0 596 843 %%EndComments %%BeginProcSet: texc.pro /TeXDict 200 dict def TeXDict begin /N /def load def /B{bind def}N /S /exch load def /X{S N}B /TR /translate load N /isls false N /vsize 10 N /@rigin{ isls{[0 1 -1 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale Resolution VResolution vsize neg mul TR}B /@letter{/vsize 10 N}B /@landscape{ /isls true N /vsize -1 N}B /@a4{/vsize 10.6929133858 N}B /@a3{/vsize 15.5531 N }B /@ledger{/vsize 16 N}B /@legal{/vsize 13 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 /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 /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 /E{pop nn dup definefont setfont}B /ch-image{ch-data dup type /stringtype ne{ctr get /ctr ctr 1 add N}if}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 /ctr 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]/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}bind{adv 1 chg nd}bind{1 add chg}bind{1 add chg nd}bind{adv lsh}bind{adv lsh nd}bind{adv rsh}bind{adv rsh nd}bind{1 add adv}bind{/rc X nd}bind{1 add set}bind{1 add clr }bind{adv 2 chg}bind{adv 2 chg nd}bind{pop nd}bind]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}B /eop{clear SI restore showpage userdict /eop-hook known{eop-hook}if} B /@start{userdict /start-hook known{start-hook}if /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}B /p /show load N /RMat[1 0 0 -1 0 0]N /BDot 8 string N /v{/ruley X /rulex X V}B /V{gsave TR -.1 -.1 TR rulex ruley scale 1 1 false RMat{BDot} imagemask 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 /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 /w{0 rmoveto}B /x{0 S rmoveto}B /y{3 2 roll p a}B /bos{/SS save N}B /eos{clear SS restore}B end %%EndProcSet %%BeginProcSet: special.pro 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 false N /BBcalc false N /p 3 def}B /@scaleunit 100 N /@hscale{@scaleunit div /hsc X}B /@vscale{ @scaleunit div /vsc X}B /@hsize{/hs X /CLIP true N}B /@vsize{/vs X /CLIP true N}B /@hoffset{/ho X}B /@voffset{/vo X}B /@angle{/ang X}B /@rwi{10 div /rwi X} B /@llx{/llx X}B /@lly{/lly X}B /@urx{/urx X}B /@ury{/ury X /BBcalc true N}B /magscale true def end /@MacSetUp{userdict /md known{userdict /md get type /dicttype eq{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}N /psfts{S 65536 div N}N /startTexFig{/psf$SavedState save N userdict maxlength dict begin /magscale false 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 @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}B /@setspecial{CLIP{newpath 0 0 moveto hs 0 rlineto 0 vs rlineto hs neg 0 rlineto closepath clip}{initclip}ifelse ho vo TR hsc vsc scale ang rotate BBcalc{rwi urx llx sub div dup scale llx neg lly neg TR}if /showpage{}N /erasepage{}N /copypage{}N newpath}B /@endspecial{grestore clear SpecialSave restore end}B /@defspecial{SDict begin}B /@fedspecial{end}B /li{lineto}B /rl{rlineto}B /rc{rcurveto}B /np{/SaveX currentpoint /SaveY X N 1 setlinecap newpath}B /st{stroke SaveX SaveY moveto}B /fil{fill SaveX SaveY moveto}B /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}B end %%EndProcSet TeXDict begin 1000 300 300 @start /Fa 15 120 df73 D<39FF8007FF3907C000F81570D805E01320EA04F0A21378137C133C7F13 1F7FEB0780A2EB03C0EB01E0A2EB00F014F81478143C143E141E140FA2EC07A0EC03E0A21401A2 1400000E1460121FD8FFE0132020227EA125>78 D<3803F020380C0C60EA1802383001E0EA7000 0060136012E0A21420A36C1300A21278127FEA3FF0EA1FFE6C7E0003138038003FC0EB07E01301 EB00F0A214707EA46C1360A26C13C07E38C8018038C60700EA81FC14247DA21B>83 D97 D<120E12FE121E120EAB131FEB61C0EB8060380F00 30000E1338143C141C141EA7141C143C1438000F1370380C8060EB41C038083F0017237FA21B> I101 D<121C123EA3121CC7FCA8120E12FE12 1E120EB1EAFFC00A227FA10E>105 D<120E12FE121E120EABEB03FCEB01F014C01480EB02005B 5B5B133813F8EA0F1CEA0E1E130E7F1480EB03C0130114E0EB00F014F838FFE3FE17237FA21A> 107 D<120E12FE121E120EB3ADEAFFE00B237FA20E>I<380E1F8038FE60C0381E80E0380F0070 A2120EAF38FFE7FF18157F941B>110 DI< EA0E3CEAFE46EA1E8FEA0F0F13061300120EAD120FEAFFF010157F9413>114 D<1202A41206A3120E121E123EEAFFF8EA0E00AB1304A6EA07081203EA01F00E1F7F9E13>116 D<000E137038FE07F0EA1E00000E1370AD14F0A238060170380382783800FC7F18157F941B>I< 39FF8FF8FF391E01E03C001CEBC018120EECE010A239070260201470A239038430401438A23901 C81880141CA23900F00D00140FA2EB6006A320157F9423>119 D E /Fb 16 122 df38 D78 DI<3801FC043807FF8C381F03FC383C007C007C133C0078131CA200F8130CA2 7E1400B4FC13E06CB4FC14C06C13F06C13F86C13FC000313FEEA003FEB03FFEB007F143FA200C0 131FA36C131EA26C133C12FCB413F838C7FFE00080138018227DA11F>83 D<13FE3807FF80380F87C0381E01E0003E13F0EA7C0014F812FCA2B5FCA200FCC7FCA3127CA212 7E003E13186C1330380FC0703803FFC0C6130015167E951A>101 D<121C123E127FA3123E121C C7FCA7B4FCA2121FB2EAFFE0A20B247EA310>105 D107 DI<3AFF07F007F090391FFC1FFC3A1F303E 303E01401340496C487EA201001300AE3BFFE0FFE0FFE0A22B167E9530>I<13FE3807FFC0380F 83E0381E00F0003E13F848137CA300FC137EA7007C137CA26C13F8381F01F0380F83E03807FFC0 3800FE0017167E951C>111 D114 DI<48 7EA41203A21207A2120F123FB5FCA2EA0F80ABEB8180A5EB8300EA07C3EA03FEEA00F811207F9F 16>I<39FFE01FE0A2390F800600A2EBC00E0007130CEBE01C00031318A26C6C5AA26C6C5AA2EB 7CC0A2137F6D5AA26DC7FCA2130EA21B167F951E>118 D<3AFFE7FF07F8A23A1F007800C0D80F 80EB0180147CA23A07C07E030014DE01E05B0003EBDF06EBE18FD801F15B01F3138C9038FB079C 000014D8EBFE03017E13F0A2EB7C01013C5BEB380001185B25167F9528>I<39FFE01FE0A2390F 800600A2EBC00E0007130CEBE01C00031318A26C6C5AA26C6C5AA2EB7CC0A2137F6D5AA26DC7FC A2130EA2130CA25B1278EAFC3813305BEA69C0EA7F80001FC8FC1B207F951E>121 D E /Fc 67 124 df<90383F83F8EBFF8F48139F3903E03E00EB803800071378A839FFFC7FC0A3 3907807800B31D2380A21C>11 D<1478137C13FC12013803C0005B1207A838FFFC78A3EA0780B3 152480A31A>I14 D<12F012787E121C121E7EEA07801203EA01C00A097CA2 18>18 D34 D<1278A412181230A212 60A212E0050A7CA20E>39 D<137013E0EA01C01203EA078013005A120E121E121C123CA2123812 78A4127012F0AE12701278A41238123CA2121C121E120E120F7E1380EA03C01201EA00E013700C 327DA413>I<12E012707E123C7E120E120F7E1380120313C0A2120113E0A4120013F0AE13E012 01A413C01203A21380120713005A120E121E5A12385A5A0C327DA413>I<1278A412181230A212 60A212E0050A7C830E>44 DI<12F0A404047B830E>I<14801301A2EB03 00A31306A35BA35BA35BA35BA35BA3485AA448C7FCA31206A35AA35AA35AA35AA35AA311317DA4 18>II<13C01201120712FFA212FB1203B3A7B5FC A310227CA118>III<131FA2132FA2136F13EF13CF1201A2EA038FA21207130F120F 120E121E123CA21278A212F0B512F8A338000F00A915217FA018>I<383FFF80A3003CC7FCA913 F8EA3FFE7FEB0F80EA3E07383C03C01238380001E0A7384003C0A212E038700780387C1F00EA3F FEEA0FFCEA03F013227EA018>I<137E48B4FC5AEA07C148C7FC121EA25AA25AA213F8EAF1FEEA F7FF38FF0F80EAFC0738F803C0A2130100F013E0A51270A21278EB03C01238003C1380EA1C0738 1F0F00EA0FFE6C5AEA01F013237EA118>I56 DI<12F0A412 00AE12F0A404167B950E>I64 D<131FA2497EA2133BEB7BC013731371EBF1E0A213E000017FA213C000031378A2138000077FA2 1300487FA2EBFFFE487FA2381C000F003CEB0780A212380078EB03C0A2127000F0EB01E0A25A1B 237EA220>II IIIII<12F0B3B104 237CA20D>73 D<12F0B3AEB512C0A312237BA21A>76 D<00FC147E6C14FEA300F7EB01DEA3EB80 0300F3149EA2EBC007A200F1141EA2EBE00F00F0130EA2EBF01EA2EB701CEB783CA2EB3838EB3C 78A2EB1C70A2EB1EF0EB0EE0A2130FEB07C0A390C7FC1F237BA22A>I<00FC131E7EA312F7A2EA F380A213C012F1A213E012F013F0A21378A21338133CA2131EA2130E130F1307A2149E1303A2EB 01DEA2EB00FEA3147E17237BA222>III<13FE3803FFC04813E0EA0F81381E0060481300A25AA512 7C123C123FEA1FC0EA0FFC6CB4FC0001138038003FC0EB07E0EB01F0130014F81478A600C013F0 7E38F801E0387E07C0383FFF80000F1300EA01FC15257EA31B>83 DI<00F0133CB3A900781378A36C13F0381E01E0EA1F87380FFFC000031300EA00FC 16247BA221>I<00F01478A2007814F0A36CEB01E0A36CEB03C0A2121F6CEB0780A213800007EB 0F00A23803C00E141EA23801E01C143CA23800F0381478A2EB787014F0A2EB38E0133DEB1DC013 1FA26D5AA21D237FA220>I<0078EB03E0007C14C06C1307001EEB0F806C14006D5A3807C03E00 03133CEBE07C3801F07800005B1379EB7DE0EB3FC0131F5C6DC7FC497E80133FEB7DE0EB79F013 F000011378497E3803C03E0007131E497ED80F001380481307001EEB03C04814E0007CEB01F000 78130000F814F81D237FA220>88 D 92 D97 D<12F0ADEAF1F0EAF7FCB47EEAFC1F487E38F00780A2EB03 C0A8EB0780A238F80F00EAFC3EEAFFFEEAF7F8EAF1F012237CA219>IIII<133F13FF5A EA03C013801207A8EAFFF8A3EA0780B3102380A20F>I<3801F0783807FFF85A381F1F00EA1E0F 383C0780A5381E0F00EA1F1FEA0FFE485AEA19F00038C7FCA2123CEA1FFEEBFFC014E04813F0EA 7801EB00F8481378A4007813F0383E03E0381FFFC06C13803801FC0015217F9518>I<12F0ADEA F1F8EAF3FCEAF7FEEAFE1EEAF80FA212F0B010237CA219>I<12F0A41200A912F0B3A404237DA2 0B>I<12F0ADEB1F80EB3F00133E5B5BEAF1F0EAF3E0EAF7C012FFA27FA2EAFDF0EAF8F8EAF078 137C7F131E131F7F1480EB07C012237CA218>107 D<12F0B3B104237DA20B>I<39F0F807C039F3 FE1FF039F7FF3FF839FE0F707800FCEBE07C39F807C03CA200F01380AF1E167C9527>IIII<3803E3C0EA07FBEA0FFFEA 1F0FEA3C07EA7C03127812F812F0A612F81278A2EA3C07EA3F0FEA1FFFEA0FFBEA03E3EA0003AA 12207E9519>III<120FA6EAFFF8A3EA0F00AE1308131CEA07FC13F8EA03E00E1C7F9B12> II<38F001E0A2387803C0A3383C0780 A3001E13005BA2EA0F0E131EA2EA071C139C13BCEA03B8A213F86C5AA213167F9516>I<39F007 803CEB0FC0A2D8780D1378131D14E0131CD83C1813F0133814F0001C14E0001E13711330EB7079 000E14C01439380F603B00071480141BEBC01FA2000314001E167F9521>I<387801F0007C13E0 383E03C0EA1E07000F138038078F0013DEEA03FC12016C5A137013F8487EEA03DC139EEA078F38 0F0780121EEB03C0383C01E0387800F000F813F81516809516>I<387FFFC0A338000F80140013 1E133E5B13785B1201485A5B485A120F48C7FC121E5A127CB512C0A312167F9515>122 DI E /Fd 26 123 df<90390FF01FE0013F137F01FF13FF4813F19039 F003F000D803E05B49485A1207A8B513FFA3D807C013C0B3A6232A7FA923>11 D<12F8127C7E121E7E1380EA07C01203EA01E0EA00F00C0A7BA91E>18 D<12F8A5123812301270 A21260A212E0050C7AA911>39 D<49B4FC010F13E0013F13F85BEBFE013901F8003048481310D8 07C01300485A121F90C8FC123EA2127E127CA35AAA127CA3127E123EA27E7F120F6C7ED803F013 046C6C131CD800FE13FCEB7FFF6D13F8010F13E0010113001E2C7CAA26>67 D78 D80 D83 D97 D<12F8AF133F38F9FFC000FB13E0B512F0130738FC01F838F800FC14 7CA2147E143EA7147CA36C13F8130138FF07F0EBFFE000FB13C000F9138038F87E00172A7BA91F >II<137E3803FF804813C04813E0381F83F0 EA3F00003E13785A14380078133CB512FCA400F8C7FCA31278127CA27E003F130C381FC07C380F FFFC7E000113F038007F80161B7E9A1B>101 DI<9038F807803903FE7FC0000FB5FC5A903807C000383E03E0A248 6C7EA66C485AA26C485A13FF485BD83BFEC7FCEA38F80078C8FCA27E383FFFC014F86C7F80487F 387C007F48EB1F80140FA36C131F007EEB3F00383F80FE13FF000F13F86C5BC613801A287E9A1E >I<12F8A51200AA12F8B3A9052A7CA90E>105 D<12F8AFEB01F8EB03F0EB07E014C0EB0F80EB1F 00133E5B5B12F9EAFBF012FF7F7FA2EAFE7E487E12F8EB1F80130F14C0EB07E0A2EB03F0130114 F8EB00FC162A7BA91D>107 D<12F8B3B3A6052A7CA90E>III<137F3801FFC0000713F0487F 381FC1FC383F007E003E133E487FA200787F00F81480A7007CEB1F00A2007E5B003E133E003F13 7E381FC1FC6CB45A6C5B000113C06C6CC7FC191B7E9A1E>II114 DII<38F801F0B3A21303A2EAFC0FB5FCEA7FFDEA3FF9EA1FC1141B7B9A1F>I<00F801FC137C 1301007C6D137802DE13F8A21303003E01CF13F01501148F1307001FEC83E014871407D80F0F14 C0018F13C71403138E00071580EB9E0115E7D803DCEBEF00A2140013D8D801F813FEA2157E261B 7F9A29>119 D122 D E /Fe 19 123 df<12E07E7E127C123C7E7EEA07801203EA00C01360133013100C0D79B121>18 D<127812FCA212FEA2127A1202A51204A31208A212101220A2124007147AB112>39 D73 D85 D<13FE380303C0380C00E00010137080003C133C00 3E131C141EA21208C7FCA3EB0FFEEBFC1EEA03E0EA0F80EA1F00123E123C127C481404A3143EA2 1278007C135E6CEB8F08390F0307F03903FC03E01E1F7D9E21>97 D99 DII<120FEA1F80A4EA0F00C7FC ABEA078012FFA2120F1207B3A6EA0FC0EAFFF8A20D307EAF12>105 D108 D<380780FE39FF83078090388C03C0390F9001E0EA 07A06E7E13C0A25BB3A2486C487E3AFFFC1FFF80A2211F7E9E25>110 DI<38 0781FC38FF860790388803C0390F9001E03907A000F001C013785B153CA2153E151E151FA9153E A2153C157C15786D13F013A0EC01E090389803809038860F00EB81F80180C7FCAB487EEAFFFCA2 202D7E9E25>I<380783E038FF8C18EB907C120FEA07A0EBC0381400A35BB3487EEAFFFEA2161F 7E9E19>114 D<3801FC10380E0330381800F048137048133012E01410A37E6C1300127EEA3FF0 6CB4FC6C13C0000313E038003FF0EB01F813006C133CA2141C7EA27E14186C1338143000CC1360 38C301C03880FE00161F7E9E1A>I<1340A513C0A31201A212031207120F381FFFE0B5FC3803C0 00B01410A80001132013E000001340EB78C0EB1F00142C7FAB19>II<3A FFF801FF80A23A0FC0007C006C4813386D133000031420A26C6C5BA27F00005CA2D97801C7FCA2 137CEB3C02A26D5AA2131F6D5AA2EB0790A214D0EB03E0A26D5AA36D5A211F7F9E23>I<003FB5 FC383E001E12380030133C00201378A2006013F0384001E0A2EB03C0EB07801200EB0F00131EA2 5B5BA2EBF001EA01E0A2EA03C0EA07801403380F0002121E14065A48130E147EB512FE181F7E9E 1D>122 D E end %%EndProlog %%BeginSetup %%Feature: *Resolution 300 TeXDict begin @a4 /a4 where {pop a4} if %%EndSetup %%Page: 1 1 bop 73 154 a 28417720 40068985 0 0 39140147 55322460 startTexFig 73 154 a %%BeginDocument: logo.eps /AldusDict2 325 dict def AldusDict2 begin /AldusVersion 209 def /AldusRev 55 def /bdef { bind def } bind def systemdict /currentpacking known {/AD_OldPacking currentpacking def true setpacking } if /AD_PrevMatrix matrix def /AD_SomethingOnPage false def /AD_OutlineWidth 30 def /AD_ShadOffset 0.06 def /AD_OLShadOffset 0.06 def /AD_OLSmearFact 0.03 def /AD_BoldSmearFact 0.03 def /AD_ObliqueAngle -0.21 def /AD_TrueSetscreen /setscreen load def /AD_NestedMirror false def /AD_TextCutout false def /BEGJOB { /AD_Invert exch def dup AD_NestedMirror xor /AD_NestedMirror exch def /AD_MirrorFlag exch def /AD_WideFlag exch def /paperwid exch def /paperht exch def /AD_Resolution 1440 def /AD_PointsToUCS AD_Resolution 72 div def AD_PrevMatrix currentmatrix pop /AD_PrevScreen [currentscreen] def /AD_PrevTransfer currenttransfer def /AD_StdScreen true def /STD_SCREEN { AD_StdScreen not { AD_PrevScreen cvx exec setscreen /AD_PrevTransfer load settransfer /AD_StdScreen true assign }if } def true _SetCoordSys version (23.) anchorsearch { pop pop /truesetgray /setgray load def /setgray { mark AD_Invert {.0 .0 .06 .1 .28 .48 .56 .68 .82 .9 .98 1.0 } {1.0 1.0 .98 .9 .82 .68 .56 .48 .28 .1 .06 .0 } ifelse counttomark dup 3 add -1 roll exch 2 sub mul dup floor cvi dup 3 1 roll sub exch dup 3 add index exch 2 add index dup 4 1 roll sub mul add counttomark 1 add 1 roll cleartomark truesetgray } def } { pop } ifelse /screenAdjust 1 0 dtransform exch atan def /mirrorScreen AD_NestedMirror {/neg load} {{}} ifelse def /setscreen {exch screenAdjust add mirrorScreen exch AD_TrueSetscreen} def } def /_SetCoordSys { /AD_OldSys exch def AD_WideFlag { AD_OldSys { 90 rotate 1 AD_PointsToUCS div dup neg scale } { 1 AD_PointsToUCS div dup neg scale paperht paperwid neg translate 90 rotate } ifelse } { 1 AD_PointsToUCS div dup neg scale 0 paperht neg translate } ifelse AD_MirrorFlag { paperwid 0 translate -1 1 scale } if /AD_DeviceScale 1 1 transform pop 0 0 transform pop sub abs def } bdef /SETRES { /AD_Resolution exch def /AD_PointsToUCS AD_Resolution 72 div def AD_PrevMatrix setmatrix false _SetCoordSys _DefinePatterns } bdef /SETOVERPRINT { setoverprint } bdef /SETTEXTCUTOUT { /AD_TextCutout exch def } bdef /BEGPAGE { /AD_SomethingOnPage false def } bdef /ENDPAGE { AD_SomethingOnPage { save showpage restore } if } def /MUST_PRINT_PAGE { /AD_SomethingOnPage true def } bdef /ENDJOB { AD_PrevMatrix setmatrix } bdef /S_PSCRIPT { /AD_SomethingOnPage true def } bdef /S_TEXTSEGBEG { /here save def /TX_RunDrawn false def newpath } bdef /S_TEXTSEGEND { TX_RunDrawn { here restore /AD_SomethingOnPage true def } { here restore } ifelse } bdef /S_WORKING { /AD_WorkingMemory exch def } bdef /S_LOADFONT { AldusDict2 /AD_TopOfFonts known exch { { AD_TopOfFonts restore } if } { not { save /AD_TopOfFonts exch def } if } ifelse } bdef /SURSTR { AD_SomethingOnPage SUsv restore } bdef /SUSAVE { AldusDict2 /AD_TopOfFonts known vmstatus exch sub exch pop AD_WorkingMemory lt { dup { AD_TopOfFonts restore } if } if not { save /AD_TopOfFonts exch def } if save /SUsv exch def /AD_SomethingOnPage exch def } bdef /_ftName 66 string def /_AutoRecode { /recode exch def _ftName cvs dup length 7 gt { dup 0 7 getinterval (|______) eq { dup length 7 exch 7 sub getinterval recode { FTRECODE } { FTRENAME } ifelse } { pop } ifelse } { pop } ifelse } bdef /SYM_SAV { save /SYMsv exch def } bdef /SYM_RSTR { AD_SomethingOnPage SYMsv restore /AD_SomethingOnPage exch def } bdef /AD_save_xform null def /SET_TX_XFORM { /m_x exch def /r_angle exch def /ref_y exch def /ref_x exch def /AD_save_xform save def ref_x ref_y translate m_x { -1 1 scale } if r_angle neg rotate ref_x neg ref_y neg translate } bind def /CLEAR_TX_XFORM { AD_SomethingOnPage AD_save_xform restore /AD_SomethingOnPage exch def } bind def /SHADOWFLAG 16#1 def /OUTLINEFLAG 16#2 def /BOLDSMEAR 16#4 def /OUTLINESMEAR 16#8 def /ReENCODED 16#10 def /BOLDPSBUMP 16#20 def /ITALICOBLIQUE 16#40 def /SET { count 5 eq not{6 array astore}if /AD_textcolor exch def /AD_fontbits exch def /AD_20EMS exch def 1 index FontDirectory exch known not { 1 index ReENCODED AD_fontbits _iand _AutoRecode } if BOLDPSBUMP AD_fontbits _iand { 1 add } if dup _ActivateFont ITALICOBLIQUE AD_fontbits _iand { _ActivateObliqueFont } if /AD_width_factor_internal AD_width_factor def AD_width_factor 1 ne { currentfont [AD_width_factor 0 0 1 0 0] makefont setfont } if /AD_EmNotMatch AD_20EMS 20 div (M) _ADStringWidth pop sub abs 1 gt def false SETTEXTCUTOUT } bdef /S_SETUPRUN /SET load def /OUT { /here save def /runwidth exch def /nspaces exch def /nchars exch def /textrun exch def /letterspace exch def /wordspace exch def /y1 exch def /x1 exch def nchars 0 gt { AD_textcolor dup _Gray? {setgray} {aload pop {PREGISCOLOR}{PCOLOR}ifelse } ifelse /letterspace AD_EmNotMatch { runwidth textrun _ADStringWidth pop nchars dup 1 gt {1 sub} if letterspace mul add nspaces wordspace mul add sub nchars dup 1 gt {1 sub} if div } { 0 } ifelse letterspace add def SHADOWFLAG AD_fontbits _iand { save OUTLINEFLAG AD_fontbits _iand { _OLShadowOffset } { AD_textcolor _Gray?{_ShadowScreen}if AD_textcolor _ShadowColor _ShadowOffset } ifelse OUTLINEFLAG AD_fontbits _iand OUTLINESMEAR AD_fontbits _iand not and { _ActivateSolidFont _SetTextWidth } if AD_TextCutout {1 setgray} if _ShowRun BOLDSMEAR AD_fontbits _iand { _BoldSmearOffset _ShowRun } if restore } if OUTLINEFLAG AD_fontbits _iand OUTLINESMEAR AD_fontbits _iand and { _OLSmearRun } { OUTLINEFLAG AD_fontbits _iand { save _ActivateSolidFont _SetTextWidth AD_textcolor _Gray? AD_textcolor _White? or { AD_textcolor _White? {0} {_TextFillColor} ifelse setgray } { 1 setgray }ifelse _ShowRun restore } if _ShowRun BOLDSMEAR AD_fontbits _iand { _BoldSmearOffset _ShowRun } if } ifelse } if here restore /AD_SomethingOnPage true def } bdef /S_OUTPUTRUN /OUT load def /_ADStringWidth { gsave closepath clip stringwidth grestore } bdef /_OLSmearRun { gsave _OLSmearOffset translate _ShowRun grestore gsave _OLSmearOffset exch neg exch translate _ShowRun grestore gsave _OLSmearOffset neg translate _ShowRun grestore gsave _OLSmearOffset neg exch neg exch translate _ShowRun grestore gsave AD_textcolor _Gray? AD_textcolor _White? or { AD_textcolor _White? {0} { _TextFillColor} ifelse setgray } { 1 setgray }ifelse _ShowRun grestore } bdef /_TextFillColor { AD_TextCutout {1} {1 AD_textcolor sub} ifelse } bdef /_ShowRun { x1 y1 moveto wordspace 0 8#040 letterspace 0 textrun awidthshow } bdef /AD_width_factor_internal 1 def /_SetTextWidth { AD_width_factor_internal 1 ne { currentfont [AD_width_factor_internal 0 0 1 0 0] makefont setfont } if } bdef /AD_save_textwidth null def /SET_TEXT_WIDTH { /AD_width_factor_internal exch def /AD_save_textwidth save def _SetTextWidth } bdef /RESTORE_TEXT_WIDTH { AD_SomethingOnPage AD_save_textwidth restore /AD_SomethingOnPage exch def /AD_width_factor_internal 1 def } bdef /AD_width_factor 1 def /SET_TX_WIDTH { /AD_width_factor exch def } bdef /CLEAR_TX_WIDTH { /AD_width_factor 1 def } bdef /S_UNDERLINE { /here save def count 7 eq not{6 array astore}if /color exch def /pointsize exch def /width exch def /deltay exch def /baseline exch def /rightx exch def /leftx exch def currentfont /FontInfo known { currentfont /FontInfo get /UnderlinePosition known { /deltay currentfont /FontInfo get /UnderlinePosition get currentfont /FontMatrix get 3 get mul pointsize AD_fontscale AD_PointsToUCS div div mul def } if currentfont /FontInfo get /UnderlineThickness known { /width currentfont /FontInfo get /UnderlineThickness get currentfont /FontMatrix get 3 get abs mul pointsize AD_fontscale AD_PointsToUCS div div mul def } if } if /underliney 0 baseline deltay add transform round exch round exch itransform exch pop def color dup _Gray? {setgray}{aload pop {PREGISCOLOR}{PCOLOR}ifelse }ifelse width setlinewidth SHADOWFLAG AD_fontbits _iand { save OUTLINEFLAG AD_fontbits _iand { _OLShadowOffset } { color _Gray?{_ShadowScreen}if color _ShadowColor _ShadowOffset } ifelse leftx underliney rightx underliney _ShowUnderline restore } if leftx underliney rightx underliney _ShowUnderline OUTLINEFLAG AD_fontbits _iand OUTLINESMEAR AD_fontbits _iand not and { save color _Gray?{1 color sub setgray} {0 0 0 0 setcmykcolor }ifelse /AD_OutlineWidth AD_OutlineWidth 1000 div AD_fontscale mul def width 3 AD_OutlineWidth mul ge { width 2 AD_OutlineWidth mul sub } { width 3 div } ifelse setlinewidth leftx AD_OutlineWidth add underliney rightx AD_OutlineWidth sub underliney _ShowUnderline restore } if here restore /AD_SomethingOnPage true def } bdef /_ShowUnderline { newpath moveto lineto stroke } bdef /S_STRIKETHRU { /here save def count 4 eq not{6 array astore}if /color exch def /y exch def /rightx exch def /leftx exch def /y 0 y transform round exch round exch itransform exch pop def color _Gray? {color setgray}{color aload pop {PREGISCOLOR}{PCOLOR}ifelse }ifelse _StrikeThruWidth setlinewidth newpath leftx y moveto rightx y lineto stroke here restore /AD_SomethingOnPage true def } bdef /DV_DRAW_TEXT { /here save def /text exch def /y exch def /x exch def Black setgray (Helvetica-Bold) FTRECODE /|______Helvetica-Bold 9 dup _ActivateFont x y moveto text show here restore /AD_SomethingOnPage true def } bdef /DV_DRAW_BOX { /here save def /draftflag exch def /shadowflag exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def AD_PointsToUCS 2 div setlinewidth newpath x1 y1 moveto x1 y2 lineto x2 y2 lineto x2 y1 lineto closepath shadowflag { gsave STD_SCREEN 0.5 setgray fill grestore} { gsave 1.0 setgray fill grestore 0.0 setgray stroke } ifelse draftflag { x1 y1 moveto x2 y2 lineto stroke x2 y1 moveto x1 y2 lineto stroke } if here restore /AD_SomethingOnPage true def } bdef /DV_DRAW_LINE { /here save def /lw exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def x1 y1 transform round exch round exch itransform /y1 exch def /x1 exch def x2 y2 transform round exch round exch itransform /y2 exch def /x2 exch def 0 lw transform round exch round exch itransform /lw exch def pop lw setlinewidth 0 setseparationgray newpath x1 y1 moveto x2 y2 lineto stroke here restore /AD_SomethingOnPage true def } def /DV_DRAW_CIRCLE { /here save def /lw exch def /r exch def /y exch def /x exch def x y transform round exch round exch itransform /y exch def /x exch def 0 r transform round exch round exch itransform /r exch def pop 0 lw transform round exch round exch itransform /lw exch def pop lw setlinewidth Black setgray newpath x y r 0 360 arc stroke here restore /AD_SomethingOnPage true def } bdef /_ActivateFont { /AD_fontscale exch AD_PointsToUCS mul def /AD_fontscaleX exch AD_PointsToUCS mul def /AD_fontname exch def AD_fontname findfont [ AD_fontscaleX 0 0 AD_fontscale neg 0 0 ] makefont setfont } bdef /_ActivateObliqueFont { AD_fontname findfont [ AD_fontscaleX 0 0 AD_fontscale neg 0 0 ] [ 1 0 AD_ObliqueAngle 1 0 0 ] matrix concatmatrix makefont setfont } bdef /_ActivateSolidFont { AD_solidfont AD_fontscaleX AD_PointsToUCS div AD_fontscale AD_PointsToUCS div _ActivateFont } bdef /_ShadowOffset { AD_ShadOffset AD_fontscaleX mul AD_ShadOffset AD_fontscale mul translate } bdef /_OLShadowOffset { AD_OLShadOffset AD_fontscaleX mul AD_OLShadOffset AD_fontscale mul translate } bdef /_ShadowScreen { 100 AD_PrevScreen 1 get AD_PrevScreen 2 get setscreen } bdef /_ShadowColor { dup _Gray? exch dup _White? 3 -1 roll or { dup _White? {pop 1 }if 0.6 mul 0.8 exch sub setgray} {_ShadeColor }ifelse } bdef /_ShadeColor { /AldusTint .2 def aload pop {PREGISCOLOR}{PCOLOR}ifelse /AldusTint 1 def } bdef /_Gray? { dup type 0 type eq exch type 0.0 type eq or } bdef /_White? { dup type [] type eq {aload pop pop pop add add add 0 eq {true}{false }ifelse }{pop false }ifelse } bdef /PCOLOR { findcmykcustomcolor AD_NonSepPat {1 currentgray sub setcustomcolor} {AldusTint setcustomcolor}ifelse } def /ndf { 1 index where {pop pop pop}{dup xcheck {bind }if def }ifelse } bdef /setoverprint { AldusDict2 begin /AD_Overprint exch def end }ndf /currentoverprint { AldusDict2 /AD_Overprint get }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 /setcmykcolor { 1 exch sub _Ccmyk _Ccmyk _Ccmyk pop setrgbcolor }ndf /customcolorimage { pop image }ndf /separationimage { image }ndf /setseparationgray { setgray }ndf /_Ccmyk { dup 5 -1 roll sub 0 _Max exch }bdef /_Max { 2 copy lt {exch }if pop } bdef /_OLSmearOffset { AD_OLSmearFact AD_fontscaleX mul AD_OLSmearFact AD_fontscale mul } bdef /_BoldSmearOffset { AD_BoldSmearFact AD_fontscaleX mul AD_BoldSmearFact AD_fontscale mul translate } bdef /_StrikeThruWidth { AD_fontscale 16 div } bdef /_iand { and 0 ne } bdef /FTRENAME { dup (|______) exch ftMakeName cvn /NewName local FontDirectory NewName known {pop} {cvn findfont dup maxlength dict false copyDict dup /FontName known {dup /FontName NewName put} if NewName exch definefont pop } ifelse } bdef /FTRECODE { dup (|______) exch ftMakeName cvn /NewName local FontDirectory NewName known {pop} {cvn findfont dup maxlength dict false copyDict dup /FontName known {dup /FontName NewName put} if dup /Encoding MacEncoding put NewName exch definefont pop } ifelse } bdef /AD_encode_vector_size 256 def /AD_encode_vector null def /AD_doing_recoding false def /BEG_RECODE { dup (|______) exch ftMakeName cvn /NewName local FontDirectory NewName known { pop /AD_doing_recoding false def /AD_encode_vector null def } {cvn findfont dup maxlength dict false copyDict dup /FontName known {dup /FontName NewName put} if /AD_encode_vector AD_encode_vector_size array def dup begin Encoding AD_encode_vector copy pop end dup /Encoding AD_encode_vector put NewName exch definefont pop /AD_doing_recoding true def AD_encode_vector dup } ifelse } bdef /ENCODE_CHAR { AD_doing_recoding { put dup } { pop pop } ifelse } bdef /END_RECODE { AD_doing_recoding { pop pop } if /AD_doing_recoding false def /AD_encode_vector null def } bdef /FTOUTLINE { ReENCODED FTOLINE } bdef /FTOLINE { /AD_fontbits exch def cvn /OlineName local dup /AD_solidfont exch def AD_solidfont FontDirectory exch known not { AD_solidfont ReENCODED AD_fontbits _iand _AutoRecode } if FontDirectory OlineName known {pop} {cvn findfont dup maxlength 2 add dict true copyDict dup /FontName known {dup /FontName OlineName put} if dup /PaintType 2 put dup /StrokeWidth AD_OutlineWidth put OlineName exch definefont pop } ifelse } bdef /AD_nameString1 66 string def /ftMakeName { 1 index length /PrefixLen local dup length PrefixLen add AD_nameString1 exch 0 exch getinterval dup PrefixLen 4 -1 roll putinterval dup 0 4 -1 roll putinterval } bdef /copyDict { /NoUnique local begin { 1 index /FID ne NoUnique {2 index /UniqueID ne and} if { def } { pop pop } ifelse } forall currentdict end } bdef /MacEncoding 256 array def MacEncoding 0 /Times-Roman findfont /Encoding get 0 128 getinterval putinterval MacEncoding 16#27 /quotesingle put MacEncoding 16#60 /grave put /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 /registersans /copyrightsans /trademarksans /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 /space /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 MacEncoding 128 128 getinterval astore pop /getAnInt{2 getinterval dup 0 get 16#100 mul exch 1 get add cvi}def /CharBitStr 30 string def /BuildCharDict 16 dict def /AFONT { gsave /FName local /BMFSize local 1 add /LastChar local /FirstChar local /DefChar LastChar FirstChar sub 2 mul def 20 dict dup begin 10 1 roll /LocTableLen local /OWTableLen local /BMRowLen local /PixelHeight local /FontWidth local /MaxWidth local /MaxKern local /Descent local /Ascent local /Bits BMRowLen PixelHeight mul string currentfile exch readhexstring pop def /LocTable LocTableLen string currentfile exch readhexstring pop def /OWTable OWTableLen string currentfile exch readhexstring pop def /FontType 3 def /FontMatrix matrix def /FontBBox[MaxKern Descent neg MaxWidth MaxKern add Ascent]def /Encoding 256 array def Encoding 0 MacEncoding 0 256 getinterval putinterval /Mummble 257 array def 0 1 256{Mummble exch DefChar put}for FirstChar 1 LastChar{Mummble exch dup FirstChar sub 2 mul put}for /BuildChar { BuildCharDict begin /1Char local /FDict local FDict /Mummble get 1Char get /2Char local FDict /OWTable get 2Char getAnInt 16#FFFF eq {/2Char DefChar assign}if FDict /LocTable get 2Char getAnInt /BitLoc local FDict /LocTable get 2Char 2 add getAnInt BitLoc sub /BitWidth local BitLoc 8 mod /ShiftVal local 16#FF 8 ShiftVal sub dup neg /RemShift local bitshift 16#FF and /BMask local 16#FF 8 BitLoc BitWidth add 8 mod sub dup 8 ge{pop 0}if BitWidth 0 eq{pop 8}if bitshift /AMask local BitWidth ShiftVal add 7 add 8 idiv dup 0 eq{pop 1}if /ByteWidth local BitLoc 8 idiv /WhichRow local FDict /OWTable get 2Char get cvi /Offset local FDict /OWTable get 2Char 1 add get cvi /Charwidth local Charwidth 0 BMFSize divPoint FDict /MaxKern get FDict /Descent get neg BMFSize divPoint BitWidth Offset add FDict /MaxKern get add FDict /Ascent get BMFSize divPoint setcachedevice gsave ByteWidth 8 mul FDict /PixelHeight get true [FDict /PixelHeight get FDict /Descent get sub 1 add 0 0 FDict /PixelHeight get FDict /Descent get sub 1 add neg Offset neg 0.5 add FDict /PixelHeight get FDict /Descent get sub 0.5 add] { FDict /Bits get WhichRow ByteWidth getinterval CharBitStr copy /ThisRow local 16#100 ByteWidth 1 sub 1 neg 0 { /iV local ThisRow iV get 1 index 16#100 eq{AMask and}if dup BMask and RemShift bitshift 3 1 roll ShiftVal bitshift add 16#FF and cvi ThisRow iV 3 -1 roll put }for pop ThisRow /WhichRow WhichRow FDict /BMRowLen get add assign } imagemask grestore end }def end FontDirectory FName cvn known {pop} {FName cvn exch definefont pop} ifelse grestore }def /AldusTint 1 def /AD_Overprint false def /AD_NonSepPat false def /const /def load def /var /def load def /local[/exch load /def load]cvx def /assign /def load def /incr{dup cvx exec 1 add assign}bdef /postIncr{dup cvx exec exch incr}bdef /SpaceChar 16#20 const /cvPA{2 array astore cvx}bdef /point{cvPA def}bdef /locPoint{3 1 roll point}bdef /pointXpoint{3 -1 roll mul 3 1 roll mul exch}bdef /pointDpoint{3 -1 roll exch div 3 1 roll div exch}bdef /setPoint{load astore pop}bdef /dupPoint{2 copy}bdef /addPoint{exch 4 -1 roll add 3 1 roll add}bdef /subPoint{exch 3 1 roll sub 3 1 roll sub exch}bdef /mulPoint{dup pointXpoint}bdef /divPoint{dup pointDpoint}bdef /exchPoint{4 2 roll}bdef /overPoint{3 index 3 index}bdef /anyStatD systemdict /statusdict known const /thisProduct anyStatD {statusdict /product known{statusdict /product get}{()}ifelse} {()}ifelse const /PerCentChg 1.0 -1.0 point /boxPath{/y2 local /x2 local /y1 local /x1 local x1 y1 moveto x2 y1 lineto x2 y2 lineto x1 y2 lineto closepath}bdef /dump{4{pop}repeat}bdef /rBoxPath{/r local /y2 local /x2 local /y1 local /x1 local x1 r add y1 moveto x2 y1 x2 y2 r arcto dump x2 y2 x1 y2 r arcto dump x1 y2 x1 y1 r arcto dump x1 y1 x2 y1 r arcto dump closepath}bdef /SaveMatrix matrix var /ButtCap 0 const /SquareCap 2 const /MiterJoin 0 const /BevelJoin 2 const /Black 0 const /White 1 const /Wide 0 const /Narrow 1 const /PictPostScript false var /isHairline false var /PBEGIN{ dup not {save /PSave exch def} if /isLBO exch def /PBotRight locPoint /PTopLeft locPoint isLBO not {newpath PTopLeft PBotRight boxPath clip} if newpath isLBO {ButtCap}{SquareCap} ifelse setlinecap MiterJoin setlinejoin 3 setmiterlimit AD_PointsToUCS setlinewidth /deviceRound { dup AD_DeviceScale mul round AD_DeviceScale div dup 0 eq { pop } { exch pop } ifelse } def /HairWidth AD_PointsToUCS 4 div AD_DeviceScale mul deviceRound dup 1.5 lt { pop 0 } if const Black setgray /LineScale 1 var /LineWidth AD_PointsToUCS var /LineHeight AD_PointsToUCS var /DoingWedge false var /DoingArc false var AldusDict2 /PatternShade known not { /psb {} bdef /pse {} bdef /PatternShade Black var /DeclaredPattern <00> var /PCurPat <01> var } if }bdef /PEND{ newpath isLBO not {PSave restore} if /AD_SomethingOnPage true def }bdef /SetPattern { dup /PatternShade exch def setgray } bdef /bitison{ /ybit local /xbit local PCurPat ybit PatWidth mul xbit 8 idiv add get 1 7 xbit 8 mod AD_NestedMirror {exch pop}{sub} ifelse bitshift and 0 ne}bdef /PSHADE{ STD_SCREEN 100 div dup /PatternShade exch def /AD_NonSepPat true def setgray <01> /PCurPat local } def /BK { /AD_NonSepPat true def Black setgray } bdef /WT { /AD_NonSepPat true def White setgray } bdef /PBLACK /BK load def /PWHITE /WT load def /PREGISCOLOR { pop AD_NonSepPat { pop currentgray}{AldusTint mul 1 exch sub}ifelse setseparationgray pop pop pop } bdef /PUSETHISPATTERN { dup PCurPat eq {pop}{ PPATTERN } ifelse PatternShade /AD_NonSepPat true def setgray /VerifyUsedPattern false def } bdef /PUSEPATTERN { VerifyUsedPattern {DeclaredPattern PCurPat ne {DeclaredPattern PPATTERN} if } if PatternShade setgray /VerifyUsedPattern false def } bdef /PDECLAREPATTERN { /DeclaredPattern exch def /VerifyUsedPattern true def /AD_NonSepPat true def } bdef /PatWidth 1 const /PatSide 8 const /PFreq 300 32 div const /PPATTERN{/PCurPat local /AD_NonSepPat true def /VerifyUsedPattern false def 0 /Onbits local 0 /Offbits local AD_Invert {{1 exch sub} settransfer} {{} settransfer} ifelse PFreq PerCentChg pop dup 0.96 eq {pop}{div}ifelse 0 { 1 1 addPoint 2 divPoint PatSide mulPoint cvi exch cvi exch bitison AD_Invert xor {/Onbits incr 1} {/Offbits incr 0}ifelse } setscreen Offbits dup Onbits add div AD_Invert {1 exch sub} if SetPattern /AD_StdScreen false assign}def /vertLines{pop dup mul -2 mul 1 add}bdef /sPat { AD_Invert {{1 exch sub} settransfer} {{} settransfer} ifelse setscreen setgray }def /PALDUSSHADE { <11> /PCurPat local /AD_NonSepPat true def /AD_StdScreen false assign Wide eq { 0.774 20 45 {vertLines} sPat } { 0.643 30 45 {vertLines} sPat } ifelse } bdef /PHAIRWIDTH { HairWidth setlinewidth /isHairline true def } bdef /LW { LineScale mul deviceRound /LineHeight exch def LineScale mul deviceRound dup /LineWidth exch def setlinewidth /isHairline false def }bdef /PLNWIDTH /LW load def /PLNSCALE{div /LineScale exch def} bdef /roundCoord { 0.5 add round 0.5 sub } bdef /roundPoint { transform round exch round exch itransform } bdef /adjCoord { dup 1 AD_DeviceScale div gt { deviceRound 2 div } { pop .5 AD_DeviceScale div } ifel se } bdef /pULAdj{ roundPoint currentlinewidth adjCoord LineHeight adjCoord addPoint }bdef /pLRAdj{ roundPoint currentlinewidth adjCoord LineHeight adjCoord subPoint }bdef /QD_LINE { /qd_save save def /y2 exch def /x2 exch def /y1 exch def /x1 exch def x1 x2 gt { x1 y1 x2 y2 /y1 exch def /x1 exch def /y2 exch def /x2 exch def } if newpath y1 y2 gt { x1 y1 moveto x2 y2 lineto x2 LineWidth add dup y2 lineto y2 LineHeight add lineto x1 LineWidth add y1 LineHeight add lineto x1 y1 LineHeight add lineto x1 y1 lineto } { x1 y1 moveto x1 LineWidth add y1 lineto x2 LineWidth add dup y2 lineto y2 LineHeight add lineto x2 y2 LineHeight add lineto x1 y1 LineHeight add lineto x1 y1 lineto } ifelse closepath eofill qd_save restore } bdef /PLINETO { PictPostScript { moveto lineto } { /y2 exch def /x2 exch def /y1 exch def /x1 exch def currentlinecap ButtCap setlinecap newpath x1 x2 eq y1 y2 eq and { LineWidth 1 le LineHeight 1 le and { x1 y1 moveto } { x1 y1 x1 LineWidth add y1 LineHeight add boxPath fill} ifelse } { y1 y2 eq { LineWidth x1 x2 lt { x2 add /x2 exch def } { x1 add /x1 exch def } ifelse LineHeight setlinewidth x1 y1 LineHeight 2 div add roundPoint moveto x2 y2 LineHeight 2 div add roundPoint lineto mayStroke } { x1 x2 eq { LineHeight y1 y2 lt { y2 add /y2 exch def } { y1 add /y1 exch def } ifelse x1 LineWidth 2 div add y1 roundPoint moveto x2 LineWidth 2 div add y2 roundPoint lineto mayStroke } { x1 y1 pULAdj moveto x2 y2 pULAdj lineto mayStroke } ifelse } ifelse } ifelse setlinecap } ifelse }bdef /HairRect { save /here exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def PHAIRWIDTH newpath