Graphviz  2.41.20170921.2350
ps.h
Go to the documentation of this file.
1 static const char *ps_txt[] = {
2 "%%BeginProlog",
3 "/DotDict 200 dict def",
4 "DotDict begin",
5 "",
6 "/setupLatin1 {",
7 "mark",
8 "/EncodingVector 256 array def",
9 " EncodingVector 0",
10 "",
11 "ISOLatin1Encoding 0 255 getinterval putinterval",
12 "EncodingVector 45 /hyphen put",
13 "",
14 "% Set up ISO Latin 1 character encoding",
15 "/starnetISO {",
16 " dup dup findfont dup length dict begin",
17 " { 1 index /FID ne { def }{ pop pop } ifelse",
18 " } forall",
19 " /Encoding EncodingVector def",
20 " currentdict end definefont",
21 "} def",
22 "/Times-Roman starnetISO def",
23 "/Times-Italic starnetISO def",
24 "/Times-Bold starnetISO def",
25 "/Times-BoldItalic starnetISO def",
26 "/Helvetica starnetISO def",
27 "/Helvetica-Oblique starnetISO def",
28 "/Helvetica-Bold starnetISO def",
29 "/Helvetica-BoldOblique starnetISO def",
30 "/Courier starnetISO def",
31 "/Courier-Oblique starnetISO def",
32 "/Courier-Bold starnetISO def",
33 "/Courier-BoldOblique starnetISO def",
34 "cleartomark",
35 "} bind def",
36 "",
37 "%%BeginResource: procset graphviz 0 0",
38 "/coord-font-family /Times-Roman def",
39 "/default-font-family /Times-Roman def",
40 "/coordfont coord-font-family findfont 8 scalefont def",
41 "",
42 "/InvScaleFactor 1.0 def",
43 "/set_scale {",
44 " dup 1 exch div /InvScaleFactor exch def",
45 " scale",
46 "} bind def",
47 "",
48 "% styles",
49 "/solid { [] 0 setdash } bind def",
50 "/dashed { [9 InvScaleFactor mul dup ] 0 setdash } bind def",
51 "/dotted { [1 InvScaleFactor mul 6 InvScaleFactor mul] 0 setdash } bind def",
52 "/invis {/fill {newpath} def /stroke {newpath} def /show {pop newpath} def} bind def",
53 "/bold { 2 setlinewidth } bind def",
54 "/filled { } bind def",
55 "/unfilled { } bind def",
56 "/rounded { } bind def",
57 "/diagonals { } bind def",
58 "/tapered { } bind def",
59 "",
60 "% hooks for setting color ",
61 "/nodecolor { sethsbcolor } bind def",
62 "/edgecolor { sethsbcolor } bind def",
63 "/graphcolor { sethsbcolor } bind def",
64 "/nopcolor {pop pop pop} bind def",
65 "",
66 "/beginpage { % i j npages",
67 " /npages exch def",
68 " /j exch def",
69 " /i exch def",
70 " /str 10 string def",
71 " npages 1 gt {",
72 " gsave",
73 " coordfont setfont",
74 " 0 0 moveto",
75 " (\\() show i str cvs show (,) show j str cvs show (\\)) show",
76 " grestore",
77 " } if",
78 "} bind def",
79 "",
80 "/set_font {",
81 " findfont exch",
82 " scalefont setfont",
83 "} def",
84 "",
85 "% draw text fitted to its expected width",
86 "/alignedtext { % width text",
87 " /text exch def",
88 " /width exch def",
89 " gsave",
90 " width 0 gt {",
91 " [] 0 setdash",
92 " text stringwidth pop width exch sub text length div 0 text ashow",
93 " } if",
94 " grestore",
95 "} def",
96 "",
97 "/boxprim { % xcorner ycorner xsize ysize",
98 " 4 2 roll",
99 " moveto",
100 " 2 copy",
101 " exch 0 rlineto",
102 " 0 exch rlineto",
103 " pop neg 0 rlineto",
104 " closepath",
105 "} bind def",
106 "",
107 "/ellipse_path {",
108 " /ry exch def",
109 " /rx exch def",
110 " /y exch def",
111 " /x exch def",
112 " matrix currentmatrix",
113 " newpath",
114 " x y translate",
115 " rx ry scale",
116 " 0 0 1 0 360 arc",
117 " setmatrix",
118 "} bind def",
119 "",
120 "/endpage { showpage } bind def",
121 "/showpage { } def",
122 "",
123 "/layercolorseq",
124 " [ % layer color sequence - darkest to lightest",
125 " [0 0 0]",
126 " [.2 .8 .8]",
127 " [.4 .8 .8]",
128 " [.6 .8 .8]",
129 " [.8 .8 .8]",
130 " ]",
131 "def",
132 "",
133 "/layerlen layercolorseq length def",
134 "",
135 "/setlayer {/maxlayer exch def /curlayer exch def",
136 " layercolorseq curlayer 1 sub layerlen mod get",
137 " aload pop sethsbcolor",
138 " /nodecolor {nopcolor} def",
139 " /edgecolor {nopcolor} def",
140 " /graphcolor {nopcolor} def",
141 "} bind def",
142 "",
143 "/onlayer { curlayer ne {invis} if } def",
144 "",
145 "/onlayers {",
146 " /myupper exch def",
147 " /mylower exch def",
148 " curlayer mylower lt",
149 " curlayer myupper gt",
150 " or",
151 " {invis} if",
152 "} def",
153 "",
154 "/curlayer 0 def",
155 "",
156 "%%EndResource",
157 "%%EndProlog",
158 "%%BeginSetup",
159 "14 default-font-family set_font",
160 "% /arrowlength 10 def",
161 "% /arrowwidth 5 def",
162 "",
163 "% make sure pdfmark is harmless for PS-interpreters other than Distiller",
164 "/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse",
165 "% make '<<' and '>>' safe on PS Level 1 devices",
166 "/languagelevel where {pop languagelevel}{1} ifelse",
167 "2 lt {",
168 " userdict (<<) cvn ([) cvn load put",
169 " userdict (>>) cvn ([) cvn load put",
170 "} if",
171 "",
172 "%%EndSetup",
173 (char*)0 };