1 |
|
/****************************************************************************** |
2 |
|
* Top contributors (to current version): |
3 |
|
* Andrew Reynolds, Aina Niemetz |
4 |
|
* |
5 |
|
* This file is part of the cvc5 project. |
6 |
|
* |
7 |
|
* Copyright (c) 2009-2021 by the authors listed in the file AUTHORS |
8 |
|
* in the top-level source directory and their institutional affiliations. |
9 |
|
* All rights reserved. See the file COPYING in the top-level source |
10 |
|
* directory for licensing information. |
11 |
|
* **************************************************************************** |
12 |
|
* |
13 |
|
* Implementation of term canonize. |
14 |
|
*/ |
15 |
|
|
16 |
|
#include "expr/term_canonize.h" |
17 |
|
|
18 |
|
#include <sstream> |
19 |
|
|
20 |
|
// TODO #1216: move the code in this include |
21 |
|
#include "theory/quantifiers/term_util.h" |
22 |
|
|
23 |
|
using namespace cvc5::kind; |
24 |
|
|
25 |
|
namespace cvc5 { |
26 |
|
namespace expr { |
27 |
|
|
28 |
6836 |
TermCanonize::TermCanonize(TypeClassCallback* tcc) |
29 |
6836 |
: d_tcc(tcc), d_op_id_count(0), d_typ_id_count(0) |
30 |
|
{ |
31 |
6836 |
} |
32 |
|
|
33 |
295574 |
int TermCanonize::getIdForOperator(Node op) |
34 |
|
{ |
35 |
295574 |
std::map<Node, int>::iterator it = d_op_id.find(op); |
36 |
295574 |
if (it == d_op_id.end()) |
37 |
|
{ |
38 |
22187 |
d_op_id[op] = d_op_id_count; |
39 |
22187 |
d_op_id_count++; |
40 |
22187 |
return d_op_id[op]; |
41 |
|
} |
42 |
273387 |
return it->second; |
43 |
|
} |
44 |
|
|
45 |
43752 |
int TermCanonize::getIdForType(TypeNode t) |
46 |
|
{ |
47 |
43752 |
std::map<TypeNode, int>::iterator it = d_typ_id.find(t); |
48 |
43752 |
if (it == d_typ_id.end()) |
49 |
|
{ |
50 |
1957 |
d_typ_id[t] = d_typ_id_count; |
51 |
1957 |
d_typ_id_count++; |
52 |
1957 |
return d_typ_id[t]; |
53 |
|
} |
54 |
41795 |
return it->second; |
55 |
|
} |
56 |
|
|
57 |
439791 |
bool TermCanonize::getTermOrder(Node a, Node b) |
58 |
|
{ |
59 |
439791 |
if (a.getKind() == BOUND_VARIABLE) |
60 |
|
{ |
61 |
54042 |
if (b.getKind() == BOUND_VARIABLE) |
62 |
|
{ |
63 |
37001 |
return getIndexForFreeVariable(a) < getIndexForFreeVariable(b); |
64 |
|
} |
65 |
17041 |
return true; |
66 |
|
} |
67 |
385749 |
if (b.getKind() != BOUND_VARIABLE) |
68 |
|
{ |
69 |
347733 |
Node aop = a.hasOperator() ? a.getOperator() : a; |
70 |
347733 |
Node bop = b.hasOperator() ? b.getOperator() : b; |
71 |
347574 |
Trace("aeq-debug2") << a << "...op..." << aop << std::endl; |
72 |
347574 |
Trace("aeq-debug2") << b << "...op..." << bop << std::endl; |
73 |
347574 |
if (aop == bop) |
74 |
|
{ |
75 |
199787 |
if (a.getNumChildren() == b.getNumChildren()) |
76 |
|
{ |
77 |
251879 |
for (unsigned i = 0, size = a.getNumChildren(); i < size; i++) |
78 |
|
{ |
79 |
251720 |
if (a[i] != b[i]) |
80 |
|
{ |
81 |
|
// first distinct child determines the ordering |
82 |
194101 |
return getTermOrder(a[i], b[i]); |
83 |
|
} |
84 |
|
} |
85 |
|
} |
86 |
|
else |
87 |
|
{ |
88 |
5527 |
return aop.getNumChildren() < bop.getNumChildren(); |
89 |
|
} |
90 |
|
} |
91 |
|
else |
92 |
|
{ |
93 |
147787 |
return getIdForOperator(aop) < getIdForOperator(bop); |
94 |
|
} |
95 |
|
} |
96 |
38334 |
return false; |
97 |
|
} |
98 |
|
|
99 |
112950 |
Node TermCanonize::getCanonicalFreeVar(TypeNode tn, unsigned i, uint32_t tc) |
100 |
|
{ |
101 |
112950 |
Assert(!tn.isNull()); |
102 |
112950 |
NodeManager* nm = NodeManager::currentNM(); |
103 |
225900 |
std::pair<TypeNode, uint32_t> key(tn, tc); |
104 |
112950 |
std::vector<Node>& tvars = d_cn_free_var[key]; |
105 |
132518 |
while (tvars.size() <= i) |
106 |
|
{ |
107 |
19568 |
std::stringstream oss; |
108 |
9784 |
oss << tn; |
109 |
19568 |
std::string typ_name = oss.str(); |
110 |
13210 |
while (typ_name[0] == '(') |
111 |
|
{ |
112 |
1713 |
typ_name.erase(typ_name.begin()); |
113 |
|
} |
114 |
19568 |
std::stringstream os; |
115 |
9784 |
os << typ_name[0] << i; |
116 |
19568 |
Node x = nm->mkBoundVar(os.str().c_str(), tn); |
117 |
9784 |
d_fvIndex[x] = tvars.size(); |
118 |
9784 |
tvars.push_back(x); |
119 |
|
} |
120 |
225900 |
return tvars[i]; |
121 |
|
} |
122 |
|
|
123 |
70970 |
uint32_t TermCanonize::getTypeClass(TNode v) |
124 |
|
{ |
125 |
70970 |
return d_tcc == nullptr ? 0 : d_tcc->getTypeClass(v); |
126 |
|
} |
127 |
|
|
128 |
74002 |
size_t TermCanonize::getIndexForFreeVariable(Node v) const |
129 |
|
{ |
130 |
74002 |
std::map<Node, size_t>::const_iterator it = d_fvIndex.find(v); |
131 |
74002 |
if (it == d_fvIndex.end()) |
132 |
|
{ |
133 |
74002 |
return 0; |
134 |
|
} |
135 |
|
return it->second; |
136 |
|
} |
137 |
|
|
138 |
|
struct sortTermOrder |
139 |
|
{ |
140 |
|
TermCanonize* d_tu; |
141 |
245690 |
bool operator()(Node i, Node j) { return d_tu->getTermOrder(i, j); } |
142 |
|
}; |
143 |
|
|
144 |
739384 |
Node TermCanonize::getCanonicalTerm( |
145 |
|
TNode n, |
146 |
|
bool apply_torder, |
147 |
|
bool doHoVar, |
148 |
|
std::map<std::pair<TypeNode, uint32_t>, unsigned>& var_count, |
149 |
|
std::map<TNode, Node>& visited) |
150 |
|
{ |
151 |
739384 |
std::map<TNode, Node>::iterator it = visited.find(n); |
152 |
739384 |
if (it != visited.end()) |
153 |
|
{ |
154 |
161007 |
return it->second; |
155 |
|
} |
156 |
|
|
157 |
578377 |
Trace("canon-term-debug") << "Get canonical term for " << n << std::endl; |
158 |
578377 |
if (n.getKind() == BOUND_VARIABLE) |
159 |
|
{ |
160 |
70970 |
uint32_t tc = getTypeClass(n); |
161 |
141940 |
TypeNode tn = n.getType(); |
162 |
141940 |
std::pair<TypeNode, uint32_t> key(tn, tc); |
163 |
|
// allocate variable |
164 |
70970 |
unsigned vn = var_count[key]; |
165 |
70970 |
var_count[key]++; |
166 |
141940 |
Node fv = getCanonicalFreeVar(tn, vn, tc); |
167 |
70970 |
visited[n] = fv; |
168 |
70970 |
Trace("canon-term-debug") << "...allocate variable." << std::endl; |
169 |
70970 |
return fv; |
170 |
|
} |
171 |
507407 |
else if (n.getNumChildren() > 0) |
172 |
|
{ |
173 |
|
// collect children |
174 |
286806 |
Trace("canon-term-debug") << "Collect children" << std::endl; |
175 |
573612 |
std::vector<Node> cchildren; |
176 |
881494 |
for (const Node& cn : n) |
177 |
|
{ |
178 |
594688 |
cchildren.push_back(cn); |
179 |
|
} |
180 |
|
// if applicable, first sort by term order |
181 |
286806 |
if (apply_torder && theory::quantifiers::TermUtil::isComm(n.getKind())) |
182 |
|
{ |
183 |
192818 |
Trace("canon-term-debug") |
184 |
96409 |
<< "Sort based on commutative operator " << n.getKind() << std::endl; |
185 |
|
sortTermOrder sto; |
186 |
96409 |
sto.d_tu = this; |
187 |
96409 |
std::sort(cchildren.begin(), cchildren.end(), sto); |
188 |
|
} |
189 |
|
// now make canonical |
190 |
286806 |
Trace("canon-term-debug") << "Make canonical children" << std::endl; |
191 |
881494 |
for (unsigned i = 0, size = cchildren.size(); i < size; i++) |
192 |
|
{ |
193 |
1189376 |
cchildren[i] = getCanonicalTerm( |
194 |
594688 |
cchildren[i], apply_torder, doHoVar, var_count, visited); |
195 |
|
} |
196 |
286806 |
if (n.getMetaKind() == metakind::PARAMETERIZED) |
197 |
|
{ |
198 |
235472 |
Node op = n.getOperator(); |
199 |
117736 |
if (doHoVar) |
200 |
|
{ |
201 |
117736 |
op = getCanonicalTerm(op, apply_torder, doHoVar, var_count, visited); |
202 |
|
} |
203 |
117736 |
Trace("canon-term-debug") << "Insert operator " << op << std::endl; |
204 |
117736 |
cchildren.insert(cchildren.begin(), op); |
205 |
|
} |
206 |
573612 |
Trace("canon-term-debug") |
207 |
286806 |
<< "...constructing for " << n << "." << std::endl; |
208 |
573612 |
Node ret = NodeManager::currentNM()->mkNode(n.getKind(), cchildren); |
209 |
573612 |
Trace("canon-term-debug") |
210 |
286806 |
<< "...constructed " << ret << " for " << n << "." << std::endl; |
211 |
286806 |
visited[n] = ret; |
212 |
286806 |
return ret; |
213 |
|
} |
214 |
220601 |
Trace("canon-term-debug") << "...return 0-child term." << std::endl; |
215 |
220601 |
return n; |
216 |
|
} |
217 |
|
|
218 |
26960 |
Node TermCanonize::getCanonicalTerm(TNode n, bool apply_torder, bool doHoVar) |
219 |
|
{ |
220 |
53920 |
std::map<std::pair<TypeNode, uint32_t>, unsigned> var_count; |
221 |
53920 |
std::map<TNode, Node> visited; |
222 |
53920 |
return getCanonicalTerm(n, apply_torder, doHoVar, var_count, visited); |
223 |
|
} |
224 |
|
|
225 |
|
} // namespace expr |
226 |
29511 |
} // namespace cvc5 |