%!PS /;{def }def /? { moveto} ;/+ { exec} ;/={ pop }; /!{ lineto}; /*{ }+ {{ closepath} +{88 8} = sethsbcolor fill }; { systemdict }/@ {} + {exch}; /&{{ 8} = repeat} ;/#{; 54 ; 684 ;}; +/Seed /- {.8 ; 20};/| {{clip } + newpath 11 neg} ; /U/D/O/N/G/E /_{{realtime }ifelse srand 9{U =}&}; - # 504 ;{rand 2 31 exp div }; known {Seed }_/" { mul} ;/- {; 0 G } ; /'{add };/l /u /n /a /t /i /c 2 /_{2{ rlineto } };{ U 240 " 60 2. " ' D div ;{U}+ 360 " ; 1 U .3 " sub ;}& /: { closepath | 6{?}+ 0 6 !}; /#{ rotate E E scale};/u{u}+{.3( ) =} + sub(8 )= ;{ 0.6 ()=}+ - O{ { /y {}= }+{@}+{; }+ /z y i{' c "}+ sin{-}+ D{dup{ n} + '{a "() =} + sin z ' {2 ' 4 div }+ 360 "/x { };{ gsave }+ @ y/o{ &{ #}+ -10 5{? 4 5} +{!}+ 10{ 0}+ !} ; N 2 N @ { translate }o{ 4 -5 !}+ -10 -5 !{:}+ 0 -6 !{ 11 neg}+{-6}{} = + !{u 1 l * 0 6.}exec{? 11.0} + 6 lineto{ 11.0%(c)omoikane 6.0 neg }{} exec +{!} + /o { t{1.0{l}+}exec *};% ++2008 /d {@ }; true -6.( 0. )cvi @ lineto{o}+{ (90.)cvi sin{1.0}+} { (ZUN) {+ /quit cvx def }forall}ifelse 8{8 div x dup x 10.{" -8.}+ '{dup }+ x 6.{? 0}+ -12{{10}+}+ 6.0 {_ &}+ -6 {! }+ t{u }+ sub (8)= " u{ ' 1}+{l}+ *}for -8.5 3.5{? }+ 3{ 3.5 }+ {!}+ 7 0 {!}+ -8.5 0.0 ! 0{0}+{1}+{*}+() grestore = } for 8 =} for showpage