%!PS-Adobe-2.0 %%Creator: dot version uwin98 (01-26-98) %%For: (jc) Jean-Christophe,,,, %%Title: G %%Pages: (atend) %%BoundingBox: 36 36 576 145 %%EndComments %%BeginProlog save /DotDict 200 dict def DotDict begin %%BeginResource: procset /coord-font-family /Times-Roman def /default-font-family /Times-Roman def /coordfont coord-font-family findfont 8 scalefont def /InvScaleFactor 1.0 def /set_scale { dup 1 exch div /InvScaleFactor exch def dup scale } bind def % styles /solid { } bind def /dashed { [9 InvScaleFactor mul dup ] 0 setdash } bind def /dotted { [1 InvScaleFactor mul 6 InvScaleFactor mul] 0 setdash } bind def /invis {/fill {newpath} def /stroke {newpath} def /show {pop newpath} def} bind def /bold { 2 setlinewidth } bind def /filled { } bind def /unfilled { } bind def /rounded { } bind def /diagonals { } bind def % hooks for setting color /nodecolor { sethsbcolor } bind def /edgecolor { sethsbcolor } bind def /graphcolor { sethsbcolor } bind def /nopcolor {pop pop pop} bind def /beginpage { % i j npages /npages exch def /j exch def /i exch def /str 10 string def npages 1 gt { gsave coordfont setfont 0 0 moveto (() show i str cvs show (,) show j str cvs show ()) show grestore } if } bind def /set_font { findfont exch scalefont setfont } def % draw aligned label in bounding box aligned to current point % alignfactor tells what fraction to place on the left. % -.5 is centered. /alignedtext { % text labelwidth fontsz alignfactor /alignfactor exch def /fontsz exch def /width exch def /text exch def gsave % even if node or edge is dashed, don't paint text with dashes [] 0 setdash currentpoint newpath moveto text stringwidth pop alignfactor mul fontsz -.3 mul rmoveto text show grestore } def /boxprim { % xcorner ycorner xsize ysize 4 2 roll moveto 2 copy exch 0 rlineto 0 exch rlineto pop neg 0 rlineto closepath } bind def /ellipse_path { /ry exch def /rx exch def /y exch def /x exch def matrix currentmatrix newpath x y translate rx ry scale 0 0 1 0 360 arc setmatrix } bind def /endpage { showpage } bind def /layercolorseq [ % layer color sequence - darkest to lightest [0 0 0] [.2 .8 .8] [.4 .8 .8] [.6 .8 .8] [.8 .8 .8] ] def /setlayer {/maxlayer exch def /curlayer exch def layercolorseq curlayer get aload pop sethsbcolor /nodecolor {nopcolor} def /edgecolor {nopcolor} def /graphcolor {nopcolor} def } bind def /onlayer { curlayer ne {invis} if } def /onlayers { /myupper exch def /mylower exch def curlayer mylower lt curlayer myupper gt or {invis} if } def /curlayer 0 def %%EndResource %%EndProlog %%BeginSetup 14 default-font-family set_font % /arrowlength 10 def % /arrowwidth 5 def %%EndSetup %%Page: 1 1 %%PageBoundingBox: 36 36 576 145 gsave 35 35 541 110 boxprim clip newpath 36 36 translate 0 0 1 beginpage 0.7521 set_scale 0 0 translate 0 rotate 0.000 0.000 0.000 graphcolor 14.00 /Times-Roman set_font % Tacmach gsave 10 dict begin 244 72 36 18 ellipse_path stroke gsave 10 dict begin 244 73 moveto (Tacmach) 51 14.00 -0.50 alignedtext end grestore end grestore % Evar_refiner gsave 10 dict begin 362 72 45 18 ellipse_path stroke gsave 10 dict begin 362 73 moveto (Evar_refiner) 70 14.00 -0.50 alignedtext end grestore end grestore % Tacmach -> Evar_refiner newpath 280 72 moveto 288 72 297 72 306 72 curveto stroke newpath 306 70 moveto 316 72 lineto 306 75 lineto closepath gsave 0 setgray stroke grestore fill % Refiner gsave 10 dict begin 475 72 31 18 ellipse_path stroke gsave 10 dict begin 475 73 moveto (Refiner) 41 14.00 -0.50 alignedtext end grestore end grestore % Evar_refiner -> Refiner newpath 408 72 moveto 417 72 426 72 434 72 curveto stroke newpath 434 70 moveto 444 72 lineto 434 75 lineto closepath gsave 0 setgray stroke grestore fill % Tacinterp gsave 10 dict begin 37 126 37 18 ellipse_path stroke gsave 10 dict begin 37 127 moveto (Tacinterp) 53 14.00 -0.50 alignedtext end grestore end grestore % Macros gsave 10 dict begin 141 126 31 18 ellipse_path stroke gsave 10 dict begin 141 127 moveto (Macros) 41 14.00 -0.50 alignedtext end grestore end grestore % Tacinterp -> Macros newpath 74 126 moveto 83 126 92 126 100 126 curveto stroke newpath 100 124 moveto 110 126 lineto 100 129 lineto closepath gsave 0 setgray stroke grestore fill % Macros -> Tacmach newpath 164 114 moveto 177 106 195 97 210 89 curveto stroke newpath 209 87 moveto 219 85 lineto 211 91 lineto closepath gsave 0 setgray stroke grestore fill % Logic gsave 10 dict begin 569 72 27 18 ellipse_path stroke gsave 10 dict begin 569 73 moveto (Logic) 32 14.00 -0.50 alignedtext end grestore end grestore % Refiner -> Logic newpath 506 72 moveto 514 72 523 72 532 72 curveto stroke newpath 532 70 moveto 542 72 lineto 532 75 lineto closepath gsave 0 setgray stroke grestore fill % Proof_trees gsave 10 dict begin 675 72 42 18 ellipse_path stroke gsave 10 dict begin 675 73 moveto (Proof_trees) 64 14.00 -0.50 alignedtext end grestore end grestore % Logic -> Proof_trees newpath 596 72 moveto 604 72 613 72 622 72 curveto stroke newpath 622 70 moveto 632 72 lineto 622 75 lineto closepath gsave 0 setgray stroke grestore fill % Pfedit gsave 10 dict begin 141 72 27 18 ellipse_path stroke gsave 10 dict begin 141 73 moveto (Pfedit) 33 14.00 -0.50 alignedtext end grestore end grestore % Pfedit -> Tacmach newpath 168 72 moveto 177 72 188 72 198 72 curveto stroke newpath 198 70 moveto 208 72 lineto 198 75 lineto closepath gsave 0 setgray stroke grestore fill % Clenv gsave 10 dict begin 141 18 27 18 ellipse_path stroke gsave 10 dict begin 141 19 moveto (Clenv) 33 14.00 -0.50 alignedtext end grestore end grestore % Clenv -> Tacmach newpath 162 29 moveto 176 37 195 46 211 55 curveto stroke newpath 211 52 moveto 219 59 lineto 209 57 lineto closepath gsave 0 setgray stroke grestore fill endpage grestore %%PageTrailer %%EndPage: 1 %%Trailer %%Pages: 1 end restore %%EOF