home *** CD-ROM | disk | FTP | other *** search
/ ftp.umcs.maine.edu / 2015-02-07.ftp.umcs.maine.edu.tar / ftp.umcs.maine.edu / pub / WISR / wisr4 / proceedings / ps / nakakoji_fig2.ps < prev    next >
Internet Message Format  |  1991-11-10  |  32KB
  1. From kumiyo@sigi.cs.colorado.edu Sat Nov  9 18:14:41 1991
  2. Received: from sigi.cs.colorado.edu by gandalf.umcs.maine.edu (5.59/1.34-seg070391)
  3.     id AA16799; Sat, 9 Nov 91 18:14:35 EST
  4. Received: by sigi.cs.colorado.edu id AA11657
  5.   (5.65b/IDA-1.4.3 for larry@gandalf.umcs.maine.edu); Sat, 9 Nov 91 16:14:32 -0700
  6. Date: Sat, 9 Nov 91 16:14:32 -0700
  7. From: Kumiyo Nakakoji <kumiyo@sigi.cs.colorado.edu>
  8. Message-Id: <9111092314.AA11657@sigi.cs.colorado.edu>
  9. To: larry@gandalf.umcs.maine.edu
  10. Subject: postscript for the figure 2 (Reuse Workshop)
  11. Status: RO
  12.  
  13.  
  14. %!PS-Adobe-2.0
  15. %%Title: picture2.mss
  16. %%DocumentFonts: (atend)
  17. %%Creator: Kumiyo Nakakoji,Fischer class,,447-0190 and Scribe 7(1750)
  18. %%CreationDate: 9 November 1991 16:04
  19. %%Pages: (atend)
  20. %%EndComments
  21. % PostScript Prelude for Scribe.
  22. /BS {/SV save def
  23.         /PH exch 100 div def
  24.         /PW exch 100 div def
  25.          0.0 PH translate
  26.          .01 -.01 scale} bind def
  27. /ES {SV restore showpage} bind def
  28. /SC {setrgbcolor} bind def
  29. /FMTX matrix def
  30. /RDF {WFT SLT 0.0 eq 
  31.   {SSZ 0.0 0.0 SSZ neg 0.0 0.0 FMTX astore}
  32.   {SSZ 0.0 SLT neg sin SLT cos div SSZ mul SSZ neg 0.0 0.0 FMTX astore}
  33.   ifelse makefont setfont} bind def
  34. /SLT 0.0 def
  35. /SI { /SLT exch cvr def RDF} bind def
  36. /WFT /Courier findfont def
  37. /SF { /WFT exch findfont def RDF} bind def
  38. /SSZ 1000.0 def
  39. /SS { /SSZ exch 100.0 mul def RDF} bind def
  40. /AF { /WFT exch findfont def /SSZ exch 100.0 mul def RDF} bind def
  41. /MT /moveto load def
  42. /PF{transform .25 sub round .25 add exch
  43.   .25 sub round .25 add exch itransform} bind def
  44. /RPF{currentpoint exch 4 1 roll
  45.   add 3 1 roll add exch PF} bind def
  46. /XM {currentpoint exch pop moveto} bind def
  47. /UL {gsave newpath moveto dup 2.0 div 0.0 exch RPF moveto
  48.    setlinewidth 0.0 rlineto stroke grestore} bind def
  49. /LH {gsave newpath PF moveto setlinewidth
  50.    0.0 rlineto
  51.    gsave stroke grestore} bind def
  52. /LV {gsave newpath PF moveto setlinewidth
  53.    0.0 exch rlineto
  54.    gsave stroke grestore} bind def
  55. /BX {gsave newpath PF moveto setlinewidth
  56.    exch
  57.    dup 0.0 RPF lineto
  58.    exch 0.0 exch neg RPF lineto
  59.    neg 0.0 RPF lineto
  60.    closepath
  61.    gsave stroke grestore} bind def
  62. /BX1 {grestore} bind def
  63. /BX2 {setlinewidth 1 setgray stroke grestore} bind def
  64. /PB {/PV save def newpath translate
  65.     100.0 -100.0 scale pop /showpage {} def} bind def
  66. /PE {PV restore} bind def
  67. /GB {/PV save def newpath translate rotate
  68.     div dup scale 100.0 -100.0 scale /showpage {} def} bind def
  69. /GE {PV restore} bind def
  70. /FB {dict dup /FontMapDict exch def begin} bind def
  71. /FM {cvn exch cvn exch def} bind def
  72. /FE {end /original-findfont /findfont load def  /findfont
  73.    {dup FontMapDict exch known{FontMapDict exch get} if
  74.    original-findfont} def} bind def
  75. /BC {gsave moveto dup 0 exch rlineto exch 0 rlineto neg 0 exch rlineto closepath clip} bind def
  76. /EC /grestore load def
  77. /SH /show load def
  78. /MX {exch show 0.0 rmoveto} bind def
  79. /W {0 32 4 -1 roll widthshow} bind def
  80. /WX {0 32 5 -1 roll widthshow 0.0 rmoveto} bind def
  81. /RC {100.0 -100.0 scale
  82. PW 0.0 translate
  83. -90.0 rotate
  84. .01 -.01 scale} bind def
  85. /URC {100.0 -100.0 scale
  86. 90.0 rotate
  87. PW neg 0.0 translate
  88. .01 -.01 scale} bind def
  89. /RCC {100.0 -100.0 scale
  90. 0.0 PH neg translate 90.0 rotate
  91. .01 -.01 scale} bind def
  92. /URCC {100.0 -100.0 scale
  93. -90.0 rotate 0.0 PH translate
  94. .01 -.01 scale} bind def
  95. /CL {gsave newpath moveto setrgbcolor
  96.        exch
  97.        dup 0.0 rlineto
  98.        exch 0.0 exch neg rlineto
  99.        neg 0.0 rlineto
  100.      fill grestore} bind def
  101. /reencsmalldict 12 dict def                                     
  102. /ReEncodeSmall                              
  103.   { reencsmalldict begin
  104.     /newcodesandnames exch def              
  105.     /newfontname exch def
  106.     /basefontname exch def
  107.                                                                      
  108.     /basefontdict basefontname findfont def
  109.  
  110.     /newfont basefontdict maxlength dict def
  111.     basefontdict
  112.       { exch dup /FID ne 
  113.           { dup /Encoding eq
  114.             { exch dup length array copy
  115.                 newfont 3 1 roll put }
  116.             { exch newfont 3 1 roll put }
  117.             ifelse }
  118.           { pop pop }
  119.           ifelse
  120.        } forall
  121.                
  122.     newfont /FontName newfontname put
  123.                                                                    
  124.     newcodesandnames aload pop
  125.     newcodesandnames length 2 idiv
  126.       { newfont /Encoding get 3 1 roll put}
  127.       repeat
  128.     newfontname newfont definefont pop
  129.     end
  130.    } def
  131. /germanvec [
  132.   8#133 /Adieresis
  133.   8#173 /adieresis
  134.   8#134 /Odieresis
  135.   8#174 /odieresis
  136.   8#135 /Udieresis
  137.   8#175 /udieresis
  138.   8#176 /germandbls
  139.   ] def
  140. /Times-Roman /Times-Roman-German germanvec
  141.   ReEncodeSmall
  142. /Times-Italic /Times-Italic-German germanvec
  143.   ReEncodeSmall
  144. /Times-Bold /Times-Bold-German germanvec
  145.   ReEncodeSmall
  146. /Times-BoldItalic /Times-BoldItalic-German germanvec
  147.   ReEncodeSmall
  148. /Helvetica /Helvetica-German germanvec
  149.   ReEncodeSmall
  150. /Helvetica-Bold /Helvetica-Bold-German germanvec
  151.   ReEncodeSmall
  152. /Helvetica-Obliqe /Helvetica-Oblique-German germanvec
  153.   ReEncodeSmall
  154. /Helvetica-BoldOblique  /Helvetica-BoldOblique-German germanvec
  155.   ReEncodeSmall
  156. /Courier /Courier-German germanvec
  157.   ReEncodeSmall
  158. /Courier-Bold /Courier-Bold-German germanvec
  159.   ReEncodeSmall
  160. %%EndProlog
  161. %%Page: 1 1
  162.  
  163. 61200 79200 BS
  164. 0 SI
  165. 1 SS 
  166. 620 1000 0 12930 31158 GB 
  167. %%BeginDocument: /usr/tmp/fig-11581/f11581-1.eps
  168. %!PS-Adobe-2.0 EPSF-1.2
  169. %%Creator:Canvas_2.0
  170. %%Title:spec-link-graph.eps
  171. %%CreationDate:9/13/91 2:57 PM
  172. %%DocumentProcSets:Canvas_header
  173. %%DocumentSuppliedProcSets:Canvas_header
  174. %%DocumentFonts: Helvetica-Oblique
  175. %%+ Helvetica-Bold
  176. %%+ Courier-Bold
  177. %%+ Times-Bold
  178. %%+ Helvetica
  179. %%DocumentNeededFonts: Helvetica-Oblique
  180. %%+ Helvetica-Bold
  181. %%+ Courier-Bold
  182. %%+ Times-Bold
  183. %%+ Helvetica
  184. %%BoundingBox:16 15 554 363
  185. %%Copyright )1988-89 Deneba Systems, Inc. - All Rights Resevred Worldwide
  186. %%EndComments
  187. %%BeginProcSet:Canvas_header
  188. /CanvasDict 250 dict def
  189. CanvasDict begin 
  190. systemdict/setpacking known{/origpack currentpacking def true setpacking}if
  191. /bdf{bind def}bind def/xdf{exch bind def}bdf/min{2 copy gt{exch}if pop}bdf/edf{exch def}bdf
  192. /max{2 copy lt{exch}if pop}bdf/cvmtx matrix def/currot 0 def/rotmtx matrix def/origmtx matrix def
  193. /cvangle {360 exch sub 90 add 360 mod}bdf
  194. /setrot {/currot edf rotmtx currentmatrix pop 2 copy translate currot rotate neg exch neg exch translate}bdf
  195. /endrot {rotmtx setmatrix}bdf
  196. /patspot {1 add 4 mul cvi exch 1 add 4 mul cvi exch patstr exch get exch 7 exch sub 1 exch bitshift and 0 ne{1}{0}ifelse}bdf
  197. /setpat {1 currenttransfer exec 0 eq{exch pop{1 exch sub}}{pop{}}ifelse systemdict begin settransfer end /patstr edf 9.375 currot neg rotate 1 0 dtransform exch atan 0 1 dtransform exch pop 0 le{180 add}if currot rotate/patspot load systemdict begin setscreen end}bdf
  198. systemdict/setcmykcolor known not{/setcmykcolor{/black edf 3{black add 1.0 exch sub 0.0 max 1.0 min 3 1 roll}repeat setrgbcolor}bdf}if
  199. /setpcol{/pgray edf systemdict/setcmykcolor known{/pgray 1 pgray sub def 4{0 eq{0}{pgray}ifelse 4 1 roll}repeat setcmykcolor}
  200. {setcmykcolor currentgray 1 ne{pgray}{1}ifelse setgray}ifelse}bdf
  201. /rectpath {/cv_r edf/cv_b edf/cv_l edf/cv_t edf
  202. cv_l cv_t moveto cv_r cv_t lineto cv_r cv_b lineto cv_l cv_b lineto cv_l cv_t lineto closepath}bdf
  203. /setpen {/penh edf/penv edf/penv2 penv 2 div def/penh2 penh 2 div def}bdf
  204. /dostroke {gsave pens 1 setlinewidth penh penv scale stroke grestore}def
  205. /dofill{gsave fills fill grestore}def/doline{gsave pens fill grestore}def
  206. /pmov{penv2 add exch penh2 sub exch moveto}bdf/plin{penv2 add exch penh2 sub exch lineto}bdf
  207. /linpath{/cv_b edf/cv_r edf/cv_t edf/cv_l edf penh2 dup cv_r exch sub/cv_r edf
  208. cv_l exch sub/cv_l edf penv2 dup cv_b add/cv_b edf cv_t add/cv_t edf cv_r cv_l gt
  209. {cv_b cv_t lt{cv_l cv_t moveto penh 0 rlineto cv_r penh add cv_b lineto 0 penv neg rlineto penh neg 0 rlineto
  210. cv_l cv_t penv neg add lineto}{cv_l cv_t moveto cv_r cv_b lineto penh 0 rlineto 0 penv neg rlineto
  211. cv_l penh add cv_t penv neg add lineto penh neg 0 rlineto 0 penv rlineto}ifelse}{cv_b cv_t lt{
  212. cv_l cv_t moveto cv_r cv_b lineto 0 penv neg rlineto penh 0 rlineto cv_l penh add cv_t penv neg add lineto 0 penv rlineto penh neg 0 rlineto}{
  213. cv_l penh add cv_t moveto cv_r penh add cv_b lineto penh neg 0 rlineto 0 penv neg rlineto
  214. cv_l cv_t penv neg add lineto penh 0 rlineto 0 penv rlineto}ifelse}ifelse closepath}bdf
  215. /dopline {/cv_pv edf/cv_ph edf currentpoint cv_ph cv_pv linpath doline newpath cv_ph cv_pv moveto}bdf
  216. /cvRecFont{FontDirectory 2 index known{cleartomark}{findfont dup length 1 add dict begin
  217. {1 index/FID ne{def}{pop pop}ifelse}forall /Encoding CVvec def
  218. currentdict end definefont cleartomark}ifelse}bdf
  219. /wrk1 ( ) def/wdict 16 dict def
  220. /Work75 75 string def /Nmk{Work75 cvs dup}bdf /Npt{put cvn}bdf /dhOdh{Nmk 2 79 Npt}bdf /dhodh{Nmk 2 111 Npt}bdf /dhSdh{Nmk 2 83 Npt}bdf                         
  221. /sfWidth{gsave 0 0 moveto 0 0 lineto 0 0 lineto 0 0 lineto closepath clip stringwidth grestore}bdf
  222. /MakOF{dup dhodh FontDirectory 1 index known{exch pop}{exch findfont dup length 1 add dict begin
  223. {1 index/FID ne 2 index /UniqueID ne and{def}{pop pop}ifelse}forall /Encoding CVvec def
  224. /PaintType 2 def
  225. /StrokeWidth .24 1000 mul ftSize div dup 12 lt{pop 12}if def
  226. dup currentdict end definefont pop}ifelse}bdf
  227. /fts{dup/ftSize edf}def
  228. /mkFT{/tempFT 11 dict def tempFT begin
  229. /FontMatrix [1 0 0 1 0 0] def/FontType 3 def/Encoding CVvec def
  230. /proc2 edf/ft2 exch findfont def/ft1 exch findfont def/FontBBox [0 0 1 1] def
  231. /BuildChar{wdict begin/chr edf/ftdt edf/chrst wrk1 dup 0 chr put def ftdt/proc2 get exec end}def
  232. end tempFT definefont pop}bdf
  233. /OLFt{dup dhOdh FontDirectory 1 index known{exch pop}
  234. {dup 3 -1 roll dup MakOF {outproc} mkFT}ifelse}bdf
  235. /mshw{moveto show}bdf 
  236. /outproc{ftdt/ft1 get setfont gsave chrst sfWidth grestore setcharwidth dblsh}bdf
  237. /dblsh{currentgray 1 setgray chrst 0 0 mshw setgray ftdt/ft2 get setfont chrst 0 0 mshw}bdf
  238. /ShadChar{ftdt/ft1 get setfont gsave chrst sfWidth 1 index 0 ne{exch .05 add exch}if grestore setcharwidth 
  239. chrst .06 0 mshw 0 .05 translate dblsh}bdf
  240. /ShFt{dup dhSdh FontDirectory 1 index known{exch pop}
  241. {dup 3 -1 roll dup MakOF {ShadChar} mkFT}ifelse}bdf
  242. /LswUnits{72 75 div dup scale}bdf
  243. /T true def/F false def
  244. /ConvertVal{0 1 index{theClut exch get 3 copy put pop 1 add}forall pop}bdf
  245. /redefClt{{3 mul theClut exch 2 copy get 3 1 roll 2 copy 1 add get 3 1 roll
  246. 2 copy 2 add get 3 1 roll 3 idiv 5 2 roll mkpixVal 255 mul round cvi put}for}bdf
  247. /mkpixVal{color 4 eq{.11 mul exch .59 mul add exch .3 mul add}{do_ucrblack 4 1 roll do_correct 4 -1 roll 
  248. color index 5 1 roll pop pop pop pop}ifelse}bdf
  249. /Rjust{stringwidth pop JustOffset exch sub /JustOffset edf}bdf/Cjust{stringwidth pop 2 div JustOffset exch sub /JustOffset edf}bdf
  250. /tpmx matrix def
  251. /ulb{currentpoint pop /underlinpt edf}bdf
  252. /ule{gsave currentpoint newpath moveto currentfont dup /ft1 known{dup /ft1 get begin /FontMatrix get FontMatrix tpmx concatmatrix pop}
  253. {begin FontMatrix tpmx copy pop}ifelse FontInfo begin UnderlinePosition UnderlineThickness end end dup tpmx
  254. dtransform pop setlinewidth dup tpmx dtransform pop 0 exch rmoveto underlinpt currentpoint pop sub 0 rlineto stroke grestore}bdf
  255. /CVvec 256 array def
  256. /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
  257. CVvec 0 32 getinterval astore pop
  258. CVvec 32/Times-Roman findfont/Encoding get
  259. 32 96 getinterval putinterval CVvec dup 39/quotesingle put 96/grave put
  260. /Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis/Udieresis/aacute
  261. /agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave
  262. /ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute
  263. /ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis
  264. /dagger/degree/cent/sterling/section/bullet/paragraph/germandbls
  265. /registered/copyright/trademark/acute/dieresis/notequal/AE/Oslash
  266. /infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff/summation
  267. /product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash
  268. /questiondown/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft
  269. /guillemotright/ellipsis/blank/Agrave/Atilde/Otilde/OE/oe
  270. /endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide/lozenge
  271. /ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright/fi/fl
  272. /daggerdbl/periodcentered/quotesinglbase/quotedblbase/perthousand/Acircumflex/Ecircumflex/Aacute
  273. /Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave/Oacute/Ocircumflex
  274. /apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde
  275. /macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron
  276. CVvec 128 128 getinterval astore pop
  277.  %---Sep stuff
  278. /CurrentProc{currentscreen exch pop exch pop}bdf/CurrentFreq{currentscreen pop pop}bdf
  279. /doSepStuff {
  280. /inch {72 mul} bdf
  281. /UCRB 0.5 def   % - Black undercolor removal starts at 50 percent
  282. /UCRM 0.31 def  % - percent of magenta UCR
  283. /UCRY 0.48 def  % - percent of yellow UCR
  284. /setAngles{/blackAngle edf/yellowAngle edf/magentaAngle edf/cyanAngle edf}bdf
  285. /DoColor{color dup 2 copy dup 0 eq{black}if 1 eq{yellow}if 2 eq{magenta}if 3 eq{cyan}if 4 eq{comp}if}bdf
  286. /regMarks{gsave translate 0.3 setlinewidth newpath
  287. 10 0 moveto 0 0 10 0 360 arc 1 setgray fill
  288. 0 setgray 8 0 moveto 0 0 8 0 360 arc
  289. -10 0 moveto 10 0 lineto 0 -10 moveto 0 10 lineto stroke
  290. 4 0 moveto 0 0 4 0 360 arc fill
  291. -4 0 moveto 4 0 lineto 0 -4 moveto 0 4 lineto 1 setgray stroke grestore}bdf
  292. /doregmarks{systemdict begin 
  293. pgl 12 add  pgb 12 sub regMarks
  294. pgl 12 add  pgt 12 add regMarks
  295. pgr 12 sub  pgb 12 sub regMarks
  296. pgr 12 sub  pgt 12 add regMarks
  297. end}bdf
  298. /objColor 4 array def
  299. /SepSetUp{/JName edf/Names edf/Marks edf/DocumetName edf}bdf
  300. /dopageclip{initmatrix pgl dup pgt moveto pgb lineto pgr pgb lineto pgr pgt lineto pgl pgt lineto closepath clippath newpath}bdf
  301. /doWide{matrix currentmatrix aload 7 1 roll 6 2 roll exch 4 2 roll exch 4 2 roll 6 -2 roll 7 -1 roll astore setmatrix }bdf
  302. /showJName{ pgl 150 add pgt 10 add moveto DocumetName show}bdf
  303. /dooptions{Marks{doregmarks}if JName{showJName}if}bdf 
  304. /crpln{gsave .3 DocScale div setlinewidth newpath 4 2 roll translate 0 5 2 index mul moveto 0 15 DocScale div 3 -1 roll mul rlineto 5 1 index mul 0 moveto 15 DocScale div mul 0 rlineto systemdict begin 0 setgray end stroke grestore}bdf
  305. /Crops{gsave 2 copy 1 1 crpln 3 index exch -1 1 crpln 1 index 1 -1 crpln -1 -1 crpln grestore}bdf
  306. /cyan {
  307.         /color 3 def
  308.         Freq cyanAngle {CSepProc} setscreen
  309.         0 setgray
  310.         gsave
  311.                 dopageclip
  312.                 systemdict begin 0 setgray end
  313.                 pgl 100 add pgb 10 sub moveto
  314.                 /Times-Roman findfont
  315.                 10 scalefont setfont
  316.                 Names{(CYAN) show}if
  317.                 dooptions
  318.         grestore
  319.         } def
  320. /magenta {
  321.         /color 2 def
  322.         Freq magentaAngle {MSepProc} setscreen
  323.         0 setgray
  324.         gsave
  325.                 dopageclip
  326.                 systemdict begin 0 setgray end
  327.                 pgl 200 add pgb 10 sub moveto
  328.                 /Times-Roman findfont
  329.                 10 scalefont setfont
  330.                 Names{(MAGENTA) show}if
  331.                 dooptions
  332.         grestore
  333.         } def
  334. /yellow {
  335.         /color 1 def
  336.         Freq yellowAngle {YSepProc} setscreen
  337.         0 setgray
  338.         gsave
  339.                 dopageclip
  340.                 systemdict begin 0 setgray end
  341.                 pgl 300 add pgb 10 sub moveto
  342.                 /Times-Roman findfont
  343.                 10 scalefont setfont
  344.                 Names{(YELLOW) show}if
  345.                 dooptions
  346.         grestore
  347.         } def
  348. /black
  349.         {
  350.         /color 0 def
  351.         Freq blackAngle {BSepProc} setscreen
  352.         0 setgray
  353.         gsave
  354.                 dopageclip              
  355.                 systemdict begin 0 setgray end
  356.                 pgl 400 add pgb 10 sub moveto
  357.                 /Times-Roman findfont
  358.                 10 scalefont setfont
  359.                 Names{(BLACK) show}if
  360.                 dooptions
  361.         grestore
  362.         } def
  363. /comp {
  364.         gsave
  365.                 dopageclip
  366.                 systemdict begin 0 setgray end
  367.                 pgl 100 add pgb 10 sub moveto
  368.                 /Times-Roman findfont
  369.                 10 scalefont setfont
  370.                 Names{(Composite) show}if
  371.                 dooptions
  372.         grestore
  373.         } def
  374. color 4 ne{
  375. COver MOver YOver BOver or or or{
  376. /oktodo{currentgray 1 eq{COver{objColor 0 get}{F}ifelse MOver{objColor 1 get}{F}ifelse 
  377. YOver{objColor 2 get}{F}ifelse BOver{objColor 3 get}{F}ifelse or or or not}{T}ifelse}bdf
  378. /stroke{oktodo{systemdict begin stroke end}{newpath}ifelse}bdf
  379. /fill{oktodo{systemdict begin fill end}{newpath}ifelse}bdf
  380. /image{systemdict begin image end}bdf}
  381. {/image{systemdict begin image end}bdf/stroke{systemdict begin stroke end}bdf/fill{systemdict begin fill end}bdf}ifelse
  382. /setgray {
  383.         dup F F F 4 -1 roll 1 ne objColor astore pop
  384.         color 0 eq {
  385.                 systemdict begin setgray end
  386.                 }
  387.                 {
  388.                 pop systemdict begin 1 setgray end
  389.         } ifelse
  390.         } def
  391. /setmkcolor{do_ucrblack 4 1 roll do_correct 4 -1 roll 4 copy 1 1 4{pop 1 ne 4 1 roll}for objColor astore pop}bdf
  392. /setcmykcolor {
  393.         4 copy 1 1 4{pop 1 ne 4 1 roll}for objColor astore pop
  394.         color index systemdict begin setgray end pop pop pop pop
  395.         } def
  396. /setrgbcolor {
  397.         color 0 eq {
  398.                 setmkcolor
  399.                 systemdict begin setgray end pop pop pop}
  400.                 {
  401.                 setmkcolor pop
  402.                 color 1 sub index
  403.                 systemdict begin setgray end
  404.                 pop pop pop
  405.                 } ifelse
  406.         } def
  407. /do_correct {
  408.         cvtrgbcym
  409.         1 index UCRY mul sub dup 0 lt{ pop 0}if 3 1 roll
  410.         1 index UCRM mul sub dup 0 lt{ pop 0}if 3 1 roll
  411.         3 1 roll
  412.         cvtrgbcym
  413.         } def
  414. /do_ucrblack {
  415.         3 copy 1 index eq 3 1 roll eq and{pop pop 1 1 1 4 -1 roll}{
  416.         cvtrgbcym
  417.         cmin 3 index cmin
  418.         /mincolor edf
  419.         pop pop
  420.         /ucramt mincolor UCRB sub
  421.         dup 0 lt{ pop 0} if def
  422.         ucramt sub 3 1 roll
  423.         ucramt sub 3 1 roll
  424.         ucramt sub 3 1 roll
  425.         cvtrgbcym
  426.         ucramt 1.25 mul
  427.         1 exch sub}ifelse
  428.         } def
  429. /cvtrgbcym {
  430.         3 {1 exch sub 3 1 roll} repeat
  431.         } def
  432. /cmin {
  433.         2 copy lt {1}{0} ifelse
  434.         index
  435.         } def
  436. }if
  437. } def
  438. end
  439. %%EndProcSet
  440. %%BeginSetup
  441. CanvasDict begin
  442. 0 setlinecap
  443. 0 setlinejoin
  444. 4 setmiterlimit
  445. [] 0 setdash
  446. /currot 0 def
  447. newpath
  448. origmtx currentmatrix pop
  449. LswUnits
  450. %%EndSetup
  451. % ---- Object #1:14 Obj Type: 5
  452. 1 1 setpen
  453. /pens { 0.000000 setgray} def
  454. 19 259.5000 moveto
  455. 19 247 31.5000 247 31.5000 247 curveto
  456. 31.5000 247 329.5000 247 329.5000 247 curveto
  457. 329.5000 247 342 247 342 259.5000 curveto
  458. 342 259.5000 342 356.5000 342 356.5000 curveto
  459. 342 356.5000 342 369 329.5000 369 curveto
  460. 329.5000 369 31.5000 369 31.5000 369 curveto
  461. 31.5000 369 19 369 19 356.5000 curveto
  462. 19 356.5000 19 259.5000 19 259.5000 curveto
  463. closepath
  464. dostroke newpath
  465. % ---- Object #2:25 Obj Type: 4
  466. 1 1 setpen
  467. /pens { 0.000000 setgray} def
  468. /fills { 0.7500 setgray} def
  469. 377.5000 39.5000 359.5000 242.5000 rectpath dofill newpath
  470. 378 39 359 243 rectpath dostroke newpath
  471. % ---- Object #3:3 Obj Type: 2
  472. 0 0 setpen
  473. /pens {0.000000 setgray} def
  474. mark /|___Helvetica-Oblique /Helvetica-Oblique cvRecFont 
  475. 14 fts/|___Helvetica-Oblique findfont  exch scalefont setfont
  476. 68 343 moveto
  477. (Do you need a dividing line?) pens show 
  478. % ---- Object #4:6 Obj Type: 2
  479. 0 0 setpen
  480. /pens {0.000000 setgray} def
  481. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  482. 12 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  483. 26 343 moveto
  484. (Issue:) pens show 
  485. % ---- Object #5:4 Obj Type: 2
  486. 0 0 setpen
  487. /pens {0.000000 setgray} def
  488. mark /|___Helvetica-Oblique /Helvetica-Oblique cvRecFont 
  489. 14 fts/|___Helvetica-Oblique findfont  exch scalefont setfont
  490. 83 327 moveto
  491. (Yes.) pens show 
  492. % ---- Object #6:7 Obj Type: 2
  493. 0 0 setpen
  494. /pens {0.000000 setgray} def
  495. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  496. 12 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  497. 24 325 moveto
  498. (Answer:) pens show 
  499. % ---- Object #7:5 Obj Type: 2
  500. 0 0 setpen
  501. /pens {0.000000 setgray} def
  502. mark /|___Helvetica-Oblique /Helvetica-Oblique cvRecFont 
  503. 14 fts/|___Helvetica-Oblique findfont  exch scalefont setfont
  504. 104 301 moveto
  505. (A dividing line provides a nice) pens show 
  506. /pens {0.000000 setgray} def
  507. mark /|___Helvetica-Oblique /Helvetica-Oblique cvRecFont 
  508. 14 fts/|___Helvetica-Oblique findfont  exch scalefont setfont
  509. 104 282 moveto
  510. (illustration for correlation..) pens show 
  511. % ---- Object #8:8 Obj Type: 2
  512. 0 0 setpen
  513. /pens {0.000000 setgray} def
  514. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  515. 12 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  516. 25 303 moveto
  517. (Arguments:) pens show 
  518. % ---- Object #9:13 Obj Type: 2
  519. 0 0 setpen
  520. /pens {0.000000 setgray} def
  521. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  522. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  523. 35 259 moveto
  524. (correlation -> \(dividing-line-p\)) pens show 
  525. % ---- Object #10:33 Obj Type: 2
  526. 0 0 setpen
  527. /pens {0.000000 setgray} def
  528. 18 fts /Courier-Bold findfont  exch scalefont setfont
  529. 41 364 moveto
  530. (Argumentation-Base) pens show 
  531. % ---- Object #11:57 Obj Type: 7
  532. 1 1 setpen
  533. /pens { 0.000000 setgray} def
  534. 333 211 moveto
  535. 332.0749 211.0081 lineto
  536. 330.2266 211.0726 lineto
  537. 328.3816 211.2016 lineto
  538. 326.5423 211.3949 lineto
  539. 324.7109 211.6522 lineto
  540. 322.8895 211.9733 lineto
  541. 321.0781 212.3583 lineto
  542. 319.2836 212.8057 lineto
  543. 317.5058 213.3154 lineto
  544. 315.7468 213.8868 lineto
  545. 314.0081 214.5196 lineto
  546. 312.2911 215.2133 lineto
  547. 310.6016 215.9655 lineto
  548. 308.9393 216.7762 lineto
  549. 307.3063 217.6445 lineto
  550. 305.7046 218.5691 lineto
  551. 304.1362 219.5491 lineto
  552. 302.6009 220.5846 lineto
  553. 301.1040 221.6722 lineto
  554. 299.6466 222.8108 lineto
  555. 298.2299 223.9996 lineto
  556. 296.8554 225.2370 lineto
  557. 295.5234 226.5232 lineto
  558. 294.2387 227.8536 lineto
  559. 293.0011 229.2280 lineto
  560. 291.8123 230.6447 lineto
  561. 290.6736 232.1021 lineto
  562. 289.5865 233.5982 lineto
  563. 288.5504 235.1341 lineto
  564. 287.5704 236.7025 lineto
  565. 286.6456 238.3042 lineto
  566. 285.7773 239.9371 lineto
  567. 284.9665 241.5993 lineto
  568. 284.2142 243.2889 lineto
  569. 283.5205 245.0059 lineto
  570. 282.8879 246.7438 lineto
  571. 282.3163 248.5027 lineto
  572. 281.8063 250.2813 lineto
  573. 281.3588 252.0758 lineto
  574. 280.9738 253.8872 lineto
  575. 280.6526 255.7085 lineto
  576. dostroke newpath
  577. % ---- Object #12:15 Obj Type: 2
  578. 0 0 setpen
  579. /pens {0.000000 setgray} def
  580. mark /|___Helvetica-Oblique /Helvetica-Oblique cvRecFont 
  581. 14 fts/|___Helvetica-Oblique findfont  exch scalefont setfont
  582. 365 335 moveto
  583. (Illustrate the correlation ) pens show 
  584. /pens {0.000000 setgray} def
  585. mark /|___Helvetica-Oblique /Helvetica-Oblique cvRecFont 
  586. 14 fts/|___Helvetica-Oblique findfont  exch scalefont setfont
  587. 365 316 moveto
  588. (of the two values.) pens show 
  589. % ---- Object #13:19 Obj Type: 5
  590. 1 1 setpen
  591. /pens { 0.000000 setgray} def
  592. 361 316.5000 moveto
  593. 361 304 373.5000 304 373.5000 304 curveto
  594. 373.5000 304 544.5000 304 544.5000 304 curveto
  595. 544.5000 304 557 304 557 316.5000 curveto
  596. 557 316.5000 557 353.5000 557 353.5000 curveto
  597. 557 353.5000 557 366 544.5000 366 curveto
  598. 544.5000 366 373.5000 366 373.5000 366 curveto
  599. 373.5000 366 361 366 361 353.5000 curveto
  600. 361 353.5000 361 316.5000 361 316.5000 curveto
  601. closepath
  602. dostroke newpath
  603. % ---- Object #14:39 Obj Type: 4
  604. 1 1 setpen
  605. /pens { 0.000000 setgray} def
  606. /fills { 0.7500 setgray} def
  607. 373.5000 380.5000 354.5000 525.5000 rectpath dofill newpath
  608. 374 380 354 526 rectpath dostroke newpath
  609. % ---- Object #15:35 Obj Type: 2
  610. 0 0 setpen
  611. /pens {0.000000 setgray} def
  612. 18 fts /Courier-Bold findfont  exch scalefont setfont
  613. 381 359 moveto
  614. (Specification) pens show 
  615. % ---- Object #16:32 Obj Type: 5
  616. 1 1 setpen
  617. /pens { 0.000000 setgray} def
  618. 324 37.5000 moveto
  619. 324 25 336.5000 25 336.5000 25 curveto
  620. 336.5000 25 539.5000 25 539.5000 25 curveto
  621. 539.5000 25 552 25 552 37.5000 curveto
  622. 552 37.5000 552 124.5000 552 124.5000 curveto
  623. 552 124.5000 552 137 539.5000 137 curveto
  624. 539.5000 137 336.5000 137 336.5000 137 curveto
  625. 336.5000 137 324 137 324 124.5000 curveto
  626. 324 124.5000 324 37.5000 324 37.5000 curveto
  627. closepath
  628. dostroke newpath
  629. % ---- Object #17:40 Obj Type: 4
  630. 1 1 setpen
  631. /pens { 0.000000 setgray} def
  632. /fills { 0.7500 setgray} def
  633. 143.5000 351.5000 126.5000 519.5000 rectpath dofill newpath
  634. 144 351 126 520 rectpath dostroke newpath
  635. % ---- Object #18:34 Obj Type: 2
  636. 0 0 setpen
  637. /pens {0.000000 setgray} def
  638. 18 fts /Courier-Bold findfont  exch scalefont setfont
  639. 351 130 moveto
  640. (Catalog example) pens show 
  641. % ---- Object #19:18 Obj Type: 5
  642. 1 1 setpen
  643. /pens { 0.000000 setgray} def
  644. 29 121.5000 moveto
  645. 29 109 41.5000 109 41.5000 109 curveto
  646. 41.5000 109 282.5000 109 282.5000 109 curveto
  647. 282.5000 109 295 109 295 121.5000 curveto
  648. 295 121.5000 295 164.5000 295 164.5000 curveto
  649. 295 164.5000 295 177 282.5000 177 curveto
  650. 282.5000 177 41.5000 177 41.5000 177 curveto
  651. 41.5000 177 29 177 29 164.5000 curveto
  652. 29 164.5000 29 121.5000 29 121.5000 curveto
  653. closepath
  654. dostroke newpath
  655. % ---- Object #20:26 Obj Type: 4
  656. 1 1 setpen
  657. /pens { 0.000000 setgray} def
  658. /fills { 0.7500 setgray} def
  659. 183.5000 43.5000 167.5000 203.5000 rectpath dofill newpath
  660. 184 43 167 204 rectpath dostroke newpath
  661. % ---- Object #21:16 Obj Type: 2
  662. 0 0 setpen
  663. /pens {0.000000 setgray} def
  664. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  665. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  666. 32 145 moveto
  667. (\(dividing-line-p\) -> ) pens show 
  668. % ---- Object #22:31 Obj Type: 2
  669. 0 0 setpen
  670. /pens {0.000000 setgray} def
  671. 18 fts /Courier-Bold findfont  exch scalefont setfont
  672. 45 169 moveto
  673. (Semantics-Base) pens show 
  674. % ---- Object #23:10 Obj Type: 2
  675. 0 0 setpen
  676. /pens {0.000000 setgray} def
  677. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  678. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  679. 156 146 moveto
  680. (\(horizontal-aixs-p\) &) pens show 
  681. /pens {0.000000 setgray} def
  682. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  683. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  684. 156 131 moveto
  685. (\(vertical-axis-p\) &) pens show 
  686. /pens {0.000000 setgray} def
  687. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  688. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  689. 156 116 moveto
  690. (\(diagonal-line-p\)) pens show 
  691. % ---- Object #24:17 Obj Type: 2
  692. 0 0 setpen
  693. /pens {0.000000 setgray} def
  694. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  695. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  696. 349 208 moveto
  697. (correlation ->) pens show 
  698. % ---- Object #25:20 Obj Type: 2
  699. 0 0 setpen
  700. /pens {0.000000 setgray} def
  701. mark /|___Times-Bold /Times-Bold cvRecFont 
  702. 18 fts/|___Times-Bold findfont  exch scalefont setfont
  703. 356 230 moveto
  704. (Specification-linking rule) pens ulb show ule
  705. % ---- Object #26:53 Obj Type: 3
  706. 4 4 setpen
  707. /pens { 0.5000 setgray} def
  708. 448 300 448 245 linpath doline newpath
  709. % ---- Object #27:42 Obj Type: 3
  710. 4 4 setpen
  711. /pens { 0.5000 setgray} def
  712. gsave
  713. 447 142 2 copy moveto
  714. 21 108.1524 68.1524 closepath arcn pens fill grestore
  715. 448 173 447.6448 161.9896 linpath doline newpath
  716. % ---- Object #28:55 Obj Type: 7
  717. 1 1 setpen
  718. /pens { 0.000000 setgray} def
  719. gsave
  720. 343.4235 210.9750 2 copy moveto
  721. 12 -158.5884 -198.5884 closepath arcn pens fill grestore
  722. 217 170 moveto
  723. 217.0200 170.7156 lineto
  724. 217.1795 172.1455 lineto
  725. 217.4983 173.5727 lineto
  726. 217.9760 174.9955 lineto
  727. 218.6121 176.4123 lineto
  728. 219.4057 177.8213 lineto
  729. 220.3572 179.2226 lineto
  730. 221.4630 180.6108 lineto
  731. 222.7229 181.9861 lineto
  732. 224.1354 183.3468 lineto
  733. 225.6994 184.6918 lineto
  734. 227.4140 186.0201 lineto
  735. 229.2733 187.3271 lineto
  736. 231.2771 188.6130 lineto
  737. 233.4231 189.8763 lineto
  738. 235.7086 191.1153 lineto
  739. 238.1309 192.3286 lineto
  740. 240.6903 193.5163 lineto
  741. 243.3784 194.6743 lineto
  742. 246.1927 195.8017 lineto
  743. 249.1310 196.8977 lineto
  744. 252.1896 197.9609 lineto
  745. 255.3687 198.9913 lineto
  746. 258.6571 199.9852 lineto
  747. 262.0542 200.9425 lineto
  748. 265.5559 201.8622 lineto
  749. 269.1580 202.7430 lineto
  750. 272.8560 203.5840 lineto
  751. 276.6523 204.3855 lineto
  752. 280.5289 205.1437 lineto
  753. 284.4877 205.8590 lineto
  754. 288.5238 206.5307 lineto
  755. 292.6324 207.1579 lineto
  756. 296.8084 207.7399 lineto
  757. 301.0523 208.2766 lineto
  758. 305.3479 208.7660 lineto
  759. 309.6954 209.2081 lineto
  760. 314.0914 209.6027 lineto
  761. 318.5269 209.9488 lineto
  762. 323.0041 210.2467 lineto
  763. 327.5059 210.4952 lineto
  764. 332.0327 210.6943 lineto
  765. 336.5789 210.8439 lineto
  766. dostroke newpath
  767. % ---- Object #29:11 Obj Type: 2
  768. 0 0 setpen
  769. /pens {0.000000 setgray} def
  770. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  771. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  772. 438 210 moveto
  773. (\(horizontal-aixs-p\) &) pens show 
  774. /pens {0.000000 setgray} def
  775. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  776. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  777. 438 195 moveto
  778. (\(vertical-axis-p\) &) pens show 
  779. /pens {0.000000 setgray} def
  780. mark /|___Helvetica-Bold /Helvetica-Bold cvRecFont 
  781. 14 fts/|___Helvetica-Bold findfont  exch scalefont setfont
  782. 438 180 moveto
  783. (\(diagonal-line-p\)) pens show 
  784. % ---- Object #30:24 Obj Type: 99
  785. % ---- Object #31:51 Obj Type: 99
  786. % ---- Object #32:12 Obj Type: 99
  787. % ---- Object #33:28 Obj Type: 2
  788. 0 0 setpen
  789. /pens {0.000000 setgray} def
  790. mark /|___Helvetica /Helvetica cvRecFont 
  791. 9 fts/|___Helvetica findfont  exch scalefont setfont
  792. 465.5000 102.5000 moveto
  793. (drawing area) pens show 
  794. % ---- Object #34:21 Obj Type: 4
  795. 1 1 setpen
  796. /pens { 0.000000 setgray} def
  797. 112.5000 463.5000 100.5000 528.5000 rectpath dostroke newpath
  798. % ---- Object #35:47 Obj Type: 99
  799. % ---- Object #36:43 Obj Type: 2
  800. 0 0 setpen
  801. /pens {0.000000 setgray} def
  802. mark /|___Helvetica /Helvetica cvRecFont 
  803. 9 fts/|___Helvetica findfont  exch scalefont setfont
  804. 464.5000 89.2500 moveto
  805. (horizontal axis) pens show 
  806. % ---- Object #37:37 Obj Type: 4
  807. 1 1 setpen
  808. /pens { 0.000000 setgray} def
  809. 99 463.2500 87.5000 534.7500 rectpath dostroke newpath
  810. % ---- Object #38:49 Obj Type: 99
  811. % ---- Object #39:44 Obj Type: 2
  812. 0 0 setpen
  813. /pens {0.000000 setgray} def
  814. mark /|___Helvetica /Helvetica cvRecFont 
  815. 9 fts/|___Helvetica findfont  exch scalefont setfont
  816. 465.7500 75.7500 moveto
  817. (vertical axis) pens show 
  818. % ---- Object #40:48 Obj Type: 4
  819. 1 1 setpen
  820. /pens { 0.000000 setgray} def
  821. 85.7500 463.2500 73.7500 528.2500 rectpath dostroke newpath
  822. % ---- Object #41:52 Obj Type: 99
  823. % ---- Object #42:46 Obj Type: 2
  824. 0 0 setpen
  825. /pens {0.000000 setgray} def
  826. mark /|___Helvetica /Helvetica cvRecFont 
  827. 9 fts/|___Helvetica findfont  exch scalefont setfont
  828. 465 62 moveto
  829. (dividing line) pens show 
  830. % ---- Object #43:50 Obj Type: 4
  831. 1 1 setpen
  832. /pens { 0.000000 setgray} def
  833. 71.7500 463.7500 60.2500 522.2500 rectpath dostroke newpath
  834. % ---- Object #44:45 Obj Type: 99
  835. % ---- Object #45:54 Obj Type: 2
  836. 0 0 setpen
  837. /pens {0.000000 setgray} def
  838. mark /|___Helvetica /Helvetica cvRecFont 
  839. 9 fts/|___Helvetica findfont  exch scalefont setfont
  840. 465 49 moveto
  841. (curve drawing) pens show 
  842. % ---- Object #46:56 Obj Type: 4
  843. 1 1 setpen
  844. /pens { 0.000000 setgray} def
  845. 58.7500 463.7500 48 535 rectpath dostroke newpath
  846. % ---- Object #47:23 Obj Type: 99
  847. % ---- Object #48:9 Obj Type: 2
  848. 0 0 setpen
  849. /pens {0.000000 setgray} def
  850. mark /|___Helvetica /Helvetica cvRecFont 
  851. 9 fts/|___Helvetica findfont  exch scalefont setfont
  852. 353 83.5000 moveto
  853. (graphing functions) pens show 
  854. % ---- Object #49:22 Obj Type: 4
  855. 1 1 setpen
  856. /pens { 0.000000 setgray} def
  857. 93 350 82 440 rectpath dostroke newpath
  858. % ---- Object #50:27 Obj Type: 3
  859. 1 1 setpen
  860. /pens { 0.000000 setgray} def
  861. 440 88 463 107 linpath doline newpath
  862. % ---- Object #51:29 Obj Type: 3
  863. 1 1 setpen
  864. /pens { 0.000000 setgray} def
  865. 463 93 440 88 linpath doline newpath
  866. % ---- Object #52:30 Obj Type: 3
  867. 1 1 setpen
  868. /pens { 0.000000 setgray} def
  869. 440 88 463 80 linpath doline newpath
  870. % ---- Object #53:38 Obj Type: 3
  871. 1 1 setpen
  872. /pens { 0.000000 setgray} def
  873. 440 87 463 66 linpath doline newpath
  874. % ---- Object #54:41 Obj Type: 3
  875. 1 1 setpen
  876. /pens { 0.000000 setgray} def
  877. 440 88 463 54 linpath doline newpath
  878. % ---- Object #55:36 Obj Type: 4
  879. 1 1 setpen
  880. /pens { 0.000000 setgray} def
  881. 120 344 35 538 rectpath dostroke newpath
  882. origmtx setmatrix
  883. systemdict /setpacking known {origpack setpacking} if end
  884. %%EndDocument:
  885.  
  886. %%EndDocument
  887.  GE ES
  888. %%Trailer
  889. %%Pages: 1
  890. %%DocumentFonts:
  891.  
  892.  
  893.