1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
digraph Lattice {
// Define nodes
splines=false;
node [shape=circle, style=filled, fillcolor=lightblue];
nodesep=0.6;
TOP [label=<<B>⊤</B >>, fillcolor=black, fontcolor=white];
BOT [label=<<B>⊥</B>>, fillcolor=black, fontcolor=white];
// ----------------------
// Control
XCTRL [label=<<B>⊤</B >:ctrl>, fillcolor=yellow, shape=oval];
CTRL [label=<<B>⊥</B>:ctrl>, fillcolor=yellow, shape=oval];
TOP -> XCTRL;
XCTRL -> CTRL;
CTRL -> BOT;
// ----------------------
// Integers
INT_TOP [label=<<B>⊤</B >:int>, fillcolor=lightblue, shape=oval];
INT_BOT [label=<<B>⊥</B>:int>, fillcolor=lightblue, shape=oval];
INT_MIN [label="-n" , fillcolor=lightblue];
INT_MINDOTS [label="...", fillcolor=lightblue shape=oval];
INT_MINUS [label="-1" , fillcolor=lightblue];
INT_ZERO [label="0" , fillcolor=lightblue];
INT_PLUS [label="1" , fillcolor=lightblue];
INT_MAXDOTS [label="...", fillcolor=lightblue, shape=oval];
INT_MAX [label="+n" , fillcolor=lightblue];
TOP -> INT_TOP;
INT_TOP -> INT_MIN;
INT_TOP -> INT_MINDOTS;
INT_TOP -> INT_MINUS;
INT_TOP -> INT_ZERO;
INT_TOP -> INT_PLUS;
INT_TOP -> INT_MAXDOTS;
INT_TOP -> INT_MAX;
INT_MIN -> INT_BOT;
INT_MINDOTS -> INT_BOT;
INT_MINUS -> INT_BOT;
INT_ZERO -> INT_BOT;
INT_PLUS -> INT_BOT;
INT_MAXDOTS -> INT_BOT;
INT_MAX -> INT_BOT;
INT_BOT -> BOT;
INT_MIN -> INT_MINDOTS -> INT_MINUS -> INT_ZERO -> INT_PLUS -> INT_MAXDOTS -> INT_MAX [style=invis];
// ----------------------
// Tuples
TUPLE_TOP [label=<<B>⊤</B >:tuple>, fillcolor=pink, shape=oval];
TUPLE_BOT [label=<<B>⊥</B>:tuple>, fillcolor=pink, shape=oval];
TUPLE1 [shape=none, fillcolor=none, label=<
<TABLE BORDER="0" CELLBORDER="1" CELLSPACING="0">
<TH><TD BGCOLOR="pink">tuple</TD></TH>
<TR><TD BGCOLOR="black" ><FONT color="white">type</FONT></TD></TR>
</TABLE>
>];
TUPLE2 [shape=none, fillcolor=none, label=<
<TABLE BORDER="0" CELLBORDER="1" CELLSPACING="0">
<TH><TD BGCOLOR="pink">tuple</TD></TH>
<TR><TD BGCOLOR="black" ><FONT color="white">type</FONT></TD></TR>
<TR><TD BGCOLOR="black" ><FONT color="white">type</FONT></TD></TR>
</TABLE>
>];
TUPLEN [shape=none, fillcolor=none, label=<
<TABLE BORDER="0" CELLBORDER="1" CELLSPACING="0">
<TH><TD BGCOLOR="pink">tuple</TD></TH>
<TR><TD BGCOLOR="black" ><FONT color="white">type</FONT></TD></TR>
<TR><TD BGCOLOR="black" ><FONT color="white">...</FONT></TD></TR>
<TR><TD BGCOLOR="black" ><FONT color="white">type</FONT></TD></TR>
</TABLE>
>];
TOP -> TUPLE_TOP;
TUPLE_TOP -> TUPLE1;
TUPLE_TOP -> TUPLE2;
TUPLE_TOP -> TUPLEN;
TUPLE1 -> TUPLE_BOT;
TUPLE2 -> TUPLE_BOT;
TUPLEN -> TUPLE_BOT;
TUPLE_BOT -> BOT;
// Additional customization
{rank=same; TOP}
{rank=same; XCTRL; INT_TOP; TUPLE_TOP}
{rank=same;
INT_MIN; INT_MINDOTS; INT_MINUS; INT_ZERO; INT_PLUS; INT_MAXDOTS; INT_MAX;
}
{rank=same; CTRL; INT_BOT, TUPLE_BOT}
{rank=same; BOT;}
}
|
