00001 char *ps_txt[] = { 00002 "%%BeginProlog", 00003 "/DotDict 200 dict def", 00004 "DotDict begin", 00005 "", 00006 "/setupLatin1 {", 00007 "mark", 00008 "/EncodingVector 256 array def", 00009 " EncodingVector 0", 00010 "", 00011 "ISOLatin1Encoding 0 255 getinterval putinterval", 00012 "EncodingVector 45 /hyphen put", 00013 "", 00014 "% Set up ISO Latin 1 character encoding", 00015 "/starnetISO {", 00016 " dup dup findfont dup length dict begin", 00017 " { 1 index /FID ne { def }{ pop pop } ifelse", 00018 " } forall", 00019 " /Encoding EncodingVector def", 00020 " currentdict end definefont", 00021 "} def", 00022 "/Times-Roman starnetISO def", 00023 "/Times-Italic starnetISO def", 00024 "/Times-Bold starnetISO def", 00025 "/Times-BoldItalic starnetISO def", 00026 "/Helvetica starnetISO def", 00027 "/Helvetica-Oblique starnetISO def", 00028 "/Helvetica-Bold starnetISO def", 00029 "/Helvetica-BoldOblique starnetISO def", 00030 "/Courier starnetISO def", 00031 "/Courier-Oblique starnetISO def", 00032 "/Courier-Bold starnetISO def", 00033 "/Courier-BoldOblique starnetISO def", 00034 "cleartomark", 00035 "} bind def", 00036 "", 00037 "%%BeginResource: procset graphviz 0 0", 00038 "/coord-font-family /Times-Roman def", 00039 "/default-font-family /Times-Roman def", 00040 "/coordfont coord-font-family findfont 8 scalefont def", 00041 "", 00042 "/InvScaleFactor 1.0 def", 00043 "/set_scale {", 00044 " dup 1 exch div /InvScaleFactor exch def", 00045 " scale", 00046 "} bind def", 00047 "", 00048 "% styles", 00049 "/solid { [] 0 setdash } bind def", 00050 "/dashed { [9 InvScaleFactor mul dup ] 0 setdash } bind def", 00051 "/dotted { [1 InvScaleFactor mul 6 InvScaleFactor mul] 0 setdash } bind def", 00052 "/invis {/fill {newpath} def /stroke {newpath} def /show {pop newpath} def} bind def", 00053 "/bold { 2 setlinewidth } bind def", 00054 "/filled { } bind def", 00055 "/unfilled { } bind def", 00056 "/rounded { } bind def", 00057 "/diagonals { } bind def", 00058 "", 00059 "% hooks for setting color ", 00060 "/nodecolor { sethsbcolor } bind def", 00061 "/edgecolor { sethsbcolor } bind def", 00062 "/graphcolor { sethsbcolor } bind def", 00063 "/nopcolor {pop pop pop} bind def", 00064 "", 00065 "/beginpage { % i j npages", 00066 " /npages exch def", 00067 " /j exch def", 00068 " /i exch def", 00069 " /str 10 string def", 00070 " npages 1 gt {", 00071 " gsave", 00072 " coordfont setfont", 00073 " 0 0 moveto", 00074 " (\\() show i str cvs show (,) show j str cvs show (\\)) show", 00075 " grestore", 00076 " } if", 00077 "} bind def", 00078 "", 00079 "/set_font {", 00080 " findfont exch", 00081 " scalefont setfont", 00082 "} def", 00083 "", 00084 "% draw text fitted to its expected width", 00085 "/alignedtext { % width text", 00086 " /text exch def", 00087 " /width exch def", 00088 " gsave", 00089 " width 0 gt {", 00090 " [] 0 setdash", 00091 " text stringwidth pop width exch sub text length div 0 text ashow", 00092 " } if", 00093 " grestore", 00094 "} def", 00095 "", 00096 "/boxprim { % xcorner ycorner xsize ysize", 00097 " 4 2 roll", 00098 " moveto", 00099 " 2 copy", 00100 " exch 0 rlineto", 00101 " 0 exch rlineto", 00102 " pop neg 0 rlineto", 00103 " closepath", 00104 "} bind def", 00105 "", 00106 "/ellipse_path {", 00107 " /ry exch def", 00108 " /rx exch def", 00109 " /y exch def", 00110 " /x exch def", 00111 " matrix currentmatrix", 00112 " newpath", 00113 " x y translate", 00114 " rx ry scale", 00115 " 0 0 1 0 360 arc", 00116 " setmatrix", 00117 "} bind def", 00118 "", 00119 "/endpage { showpage } bind def", 00120 "/showpage { } def", 00121 "", 00122 "/layercolorseq", 00123 " [ % layer color sequence - darkest to lightest", 00124 " [0 0 0]", 00125 " [.2 .8 .8]", 00126 " [.4 .8 .8]", 00127 " [.6 .8 .8]", 00128 " [.8 .8 .8]", 00129 " ]", 00130 "def", 00131 "", 00132 "/layerlen layercolorseq length def", 00133 "", 00134 "/setlayer {/maxlayer exch def /curlayer exch def", 00135 " layercolorseq curlayer 1 sub layerlen mod get", 00136 " aload pop sethsbcolor", 00137 " /nodecolor {nopcolor} def", 00138 " /edgecolor {nopcolor} def", 00139 " /graphcolor {nopcolor} def", 00140 "} bind def", 00141 "", 00142 "/onlayer { curlayer ne {invis} if } def", 00143 "", 00144 "/onlayers {", 00145 " /myupper exch def", 00146 " /mylower exch def", 00147 " curlayer mylower lt", 00148 " curlayer myupper gt", 00149 " or", 00150 " {invis} if", 00151 "} def", 00152 "", 00153 "/curlayer 0 def", 00154 "", 00155 "%%EndResource", 00156 "%%EndProlog", 00157 "%%BeginSetup", 00158 "14 default-font-family set_font", 00159 "1 setmiterlimit", 00160 "% /arrowlength 10 def", 00161 "% /arrowwidth 5 def", 00162 "", 00163 "% make sure pdfmark is harmless for PS-interpreters other than Distiller", 00164 "/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse", 00165 "% make '<<' and '>>' safe on PS Level 1 devices", 00166 "/languagelevel where {pop languagelevel}{1} ifelse", 00167 "2 lt {", 00168 " userdict (<<) cvn ([) cvn load put", 00169 " userdict (>>) cvn ([) cvn load put", 00170 "} if", 00171 "", 00172 "%%EndSetup", 00173 (char*)0 };