Merge remote-tracking branch 'origin/master'
[cvc5.git] / src / theory / quantifiers / conjecture_generator.cpp
1 /********************* */
2 /*! \file conjecture_generator.cpp
3 ** \verbatim
4 ** Original author: Andrew Reynolds
5 ** Major contributors: none
6 ** Minor contributors (to current version): none
7 ** This file is part of the CVC4 project.
8 ** Copyright (c) 2009-2014 New York University and The University of Iowa
9 ** See the file COPYING in the top-level source directory for licensing
10 ** information.\endverbatim
11 **
12 ** \brief conjecture generator class
13 **
14 **/
15
16 #include "theory/quantifiers/conjecture_generator.h"
17 #include "theory/theory_engine.h"
18 #include "theory/quantifiers/options.h"
19 #include "theory/quantifiers/term_database.h"
20 #include "theory/quantifiers/trigger.h"
21 #include "theory/quantifiers/first_order_model.h"
22
23 using namespace CVC4;
24 using namespace CVC4::kind;
25 using namespace CVC4::theory;
26 using namespace CVC4::theory::quantifiers;
27 using namespace std;
28
29
30 namespace CVC4 {
31
32 void OpArgIndex::addTerm( ConjectureGenerator * s, TNode n, unsigned index ){
33 if( index==n.getNumChildren() ){
34 Assert( n.hasOperator() );
35 if( std::find( d_ops.begin(), d_ops.end(), n.getOperator() )==d_ops.end() ){
36 d_ops.push_back( n.getOperator() );
37 d_op_terms.push_back( n );
38 }
39 }else{
40 d_child[s->getTermDatabase()->d_arg_reps[n][index]].addTerm( s, n, index+1 );
41 }
42 }
43
44 Node OpArgIndex::getGroundTerm( ConjectureGenerator * s, std::vector< TNode >& args ) {
45 if( d_ops.empty() ){
46 for( std::map< TNode, OpArgIndex >::iterator it = d_child.begin(); it != d_child.end(); ++it ){
47 std::map< TNode, Node >::iterator itf = s->d_ground_eqc_map.find( it->first );
48 if( itf!=s->d_ground_eqc_map.end() ){
49 args.push_back( itf->second );
50 Node n = it->second.getGroundTerm( s, args );
51 args.pop_back();
52 if( !n.isNull() ){
53 return n;
54 }
55 }
56 }
57 return Node::null();
58 }else{
59 std::vector< TNode > args2;
60 args2.push_back( d_ops[0] );
61 args2.insert( args2.end(), args.begin(), args.end() );
62 return NodeManager::currentNM()->mkNode( d_op_terms[0].getKind(), args2 );
63 }
64 }
65
66 void OpArgIndex::getGroundTerms( ConjectureGenerator * s, std::vector< TNode >& terms ) {
67 terms.insert( terms.end(), d_op_terms.begin(), d_op_terms.end() );
68 for( std::map< TNode, OpArgIndex >::iterator it = d_child.begin(); it != d_child.end(); ++it ){
69 if( s->isGroundEqc( it->first ) ){
70 it->second.getGroundTerms( s, terms );
71 }
72 }
73 }
74
75
76
77 ConjectureGenerator::ConjectureGenerator( QuantifiersEngine * qe, context::Context* c ) : QuantifiersModule( qe ),
78 d_notify( *this ),
79 d_uequalityEngine(d_notify, c, "ConjectureGenerator::ee"),
80 d_ee_conjectures( c ){
81 d_fullEffortCount = 0;
82 d_uequalityEngine.addFunctionKind( kind::APPLY_UF );
83 d_uequalityEngine.addFunctionKind( kind::APPLY_CONSTRUCTOR );
84
85 }
86
87 void ConjectureGenerator::eqNotifyNewClass( TNode t ){
88 Trace("thm-ee-debug") << "UEE : new equivalence class " << t << std::endl;
89 d_upendingAdds.push_back( t );
90 }
91
92 void ConjectureGenerator::eqNotifyPreMerge(TNode t1, TNode t2) {
93 //get maintained representatives
94 TNode rt1 = t1;
95 TNode rt2 = t2;
96 std::map< Node, EqcInfo* >::iterator it1 = d_eqc_info.find( t1 );
97 if( it1!=d_eqc_info.end() && !it1->second->d_rep.get().isNull() ){
98 rt1 = it1->second->d_rep.get();
99 }
100 std::map< Node, EqcInfo* >::iterator it2 = d_eqc_info.find( t2 );
101 if( it2!=d_eqc_info.end() && !it2->second->d_rep.get().isNull() ){
102 rt2 = it2->second->d_rep.get();
103 }
104 Trace("thm-ee-debug") << "UEE : equality holds : " << t1 << " == " << t2 << std::endl;
105 Trace("thm-ee-debug") << " ureps : " << rt1 << " == " << rt2 << std::endl;
106 Trace("thm-ee-debug") << " normal : " << d_pattern_is_normal[rt1] << " " << d_pattern_is_normal[rt2] << std::endl;
107 Trace("thm-ee-debug") << " size : " << d_pattern_fun_sum[rt1] << " " << d_pattern_fun_sum[rt2] << std::endl;
108
109 if( isUniversalLessThan( rt2, rt1 ) ){
110 EqcInfo * ei;
111 if( it1==d_eqc_info.end() ){
112 ei = getOrMakeEqcInfo( t1, true );
113 }else{
114 ei = it1->second;
115 }
116 ei->d_rep = t2;
117 }
118 }
119
120 void ConjectureGenerator::eqNotifyPostMerge(TNode t1, TNode t2) {
121
122 }
123
124 void ConjectureGenerator::eqNotifyDisequal(TNode t1, TNode t2, TNode reason) {
125 Trace("thm-ee-debug") << "UEE : disequality holds : " << t1 << " != " << t2 << std::endl;
126
127 }
128
129
130 ConjectureGenerator::EqcInfo::EqcInfo( context::Context* c ) : d_rep( c, Node::null() ){
131
132 }
133
134 ConjectureGenerator::EqcInfo* ConjectureGenerator::getOrMakeEqcInfo( TNode n, bool doMake ) {
135 //Assert( getUniversalRepresentative( n )==n );
136 std::map< Node, EqcInfo* >::iterator eqc_i = d_eqc_info.find( n );
137 if( eqc_i!=d_eqc_info.end() ){
138 return eqc_i->second;
139 }else if( doMake ){
140 EqcInfo* ei = new EqcInfo( d_quantEngine->getSatContext() );
141 d_eqc_info[n] = ei;
142 return ei;
143 }else{
144 return NULL;
145 }
146 }
147
148 void ConjectureGenerator::doPendingAddUniversalTerms() {
149 //merge all pending equalities
150 while( !d_upendingAdds.empty() ){
151 Trace("sg-pending") << "Add " << d_upendingAdds.size() << " pending terms..." << std::endl;
152 std::vector< Node > pending;
153 pending.insert( pending.end(), d_upendingAdds.begin(), d_upendingAdds.end() );
154 d_upendingAdds.clear();
155 for( unsigned i=0; i<pending.size(); i++ ){
156 Node t = pending[i];
157 TypeNode tn = t.getType();
158 Trace("thm-ee-add") << "UEE : Add universal term " << t << std::endl;
159 //get all equivalent terms based on theorem database
160 std::vector< Node > eq_terms;
161 d_thm_index.getEquivalentTerms( t, eq_terms );
162 if( !eq_terms.empty() ){
163 Trace("thm-ee-add") << "UEE : Based on theorem database, it is equivalent to " << eq_terms.size() << " terms : " << std::endl;
164 //add equivalent terms as equalities to universal engine
165 for( unsigned i=0; i<eq_terms.size(); i++ ){
166 Trace("thm-ee-add") << " " << eq_terms[i] << std::endl;
167 //if( d_urelevant_terms.find( eq_terms[i] )!=d_urelevant_terms.end() ){
168 bool assertEq = false;
169 if( d_urelevant_terms.find( eq_terms[i] )!=d_urelevant_terms.end() ){
170 assertEq = true;
171 }else{
172 Assert( eq_terms[i].getType()==tn );
173 registerPattern( eq_terms[i], tn );
174 if( isUniversalLessThan( eq_terms[i], t ) ){
175 setUniversalRelevant( eq_terms[i] );
176 assertEq = true;
177 }
178 }
179 if( assertEq ){
180 Node exp;
181 d_uequalityEngine.assertEquality( t.eqNode( eq_terms[i] ), true, exp );
182 }
183 }
184 }else{
185 Trace("thm-ee-add") << "UEE : No equivalent terms." << std::endl;
186 }
187 //if occurs at ground level, merge with representative of ground equality engine
188 /*
189 eq::EqualityEngine * ee = getEqualityEngine();
190 if( ee->hasTerm( t ) ){
191 TNode grt = ee->getRepresentative( t );
192 if( t!=grt ){
193 Node exp;
194 d_uequalityEngine.assertEquality( t.eqNode( grt ), true, exp );
195 }
196 }
197 */
198 }
199 }
200 }
201
202 void ConjectureGenerator::setUniversalRelevant( TNode n ) {
203 //add pattern information
204 registerPattern( n, n.getType() );
205 d_urelevant_terms[n] = true;
206 for( unsigned i=0; i<n.getNumChildren(); i++ ){
207 setUniversalRelevant( n[i] );
208 }
209 }
210
211 bool ConjectureGenerator::isUniversalLessThan( TNode rt1, TNode rt2 ) {
212 //prefer the one that is (normal, smaller) lexographically
213 Assert( d_pattern_is_normal.find( rt1 )!=d_pattern_is_normal.end() );
214 Assert( d_pattern_is_normal.find( rt2 )!=d_pattern_is_normal.end() );
215 Assert( d_pattern_fun_sum.find( rt1 )!=d_pattern_fun_sum.end() );
216 Assert( d_pattern_fun_sum.find( rt2 )!=d_pattern_fun_sum.end() );
217
218 if( d_pattern_is_normal[rt1] && !d_pattern_is_normal[rt2] ){
219 Trace("thm-ee-debug") << "UEE : LT due to normal." << std::endl;
220 return true;
221 }else if( d_pattern_is_normal[rt1]==d_pattern_is_normal[rt2] ){
222 if( d_pattern_fun_sum[rt1]<d_pattern_fun_sum[rt2] ){
223 Trace("thm-ee-debug") << "UEE : LT due to size." << std::endl;
224 //decide which representative to use : based on size of the term
225 return true;
226 }else if( d_pattern_fun_sum[rt1]==d_pattern_fun_sum[rt2] ){
227 //same size : tie goes to term that has already been reported
228 return isReportedCanon( rt1 ) && !isReportedCanon( rt2 );
229 }
230 }
231 return false;
232 }
233
234
235 bool ConjectureGenerator::isReportedCanon( TNode n ) {
236 return std::find( d_ue_canon.begin(), d_ue_canon.end(), n )==d_ue_canon.end();
237 }
238
239 void ConjectureGenerator::markReportedCanon( TNode n ) {
240 if( !isReportedCanon( n ) ){
241 d_ue_canon.push_back( n );
242 }
243 }
244
245 bool ConjectureGenerator::areUniversalEqual( TNode n1, TNode n2 ) {
246 return n1==n2 || ( d_uequalityEngine.hasTerm( n1 ) && d_uequalityEngine.hasTerm( n2 ) && d_uequalityEngine.areEqual( n1, n2 ) );
247 }
248
249 bool ConjectureGenerator::areUniversalDisequal( TNode n1, TNode n2 ) {
250 return n1!=n2 && d_uequalityEngine.hasTerm( n1 ) && d_uequalityEngine.hasTerm( n2 ) && d_uequalityEngine.areDisequal( n1, n2, false );
251 }
252
253 TNode ConjectureGenerator::getUniversalRepresentative( TNode n, bool add ) {
254 if( add ){
255 if( d_urelevant_terms.find( n )==d_urelevant_terms.end() ){
256 setUniversalRelevant( n );
257 //add term to universal equality engine
258 d_uequalityEngine.addTerm( n );
259 Trace("thm-ee-debug") << "Merge equivalence classes based on terms..." << std::endl;
260 doPendingAddUniversalTerms();
261 }
262 }
263 if( d_uequalityEngine.hasTerm( n ) ){
264 Node r = d_uequalityEngine.getRepresentative( n );
265 EqcInfo * ei = getOrMakeEqcInfo( r );
266 if( ei && !ei->d_rep.get().isNull() ){
267 return ei->d_rep.get();
268 }else{
269 return r;
270 }
271 }else{
272 return n;
273 }
274 }
275
276 eq::EqualityEngine * ConjectureGenerator::getEqualityEngine() {
277 return d_quantEngine->getTheoryEngine()->getMasterEqualityEngine();
278 }
279
280 bool ConjectureGenerator::areEqual( TNode n1, TNode n2 ) {
281 eq::EqualityEngine * ee = getEqualityEngine();
282 return n1==n2 || ( ee->hasTerm( n1 ) && ee->hasTerm( n2 ) && ee->areEqual( n1, n2 ) );
283 }
284
285 bool ConjectureGenerator::areDisequal( TNode n1, TNode n2 ) {
286 eq::EqualityEngine * ee = getEqualityEngine();
287 return n1!=n2 && ee->hasTerm( n1 ) && ee->hasTerm( n2 ) && ee->areDisequal( n1, n2, false );
288 }
289
290 TNode ConjectureGenerator::getRepresentative( TNode n ) {
291 eq::EqualityEngine * ee = getEqualityEngine();
292 if( ee->hasTerm( n ) ){
293 return ee->getRepresentative( n );
294 }else{
295 return n;
296 }
297 }
298
299 TermDb * ConjectureGenerator::getTermDatabase() {
300 return d_quantEngine->getTermDatabase();
301 }
302
303 Node ConjectureGenerator::getFreeVar( TypeNode tn, unsigned i ) {
304 Assert( !tn.isNull() );
305 while( d_free_var[tn].size()<=i ){
306 std::stringstream oss;
307 oss << tn;
308 std::stringstream os;
309 os << oss.str()[0] << i;
310 Node x = NodeManager::currentNM()->mkBoundVar( os.str().c_str(), tn );
311 d_free_var_num[x] = d_free_var[tn].size();
312 d_free_var[tn].push_back( x );
313 }
314 return d_free_var[tn][i];
315 }
316
317
318
319 Node ConjectureGenerator::getCanonicalTerm( TNode n, std::map< TypeNode, unsigned >& var_count, std::map< TNode, TNode >& subs ) {
320 Trace("ajr-temp") << "get canonical term " << n << " " << n.getKind() << " " << n.hasOperator() << std::endl;
321 if( n.getKind()==BOUND_VARIABLE ){
322 std::map< TNode, TNode >::iterator it = subs.find( n );
323 if( it==subs.end() ){
324 TypeNode tn = n.getType();
325 //allocate variable
326 unsigned vn = var_count[tn];
327 var_count[tn]++;
328 subs[n] = getFreeVar( tn, vn );
329 return subs[n];
330 }else{
331 return it->second;
332 }
333 }else{
334 std::vector< Node > children;
335 if( n.getKind()!=EQUAL ){
336 if( n.hasOperator() ){
337 TNode op = n.getOperator();
338 if( std::find( d_funcs.begin(), d_funcs.end(), op )==d_funcs.end() ){
339 return Node::null();
340 }
341 children.push_back( op );
342 }else{
343 return Node::null();
344 }
345 }
346 for( unsigned i=0; i<n.getNumChildren(); i++ ){
347 Node cn = getCanonicalTerm( n[i], var_count, subs );
348 if( cn.isNull() ){
349 return Node::null();
350 }else{
351 children.push_back( cn );
352 }
353 }
354 return NodeManager::currentNM()->mkNode( n.getKind(), children );
355 }
356 }
357
358 bool ConjectureGenerator::isHandledTerm( TNode n ){
359 return !n.getAttribute(NoMatchAttribute()) && inst::Trigger::isAtomicTrigger( n ) && ( n.getKind()!=APPLY_UF || n.getOperator().getKind()!=SKOLEM );
360 }
361
362 Node ConjectureGenerator::getGroundEqc( TNode r ) {
363 std::map< TNode, Node >::iterator it = d_ground_eqc_map.find( r );
364 return it!=d_ground_eqc_map.end() ? it->second : Node::null();
365 }
366
367 bool ConjectureGenerator::isGroundEqc( TNode r ) {
368 return d_ground_eqc_map.find( r )!=d_ground_eqc_map.end();
369 }
370
371 bool ConjectureGenerator::isGroundTerm( TNode n ) {
372 return std::find( d_ground_terms.begin(), d_ground_terms.end(), n )!=d_ground_terms.end();
373 }
374
375 bool ConjectureGenerator::needsCheck( Theory::Effort e ) {
376 return e==Theory::EFFORT_FULL;
377 }
378
379 void ConjectureGenerator::reset_round( Theory::Effort e ) {
380
381 }
382
383 void ConjectureGenerator::check( Theory::Effort e, unsigned quant_e ) {
384 if( quant_e==QuantifiersEngine::QEFFORT_STANDARD ){
385 d_fullEffortCount++;
386 if( d_fullEffortCount%optFullCheckFrequency()==0 ){
387 Trace("sg-engine") << "---Conjecture generator, effort = " << e << "--- " << std::endl;
388 eq::EqualityEngine * ee = getEqualityEngine();
389
390 Trace("sg-proc") << "Get eq classes..." << std::endl;
391 d_op_arg_index.clear();
392 d_ground_eqc_map.clear();
393 d_bool_eqc[0] = Node::null();
394 d_bool_eqc[1] = Node::null();
395 std::vector< TNode > eqcs;
396 d_em.clear();
397 eq::EqClassesIterator eqcs_i = eq::EqClassesIterator( ee );
398 while( !eqcs_i.isFinished() ){
399 TNode r = (*eqcs_i);
400 eqcs.push_back( r );
401 if( r.getType().isBoolean() ){
402 if( areEqual( r, getTermDatabase()->d_true ) ){
403 d_ground_eqc_map[r] = getTermDatabase()->d_true;
404 d_bool_eqc[0] = r;
405 }else if( areEqual( r, getTermDatabase()->d_false ) ){
406 d_ground_eqc_map[r] = getTermDatabase()->d_false;
407 d_bool_eqc[1] = r;
408 }
409 }
410 d_em[r] = eqcs.size();
411 eq::EqClassIterator ieqc_i = eq::EqClassIterator( r, ee );
412 while( !ieqc_i.isFinished() ){
413 TNode n = (*ieqc_i);
414 if( isHandledTerm( n ) ){
415 d_op_arg_index[r].addTerm( this, n );
416 }
417 ++ieqc_i;
418 }
419 ++eqcs_i;
420 }
421 Assert( !d_bool_eqc[0].isNull() );
422 Assert( !d_bool_eqc[1].isNull() );
423 d_urelevant_terms.clear();
424 Trace("sg-proc") << "...done get eq classes" << std::endl;
425
426 Trace("sg-proc") << "Determine ground EQC..." << std::endl;
427 bool success;
428 do{
429 success = false;
430 for( unsigned i=0; i<eqcs.size(); i++ ){
431 TNode r = eqcs[i];
432 if( d_ground_eqc_map.find( r )==d_ground_eqc_map.end() ){
433 std::vector< TNode > args;
434 Trace("sg-pat-debug") << "******* Get ground term for " << r << std::endl;
435 Node n;
436 if( getTermDatabase()->isInductionTerm( r ) ){
437 n = d_op_arg_index[r].getGroundTerm( this, args );
438 }else{
439 n = r;
440 }
441 if( !n.isNull() ){
442 Trace("sg-pat") << "Ground term for eqc " << r << " : " << std::endl;
443 Trace("sg-pat") << " " << n << std::endl;
444 d_ground_eqc_map[r] = n;
445 success = true;
446 }else{
447 Trace("sg-pat-debug") << "...could not find ground term." << std::endl;
448 }
449 }
450 }
451 }while( success );
452 //also get ground terms
453 d_ground_terms.clear();
454 for( unsigned i=0; i<eqcs.size(); i++ ){
455 TNode r = eqcs[i];
456 d_op_arg_index[r].getGroundTerms( this, d_ground_terms );
457 }
458 Trace("sg-proc") << "...done determine ground EQC" << std::endl;
459
460 //debug printing
461 if( Trace.isOn("sg-gen-eqc") ){
462 for( unsigned i=0; i<eqcs.size(); i++ ){
463 TNode r = eqcs[i];
464 //print out members
465 bool firstTime = true;
466 bool isFalse = areEqual( r, getTermDatabase()->d_false );
467 eq::EqClassIterator eqc_i = eq::EqClassIterator( r, ee );
468 while( !eqc_i.isFinished() ){
469 TNode n = (*eqc_i);
470 if( !n.getAttribute(NoMatchAttribute()) && ( n.getKind()!=EQUAL || isFalse ) ){
471 if( firstTime ){
472 Trace("sg-gen-eqc") << "e" << d_em[r] << " : { " << std::endl;
473 firstTime = false;
474 }
475 if( n.hasOperator() ){
476 Trace("sg-gen-eqc") << " (" << n.getOperator();
477 getTermDatabase()->computeArgReps( n );
478 for( unsigned i=0; i<getTermDatabase()->d_arg_reps[n].size(); i++ ){
479 Trace("sg-gen-eqc") << " e" << d_em[getTermDatabase()->d_arg_reps[n][i]];
480 }
481 Trace("sg-gen-eqc") << ") :: " << n << std::endl;
482 }else{
483 Trace("sg-gen-eqc") << " " << n << std::endl;
484 }
485 }
486 ++eqc_i;
487 }
488 if( !firstTime ){
489 Trace("sg-gen-eqc") << "}" << std::endl;
490 //print out ground term
491 std::map< TNode, Node >::iterator it = d_ground_eqc_map.find( r );
492 if( it!=d_ground_eqc_map.end() ){
493 Trace("sg-gen-eqc") << "- Ground term : " << it->second << std::endl;
494 }
495 }
496 }
497 }
498
499 Trace("sg-proc") << "Compute relevant eqc..." << std::endl;
500 d_relevant_eqc[0].clear();
501 d_relevant_eqc[1].clear();
502 for( unsigned i=0; i<eqcs.size(); i++ ){
503 TNode r = eqcs[i];
504 std::map< TNode, Node >::iterator it = d_ground_eqc_map.find( r );
505 unsigned index = 1;
506 if( it==d_ground_eqc_map.end() ){
507 index = 0;
508 }
509 //based on unproven conjectures? TODO
510 d_relevant_eqc[index].push_back( r );
511 }
512 Trace("sg-gen-tg-debug") << "Initial relevant eqc : ";
513 for( unsigned i=0; i<d_relevant_eqc[0].size(); i++ ){
514 Trace("sg-gen-tg-debug") << "e" << d_em[d_relevant_eqc[0][i]] << " ";
515 }
516 Trace("sg-gen-tg-debug") << std::endl;
517 Trace("sg-proc") << "...done compute relevant eqc" << std::endl;
518
519
520 Trace("sg-proc") << "Collect signature information..." << std::endl;
521 d_funcs.clear();
522 d_typ_funcs.clear();
523 d_func_kind.clear();
524 d_func_args.clear();
525 TypeNode tnull;
526 for( std::map< Node, TermArgTrie >::iterator it = getTermDatabase()->d_func_map_trie.begin(); it != getTermDatabase()->d_func_map_trie.end(); ++it ){
527 if( !getTermDatabase()->d_op_map[it->first].empty() ){
528 Node nn = getTermDatabase()->d_op_map[it->first][0];
529 if( isHandledTerm( nn ) && nn.getKind()!=APPLY_SELECTOR_TOTAL && !nn.getType().isBoolean() ){
530 d_funcs.push_back( it->first );
531 d_typ_funcs[tnull].push_back( it->first );
532 d_typ_funcs[nn.getType()].push_back( it->first );
533 for( unsigned i=0; i<nn.getNumChildren(); i++ ){
534 d_func_args[it->first].push_back( nn[i].getType() );
535 }
536 d_func_kind[it->first] = nn.getKind();
537 Trace("sg-rel-sig") << "Will enumerate function applications of : " << it->first << ", #args = " << d_func_args[it->first].size() << ", kind = " << nn.getKind() << std::endl;
538 getTermDatabase()->computeUfEqcTerms( it->first );
539 }
540 }
541 }
542 //shuffle functions
543 for( std::map< TypeNode, std::vector< TNode > >::iterator it = d_typ_funcs.begin(); it !=d_typ_funcs.end(); ++it ){
544 std::random_shuffle( it->second.begin(), it->second.end() );
545 if( it->first.isNull() ){
546 Trace("sg-gen-tg-debug") << "In this order : ";
547 for( unsigned i=0; i<it->second.size(); i++ ){
548 Trace("sg-gen-tg-debug") << it->second[i] << " ";
549 }
550 Trace("sg-gen-tg-debug") << std::endl;
551 }
552 }
553 Trace("sg-proc") << "...done collect signature information" << std::endl;
554
555
556 Trace("sg-proc") << "Build theorem index..." << std::endl;
557 d_ue_canon.clear();
558 d_thm_index.clear();
559 std::vector< Node > provenConj;
560 quantifiers::FirstOrderModel* m = d_quantEngine->getModel();
561 for( int i=0; i<m->getNumAssertedQuantifiers(); i++ ){
562 Node q = m->getAssertedQuantifier( i );
563 Trace("thm-db-debug") << "Is " << q << " a relevant theorem?" << std::endl;
564 Node conjEq;
565 if( q[1].getKind()==EQUAL ){
566 bool isSubsume = false;
567 bool inEe = false;
568 for( unsigned r=0; r<2; r++ ){
569 TNode nl = q[1][r==0 ? 0 : 1];
570 TNode nr = q[1][r==0 ? 1 : 0];
571 Node eq = nl.eqNode( nr );
572 if( r==1 || std::find( d_conjectures.begin(), d_conjectures.end(), q )==d_conjectures.end() ){
573 //must make it canonical
574 std::map< TypeNode, unsigned > var_count;
575 std::map< TNode, TNode > subs;
576 Trace("sg-proc-debug") << "get canonical " << eq << std::endl;
577 eq = getCanonicalTerm( eq, var_count, subs );
578 }
579 if( !eq.isNull() ){
580 if( r==0 ){
581 inEe = d_ee_conjectures.find( q[1] )!=d_ee_conjectures.end();
582 if( !inEe ){
583 //add to universal equality engine
584 Node nl = getUniversalRepresentative( eq[0], true );
585 Node nr = getUniversalRepresentative( eq[1], true );
586 if( areUniversalEqual( nl, nr ) ){
587 isSubsume = true;
588 //set inactive (will be ignored by other modules)
589 d_quantEngine->getModel()->setQuantifierActive( q, false );
590 }else{
591 Node exp;
592 d_ee_conjectures[q[1]] = true;
593 d_uequalityEngine.assertEquality( nl.eqNode( nr ), true, exp );
594 }
595 }
596 Trace("sg-conjecture") << "*** CONJECTURE : currently proven" << (isSubsume ? " and subsumed" : "");
597 Trace("sg-conjecture") << " : " << q[1] << std::endl;
598 provenConj.push_back( q );
599 }
600 if( !isSubsume ){
601 Trace("thm-db-debug") << "Adding theorem to database " << eq[0] << " == " << eq[1] << std::endl;
602 d_thm_index.addTheorem( eq[0], eq[1] );
603 }else{
604 break;
605 }
606 }else{
607 break;
608 }
609 }
610 }
611 }
612 //examine status of other conjectures
613 for( unsigned i=0; i<d_conjectures.size(); i++ ){
614 Node q = d_conjectures[i];
615 if( std::find( provenConj.begin(), provenConj.end(), q )==provenConj.end() ){
616 //check each skolem variable
617 bool disproven = true;
618 //std::vector< Node > sk;
619 //getTermDatabase()->getSkolemConstants( q, sk, true );
620 Trace("sg-conjecture") << " CONJECTURE : ";
621 std::vector< Node > ce;
622 for( unsigned j=0; j<getTermDatabase()->d_skolem_constants[q].size(); j++ ){
623 TNode k = getTermDatabase()->d_skolem_constants[q][j];
624 TNode rk = getRepresentative( k );
625 std::map< TNode, Node >::iterator git = d_ground_eqc_map.find( rk );
626 //check if it is a ground term
627 if( git==d_ground_eqc_map.end() ){
628 Trace("sg-conjecture") << "ACTIVE : " << q;
629 if( Trace.isOn("sg-gen-eqc") ){
630 Trace("sg-conjecture") << " { ";
631 for( unsigned k=0; k<getTermDatabase()->d_skolem_constants[q].size(); k++ ){ Trace("sg-conjecture") << getTermDatabase()->d_skolem_constants[q][k] << ( j==k ? "*" : "" ) << " "; }
632 Trace("sg-conjecture") << "}";
633 }
634 Trace("sg-conjecture") << std::endl;
635 disproven = false;
636 break;
637 }else{
638 ce.push_back( git->second );
639 }
640 }
641 if( disproven ){
642 Trace("sg-conjecture") << "disproven : " << q << " : ";
643 for( unsigned i=0; i<ce.size(); i++ ){
644 Trace("sg-conjecture") << q[0][i] << " -> " << ce[i] << " ";
645 }
646 Trace("sg-conjecture") << std::endl;
647 }
648 }
649 }
650 Trace("thm-db") << "Theorem database is : " << std::endl;
651 d_thm_index.debugPrint( "thm-db" );
652 Trace("thm-db") << std::endl;
653 Trace("sg-proc") << "...done build theorem index" << std::endl;
654
655 //clear patterns
656 d_patterns.clear();
657 d_pattern_var_id.clear();
658 d_pattern_var_duplicate.clear();
659 d_pattern_is_normal.clear();
660 d_pattern_fun_id.clear();
661 d_pattern_fun_sum.clear();
662 d_rel_patterns.clear();
663 d_rel_pattern_var_sum.clear();
664 d_rel_pattern_typ_index.clear();
665 d_rel_pattern_subs_index.clear();
666 //d_gen_lat_maximal.clear();
667 //d_gen_lat_child.clear();
668 //d_gen_lat_parent.clear();
669 //d_gen_depth.clear();
670
671 //the following generates a set of relevant terms
672 d_use_ccand_eqc = true;
673 for( unsigned i=0; i<2; i++ ){
674 d_ccand_eqc[i].clear();
675 d_ccand_eqc[i].push_back( d_relevant_eqc[i] );
676 }
677 d_rel_term_count = 0;
678 //consider all functions
679 d_typ_tg_funcs.clear();
680 for( std::map< TypeNode, std::vector< TNode > >::iterator it = d_typ_funcs.begin(); it != d_typ_funcs.end(); ++it ){
681 d_typ_tg_funcs[it->first].insert( d_typ_tg_funcs[it->first].end(), it->second.begin(), it->second.end() );
682 }
683 std::map< TypeNode, unsigned > rt_var_max;
684 std::vector< TypeNode > rt_types;
685 std::map< int, std::vector< Node > > conj_lhs;
686 std::map< int, std::vector< Node > > conj_rhs;
687 //map from generalization depth to maximum depth
688 //std::map< unsigned, unsigned > gdepth_to_tdepth;
689 for( unsigned depth=1; depth<3; depth++ ){
690 Assert( d_tg_alloc.empty() );
691 Trace("sg-proc") << "Generate terms at depth " << depth << "..." << std::endl;
692 Trace("sg-rel-term") << "Relevant terms of depth " << depth << " : " << std::endl;
693 //set up environment
694 d_var_id.clear();
695 d_var_limit.clear();
696 d_tg_id = 0;
697 d_tg_gdepth = 0;
698 d_tg_gdepth_limit = depth;
699 //consider all types
700 d_tg_alloc[0].reset( this, TypeNode::null() );
701 while( d_tg_alloc[0].getNextTerm( this, depth ) ){
702 Assert( d_tg_alloc[0].getGeneralizationDepth( this )==d_tg_gdepth );
703 if( d_tg_alloc[0].getDepth( this )==depth ){
704 //construct term
705 Node nn = d_tg_alloc[0].getTerm( this );
706 if( getUniversalRepresentative( nn )==nn ){
707 d_rel_term_count++;
708 Trace("sg-rel-term") << "*** Relevant term : ";
709 d_tg_alloc[0].debugPrint( this, "sg-rel-term", "sg-rel-term-debug2" );
710 Trace("sg-rel-term") << std::endl;
711
712 for( unsigned r=0; r<2; r++ ){
713 Trace("sg-rel-term-debug") << "...from equivalence classes (" << r << ") : ";
714 int index = d_ccand_eqc[r].size()-1;
715 for( unsigned j=0; j<d_ccand_eqc[r][index].size(); j++ ){
716 Trace("sg-rel-term-debug") << "e" << d_em[d_ccand_eqc[r][index][j]] << " ";
717 }
718 Trace("sg-rel-term-debug") << std::endl;
719 }
720 TypeNode tnn = nn.getType();
721 Trace("sg-gen-tg-debug") << "...term is " << nn << std::endl;
722 conj_lhs[depth].push_back( nn );
723
724 //add information about pattern
725 Trace("sg-gen-tg-debug") << "Collect pattern information..." << std::endl;
726 Assert( std::find( d_rel_patterns[tnn].begin(), d_rel_patterns[tnn].end(), nn )==d_rel_patterns[tnn].end() );
727 d_rel_patterns[tnn].push_back( nn );
728 //build information concerning the variables in this pattern
729 unsigned sum = 0;
730 std::map< TypeNode, unsigned > typ_to_subs_index;
731 std::vector< TNode > gsubs_vars;
732 for( std::map< TypeNode, unsigned >::iterator it = d_var_id.begin(); it != d_var_id.end(); ++it ){
733 if( it->second>0 ){
734 typ_to_subs_index[it->first] = sum;
735 sum += it->second;
736 for( unsigned i=0; i<it->second; i++ ){
737 gsubs_vars.push_back( getFreeVar( it->first, i ) );
738 }
739 }
740 }
741 d_rel_pattern_var_sum[nn] = sum;
742 //register the pattern
743 registerPattern( nn, tnn );
744 Assert( d_pattern_is_normal[nn] );
745 Trace("sg-gen-tg-debug") << "...done collect pattern information" << std::endl;
746
747 //record information about types
748 Trace("sg-gen-tg-debug") << "Collect type information..." << std::endl;
749 PatternTypIndex * pti = &d_rel_pattern_typ_index;
750 for( std::map< TypeNode, unsigned >::iterator it = d_var_id.begin(); it != d_var_id.end(); ++it ){
751 pti = &pti->d_children[it->first][it->second];
752 //record maximum
753 if( rt_var_max.find( it->first )==rt_var_max.end() || it->second>rt_var_max[it->first] ){
754 rt_var_max[it->first] = it->second;
755 }
756 }
757 if( std::find( rt_types.begin(), rt_types.end(), tnn )==rt_types.end() ){
758 rt_types.push_back( tnn );
759 }
760 pti->d_terms.push_back( nn );
761 Trace("sg-gen-tg-debug") << "...done collect type information" << std::endl;
762
763 Trace("sg-gen-tg-debug") << "Build substitutions for ground EQC..." << std::endl;
764 std::vector< TNode > gsubs_terms;
765 gsubs_terms.resize( gsubs_vars.size() );
766 int index = d_ccand_eqc[1].size()-1;
767 for( unsigned j=0; j<d_ccand_eqc[1][index].size(); j++ ){
768 TNode r = d_ccand_eqc[1][index][j];
769 Trace("sg-rel-term-debug") << " Matches for e" << d_em[r] << ", which is ground term " << d_ground_eqc_map[r] << ":" << std::endl;
770 std::map< TypeNode, std::map< unsigned, TNode > > subs;
771 std::map< TNode, bool > rev_subs;
772 //only get ground terms
773 unsigned mode = optFilterConfirmationOnlyGround() ? 2 : 0;
774 d_tg_alloc[0].resetMatching( this, r, mode );
775 while( d_tg_alloc[0].getNextMatch( this, r, subs, rev_subs ) ){
776 //we will be building substitutions
777 bool firstTime = true;
778 for( std::map< TypeNode, std::map< unsigned, TNode > >::iterator it = subs.begin(); it != subs.end(); ++it ){
779 unsigned tindex = typ_to_subs_index[it->first];
780 for( std::map< unsigned, TNode >::iterator it2 = it->second.begin(); it2 != it->second.end(); ++it2 ){
781 if( !firstTime ){
782 Trace("sg-rel-term-debug") << ", ";
783 }else{
784 firstTime = false;
785 Trace("sg-rel-term-debug") << " ";
786 }
787 Trace("sg-rel-term-debug") << it->first << ":x" << it2->first << " -> " << it2->second;
788 Assert( tindex+it2->first<gsubs_terms.size() );
789 gsubs_terms[tindex+it2->first] = it2->second;
790 }
791 }
792 Trace("sg-rel-term-debug") << std::endl;
793 d_rel_pattern_subs_index[nn].addSubstitution( r, gsubs_vars, gsubs_terms );
794 }
795 }
796 Trace("sg-gen-tg-debug") << "...done build substitutions for ground EQC" << std::endl;
797 }else{
798 Trace("sg-gen-tg-debug") << "> not canonical : " << nn << std::endl;
799 }
800 }else{
801 Trace("sg-gen-tg-debug") << "> produced term at previous depth : ";
802 d_tg_alloc[0].debugPrint( this, "sg-gen-tg-debug", "sg-gen-tg-debug" );
803 Trace("sg-gen-tg-debug") << std::endl;
804 }
805 }
806 Trace("sg-proc") << "...done generate terms at depth " << depth << std::endl;
807
808 //now generate right hand sides
809
810
811 }
812 Trace("sg-stats") << "--------> Total relevant patterns : " << d_rel_term_count << std::endl;
813
814 Trace("sg-proc") << "Generate properties..." << std::endl;
815 //set up environment
816 d_use_ccand_eqc = false;
817 d_var_id.clear();
818 d_var_limit.clear();
819 for( std::map< TypeNode, unsigned >::iterator it = rt_var_max.begin(); it != rt_var_max.end(); ++it ){
820 d_var_id[ it->first ] = it->second;
821 d_var_limit[ it->first ] = it->second;
822 }
823 //set up environment for candidate conjectures
824 //d_cconj_at_depth.clear();
825 //for( unsigned i=0; i<2; i++ ){
826 // d_cconj[i].clear();
827 //}
828 //d_cconj_rhs_paired.clear();
829 unsigned totalCount = 0;
830 for( unsigned depth=0; depth<5; depth++ ){
831 //consider types from relevant terms
832 std::random_shuffle( rt_types.begin(), rt_types.end() );
833 for( unsigned i=0; i<rt_types.size(); i++ ){
834 Assert( d_tg_alloc.empty() );
835 Trace("sg-proc") << "Generate relevant RHS terms of type " << rt_types[i] << " at depth " << depth << "..." << std::endl;
836 d_tg_id = 0;
837 d_tg_gdepth = 0;
838 d_tg_gdepth_limit = -1;
839 d_tg_alloc[0].reset( this, rt_types[i] );
840 while( d_tg_alloc[0].getNextTerm( this, depth ) && totalCount<100 ){
841 if( d_tg_alloc[0].getDepth( this )==depth ){
842 Node rhs = d_tg_alloc[0].getTerm( this );
843 Trace("sg-rel-prop") << "Relevant RHS : " << rhs << std::endl;
844 conj_rhs[depth].push_back( rhs );
845 //register pattern
846 Assert( rhs.getType()==rt_types[i] );
847 registerPattern( rhs, rt_types[i] );
848 totalCount++;
849 }
850 }
851 //could have been partial, we must clear
852 d_tg_alloc.clear();
853 }
854 Trace("sg-proc") << "Process candidate conjectures up to RHS term depth " << depth << "..." << std::endl;
855 for( int rhs_d=depth; rhs_d>=0; rhs_d-- ){
856 int lhs_d = (depth-rhs_d)+1;
857 for( unsigned i=0; i<conj_rhs[rhs_d].size(); i++ ){
858 for( unsigned j=0; j<conj_lhs[lhs_d].size(); j++ ){
859 processCandidateConjecture( conj_lhs[lhs_d][j], conj_rhs[rhs_d][i], lhs_d, rhs_d );
860 }
861 }
862 }
863 Trace("sg-proc") << "...done process candidate conjectures at RHS term depth " << depth << std::endl;
864 }
865 Trace("sg-proc") << "...done generate properties" << std::endl;
866
867 if( !d_waiting_conjectures.empty() ){
868 Trace("sg-proc") << "Generated " << d_waiting_conjectures.size() << " conjectures." << std::endl;
869 d_conjectures.insert( d_conjectures.end(), d_waiting_conjectures.begin(), d_waiting_conjectures.end() );
870 for( unsigned i=0; i<d_waiting_conjectures.size(); i++ ){
871 Assert( d_waiting_conjectures[i].getKind()==FORALL );
872 Node lem = NodeManager::currentNM()->mkNode( OR, d_waiting_conjectures[i].negate(), d_waiting_conjectures[i] );
873 d_quantEngine->addLemma( lem, false );
874 d_quantEngine->addRequirePhase( d_waiting_conjectures[i], false );
875 }
876 d_waiting_conjectures.clear();
877 }
878
879 Trace("thm-ee") << "Universal equality engine is : " << std::endl;
880 eq::EqClassesIterator ueqcs_i = eq::EqClassesIterator( &d_uequalityEngine );
881 while( !ueqcs_i.isFinished() ){
882 TNode r = (*ueqcs_i);
883 bool firstTime = true;
884 TNode rr = getUniversalRepresentative( r );
885 Trace("thm-ee") << " " << r;
886 if( rr!=r ){ Trace("thm-ee") << " [" << rr << "]"; }
887 Trace("thm-ee") << " : { ";
888 eq::EqClassIterator ueqc_i = eq::EqClassIterator( r, &d_uequalityEngine );
889 while( !ueqc_i.isFinished() ){
890 TNode n = (*ueqc_i);
891 if( r!=n ){
892 if( firstTime ){
893 Trace("thm-ee") << std::endl;
894 firstTime = false;
895 }
896 Trace("thm-ee") << " " << n << std::endl;
897 }
898 ++ueqc_i;
899 }
900 if( !firstTime ){ Trace("thm-ee") << " "; }
901 Trace("thm-ee") << "}" << std::endl;
902 ++ueqcs_i;
903 }
904 Trace("thm-ee") << std::endl;
905 }
906 }
907 }
908
909 void ConjectureGenerator::registerQuantifier( Node q ) {
910
911 }
912
913 void ConjectureGenerator::assertNode( Node n ) {
914
915 }
916
917
918 unsigned ConjectureGenerator::getNumTgVars( TypeNode tn ) {
919 //return d_var_tg.size();
920 return d_var_id[tn];
921 }
922
923 bool ConjectureGenerator::allowVar( TypeNode tn ) {
924 std::map< TypeNode, unsigned >::iterator it = d_var_limit.find( tn );
925 if( it==d_var_limit.end() ){
926 return true;
927 }else{
928 return d_var_id[tn]<it->second;
929 }
930 }
931
932 void ConjectureGenerator::addVar( TypeNode tn ) {
933 //d_var_tg.push_back( v );
934 d_var_id[tn]++;
935 //d_var_eq_tg.push_back( std::vector< unsigned >() );
936 }
937
938 void ConjectureGenerator::removeVar( TypeNode tn ) {
939 d_var_id[tn]--;
940 //d_var_eq_tg.pop_back();
941 //d_var_tg.pop_back();
942 }
943
944 unsigned ConjectureGenerator::getNumTgFuncs( TypeNode tn ) {
945 return d_typ_tg_funcs[tn].size();
946 }
947
948 TNode ConjectureGenerator::getTgFunc( TypeNode tn, unsigned i ) {
949 return d_typ_tg_funcs[tn][i];
950 }
951
952 bool ConjectureGenerator::considerCurrentTerm() {
953 Assert( !d_tg_alloc.empty() );
954
955 //if generalization depth is too large, don't consider it
956 unsigned i = d_tg_alloc.size();
957 Trace("sg-gen-tg-debug") << "Consider term ";
958 d_tg_alloc[0].debugPrint( this, "sg-gen-tg-debug", "sg-gen-tg-debug" );
959 Trace("sg-gen-tg-debug") << "? curr term size = " << d_tg_alloc.size() << ", last status = " << d_tg_alloc[i-1].d_status;
960 Trace("sg-gen-tg-debug") << std::endl;
961
962 Assert( d_tg_alloc[0].getGeneralizationDepth( this )==d_tg_gdepth );
963
964 if( d_tg_gdepth_limit>=0 && d_tg_gdepth>(unsigned)d_tg_gdepth_limit ){
965 Trace("sg-gen-consider-term") << "-> generalization depth of ";
966 d_tg_alloc[0].debugPrint( this, "sg-gen-consider-term", "sg-gen-tg-debug" );
967 Trace("sg-gen-consider-term") << " is too high " << d_tg_gdepth << " " << d_tg_alloc[0].getGeneralizationDepth( this ) << ", do not consider." << std::endl;
968 return false;
969 }
970
971 //----optimizations
972 if( d_tg_alloc[i-1].d_status==1 ){
973 }else if( d_tg_alloc[i-1].d_status==2 ){
974 }else if( d_tg_alloc[i-1].d_status==5 ){
975 }else{
976 Trace("sg-gen-tg-debug") << "Bad tg: " << &d_tg_alloc[i-1] << std::endl;
977 Assert( false );
978 }
979 //if equated two variables, first check if context-independent TODO
980 //----end optimizations
981
982
983 //check based on which candidate equivalence classes match
984 if( d_use_ccand_eqc ){
985 Trace("sg-gen-tg-debug") << "Filter based on relevant ground EQC";
986 Trace("sg-gen-tg-debug") << ", #eqc to try = " << d_ccand_eqc[0][i-1].size() << "/" << d_ccand_eqc[1][i-1].size() << std::endl;
987
988 Assert( d_ccand_eqc[0].size()>=2 );
989 Assert( d_ccand_eqc[0].size()==d_ccand_eqc[1].size() );
990 Assert( d_ccand_eqc[0].size()==d_tg_id+1 );
991 Assert( d_tg_id==d_tg_alloc.size() );
992 for( unsigned r=0; r<2; r++ ){
993 d_ccand_eqc[r][i].clear();
994 }
995
996 //re-check feasibility of EQC
997 for( unsigned r=0; r<2; r++ ){
998 for( unsigned j=0; j<d_ccand_eqc[r][i-1].size(); j++ ){
999 std::map< TypeNode, std::map< unsigned, TNode > > subs;
1000 std::map< TNode, bool > rev_subs;
1001 unsigned mode;
1002 if( r==0 ){
1003 mode = optReqDistinctVarPatterns() ? ( 1 << 0 ) : 0;
1004 mode = mode | (1 << 2 );
1005 }else{
1006 mode = (optFilterConfirmation() && optFilterConfirmationOnlyGround() ) ? ( 1 << 1 ) : 0;
1007 }
1008 d_tg_alloc[0].resetMatching( this, d_ccand_eqc[r][i-1][j], mode );
1009 if( d_tg_alloc[0].getNextMatch( this, d_ccand_eqc[r][i-1][j], subs, rev_subs ) ){
1010 d_ccand_eqc[r][i].push_back( d_ccand_eqc[r][i-1][j] );
1011 }
1012 }
1013 }
1014 for( unsigned r=0; r<2; r++ ){
1015 Trace("sg-gen-tg-debug") << "Current eqc of type " << r << " : ";
1016 for( unsigned j=0; j<d_ccand_eqc[r][i].size(); j++ ){
1017 Trace("sg-gen-tg-debug") << "e" << d_em[d_ccand_eqc[r][i][j]] << " ";
1018 }
1019 Trace("sg-gen-tg-debug") << std::endl;
1020 }
1021 if( d_ccand_eqc[0][i].empty() ){
1022 Trace("sg-gen-consider-term") << "Do not consider term of form ";
1023 d_tg_alloc[0].debugPrint( this, "sg-gen-consider-term", "sg-gen-consider-term-debug" );
1024 Trace("sg-gen-consider-term") << " since no relevant EQC matches it." << std::endl;
1025 return false;
1026 }
1027 if( d_ccand_eqc[1][i].empty() && optFilterConfirmation() ){
1028 Trace("sg-gen-consider-term") << "Do not consider term of form ";
1029 d_tg_alloc[0].debugPrint( this, "sg-gen-consider-term", "sg-gen-consider-term-debug" );
1030 Trace("sg-gen-consider-term") << " since no ground EQC matches it." << std::endl;
1031 return false;
1032 }
1033 }
1034 Trace("sg-gen-tg-debug") << "Will consider term ";
1035 d_tg_alloc[0].debugPrint( this, "sg-gen-tg-debug", "sg-gen-tg-debug" );
1036 Trace("sg-gen-tg-debug") << std::endl;
1037 Trace("sg-gen-consider-term-debug") << std::endl;
1038 return true;
1039 }
1040
1041 bool ConjectureGenerator::considerTermCanon( unsigned tg_id ){
1042 Assert( tg_id<d_tg_alloc.size() );
1043 //check based on a canonicity of the term (if there is one)
1044 Trace("sg-gen-tg-debug") << "Consider term canon ";
1045 d_tg_alloc[0].debugPrint( this, "sg-gen-tg-debug", "sg-gen-tg-debug" );
1046 Trace("sg-gen-tg-debug") << ", tg is [" << tg_id << "]..." << std::endl;
1047
1048 Node ln = d_tg_alloc[tg_id].getTerm( this );
1049 Trace("sg-gen-tg-debug") << "Term is " << ln << std::endl;
1050 if( !ln.isNull() ){
1051 //do not consider if it is non-canonical, and either:
1052 // (1) we are not filtering based on matching candidate eqc, or
1053 // (2) its canonical form is a generalization.
1054 TNode lnr = getUniversalRepresentative( ln, true );
1055 if( lnr==ln ){
1056 markReportedCanon( ln );
1057 }else if( !d_use_ccand_eqc || isGeneralization( lnr, ln ) ){
1058 Trace("sg-gen-consider-term") << "Do not consider term of form ";
1059 d_tg_alloc[0].debugPrint( this, "sg-gen-consider-term", "sg-gen-consider-term-debug" );
1060 Trace("sg-gen-consider-term") << " since sub-term " << ln << " is not canonical representation (which is " << lnr << ")." << std::endl;
1061 return false;
1062 }
1063 }
1064 Trace("sg-gen-tg-debug") << "Will consider term canon ";
1065 d_tg_alloc[0].debugPrint( this, "sg-gen-tg-debug", "sg-gen-tg-debug" );
1066 Trace("sg-gen-tg-debug") << std::endl;
1067 Trace("sg-gen-consider-term-debug") << std::endl;
1068 return true;
1069 }
1070
1071 void ConjectureGenerator::changeContext( bool add ) {
1072 if( add ){
1073 for( unsigned r=0; r<2; r++ ){
1074 d_ccand_eqc[r].push_back( std::vector< TNode >() );
1075 }
1076 d_tg_id++;
1077 }else{
1078 for( unsigned r=0; r<2; r++ ){
1079 d_ccand_eqc[r].pop_back();
1080 }
1081 d_tg_id--;
1082 Assert( d_tg_alloc.find( d_tg_id )!=d_tg_alloc.end() );
1083 d_tg_alloc.erase( d_tg_id );
1084 }
1085 }
1086
1087 unsigned ConjectureGenerator::collectFunctions( TNode opat, TNode pat, std::map< TNode, unsigned >& funcs,
1088 std::map< TypeNode, unsigned >& mnvn, std::map< TypeNode, unsigned >& mxvn ){
1089 if( pat.hasOperator() ){
1090 funcs[pat.getOperator()]++;
1091 unsigned sum = 1;
1092 for( unsigned i=0; i<pat.getNumChildren(); i++ ){
1093 sum += collectFunctions( opat, pat[i], funcs, mnvn, mxvn );
1094 }
1095 return sum;
1096 }else{
1097 Assert( pat.getNumChildren()==0 );
1098 funcs[pat]++;
1099 //for variables
1100 if( pat.getKind()==BOUND_VARIABLE ){
1101 if( funcs[pat]>1 ){
1102 //duplicate variable
1103 d_pattern_var_duplicate[opat]++;
1104 }else{
1105 //check for max/min
1106 TypeNode tn = pat.getType();
1107 unsigned vn = d_free_var_num[pat];
1108 std::map< TypeNode, unsigned >::iterator it = mnvn.find( tn );
1109 if( it!=mnvn.end() ){
1110 if( vn<it->second ){
1111 d_pattern_is_normal[opat] = false;
1112 mnvn[tn] = vn;
1113 }else if( vn>mxvn[tn] ){
1114 if( vn!=mxvn[tn]+1 ){
1115 d_pattern_is_normal[opat] = false;
1116 }
1117 mxvn[tn] = vn;
1118 }
1119 }else{
1120 //first variable of this type
1121 mnvn[tn] = vn;
1122 mxvn[tn] = vn;
1123 }
1124 }
1125 }
1126 return 1;
1127 }
1128 }
1129
1130 void ConjectureGenerator::registerPattern( Node pat, TypeNode tpat ) {
1131 if( std::find( d_patterns[tpat].begin(), d_patterns[tpat].end(), pat )==d_patterns[tpat].end() ){
1132 d_patterns[TypeNode::null()].push_back( pat );
1133 d_patterns[tpat].push_back( pat );
1134
1135 Assert( d_pattern_fun_id.find( pat )==d_pattern_fun_id.end() );
1136 Assert( d_pattern_var_id.find( pat )==d_pattern_var_id.end() );
1137
1138 //collect functions
1139 std::map< TypeNode, unsigned > mnvn;
1140 d_pattern_fun_sum[pat] = collectFunctions( pat, pat, d_pattern_fun_id[pat], mnvn, d_pattern_var_id[pat] );
1141 if( d_pattern_is_normal.find( pat )==d_pattern_is_normal.end() ){
1142 d_pattern_is_normal[pat] = true;
1143 }
1144 }
1145 }
1146
1147 bool ConjectureGenerator::isGeneralization( TNode patg, TNode pat, std::map< TNode, TNode >& subs ) {
1148 if( patg.getKind()==BOUND_VARIABLE ){
1149 std::map< TNode, TNode >::iterator it = subs.find( patg );
1150 if( it!=subs.end() ){
1151 return it->second==pat;
1152 }else{
1153 subs[patg] = pat;
1154 return true;
1155 }
1156 }else{
1157 Assert( patg.hasOperator() );
1158 if( !pat.hasOperator() || patg.getOperator()!=pat.getOperator() ){
1159 return false;
1160 }else{
1161 Assert( patg.getNumChildren()==pat.getNumChildren() );
1162 for( unsigned i=0; i<patg.getNumChildren(); i++ ){
1163 if( !isGeneralization( patg[i], pat[i], subs ) ){
1164 return false;
1165 }
1166 }
1167 return true;
1168 }
1169 }
1170 }
1171
1172 void ConjectureGenerator::processCandidateConjecture( TNode lhs, TNode rhs, unsigned lhs_depth, unsigned rhs_depth ) {
1173 if( d_waiting_conjectures.size()>=optFullCheckConjectures() ){
1174 return;
1175 }
1176 if( considerCandidateConjecture( lhs, rhs ) ){
1177 Trace("sg-conjecture") << "* Candidate conjecture : " << lhs << " == " << rhs << std::endl;
1178 Trace("sg-conjecture-debug") << " LHS, RHS generalization depth : " << lhs_depth << ", " << rhs_depth << std::endl;
1179 if( optFilterConfirmation() || optFilterFalsification() ){
1180 Trace("sg-conjecture-debug") << " confirmed = " << d_subs_confirmCount << ", #witnesses range = " << d_subs_confirmWitnessRange.size() << "." << std::endl;
1181 Trace("sg-conjecture-debug") << " #witnesses for ";
1182 bool firstTime = true;
1183 for( std::map< TNode, std::vector< TNode > >::iterator it = d_subs_confirmWitnessDomain.begin(); it != d_subs_confirmWitnessDomain.end(); ++it ){
1184 if( !firstTime ){
1185 Trace("sg-conjecture-debug") << ", ";
1186 }
1187 Trace("sg-conjecture-debug") << it->first << " : " << it->second.size() << "/" << d_pattern_fun_id[lhs][it->first];
1188 if( it->second.size()==1 ){
1189 Trace("sg-conjecture-debug") << " (" << it->second[0] << ")";
1190 }
1191 firstTime = false;
1192 }
1193 Trace("sg-conjecture-debug") << std::endl;
1194 Trace("sg-conjecture-debug") << " unknown = " << d_subs_unkCount << std::endl;
1195 }
1196 Assert( getUniversalRepresentative( rhs )==rhs );
1197 Assert( getUniversalRepresentative( lhs )==lhs );
1198 //make universal quantified formula
1199 Assert( std::find( d_eq_conjectures[lhs].begin(), d_eq_conjectures[lhs].end(), rhs )==d_eq_conjectures[lhs].end() );
1200 d_eq_conjectures[lhs].push_back( rhs );
1201 d_eq_conjectures[rhs].push_back( lhs );
1202 std::vector< Node > bvs;
1203 for( std::map< TypeNode, unsigned >::iterator it = d_pattern_var_id[lhs].begin(); it != d_pattern_var_id[lhs].end(); ++it ){
1204 for( unsigned i=0; i<=it->second; i++ ){
1205 bvs.push_back( getFreeVar( it->first, i ) );
1206 }
1207 }
1208 Node bvl = NodeManager::currentNM()->mkNode( BOUND_VAR_LIST, bvs );
1209 Node conj = NodeManager::currentNM()->mkNode( FORALL, bvl, lhs.eqNode( rhs ) );
1210 conj = Rewriter::rewrite( conj );
1211 d_waiting_conjectures.push_back( conj );
1212 }
1213 }
1214
1215 bool ConjectureGenerator::considerCandidateConjecture( TNode lhs, TNode rhs ) {
1216 Trace("sg-cconj-debug") << "Consider candidate conjecture : " << lhs << " == " << rhs << "?" << std::endl;
1217 if( lhs==rhs ){
1218 Trace("sg-cconj-debug") << " -> trivial." << std::endl;
1219 return false;
1220 }else{
1221 if( lhs.getKind()==APPLY_CONSTRUCTOR && rhs.getKind()==APPLY_CONSTRUCTOR ){
1222 Trace("sg-cconj-debug") << " -> irrelevant by syntactic analysis." << std::endl;
1223 return false;
1224 }
1225 //variables of LHS must subsume variables of RHS
1226 for( std::map< TypeNode, unsigned >::iterator it = d_pattern_var_id[rhs].begin(); it != d_pattern_var_id[rhs].end(); ++it ){
1227 std::map< TypeNode, unsigned >::iterator itl = d_pattern_var_id[lhs].find( it->first );
1228 if( itl!=d_pattern_var_id[lhs].end() ){
1229 if( itl->second<it->second ){
1230 Trace("sg-cconj-debug") << " -> variables of sort " << it->first << " are not subsumed." << std::endl;
1231 return false;
1232 }else{
1233 Trace("sg-cconj-debug2") << " variables of sort " << it->first << " are : " << itl->second << " vs " << it->second << std::endl;
1234 }
1235 }else{
1236 Trace("sg-cconj-debug") << " -> has no variables of sort " << it->first << "." << std::endl;
1237 return false;
1238 }
1239 }
1240 //currently active conjecture?
1241 std::map< Node, std::vector< Node > >::iterator iteq = d_eq_conjectures.find( lhs );
1242 if( iteq!=d_eq_conjectures.end() ){
1243 if( std::find( iteq->second.begin(), iteq->second.end(), rhs )!=iteq->second.end() ){
1244 Trace("sg-cconj-debug") << " -> already are considering this conjecture." << std::endl;
1245 return false;
1246 }
1247 }
1248 Trace("sg-cconj") << "Consider possible candidate conjecture : " << lhs << " == " << rhs << "?" << std::endl;
1249 //find witness for counterexample, if possible
1250 if( optFilterConfirmation() || optFilterFalsification() ){
1251 Assert( d_rel_pattern_var_sum.find( lhs )!=d_rel_pattern_var_sum.end() );
1252 Trace("sg-cconj-debug") << "Notify substitutions over " << d_rel_pattern_var_sum[lhs] << " variables." << std::endl;
1253 std::map< TNode, TNode > subs;
1254 d_subs_confirmCount = 0;
1255 d_subs_confirmWitnessRange.clear();
1256 d_subs_confirmWitnessDomain.clear();
1257 d_subs_unkCount = 0;
1258 if( !d_rel_pattern_subs_index[lhs].notifySubstitutions( this, subs, rhs, d_rel_pattern_var_sum[lhs] ) ){
1259 Trace("sg-cconj") << " -> found witness that falsifies the conjecture." << std::endl;
1260 return false;
1261 }
1262 if( optFilterConfirmation() ){
1263 if( d_subs_confirmCount==0 ){
1264 Trace("sg-cconj") << " -> not confirmed by a ground substitutions." << std::endl;
1265 return false;
1266 }
1267 }
1268 if( optFilterConfirmationDomain() ){
1269 std::vector< TNode > vars;
1270 std::vector< TNode > subs;
1271 for( std::map< TNode, std::vector< TNode > >::iterator it = d_subs_confirmWitnessDomain.begin(); it != d_subs_confirmWitnessDomain.end(); ++it ){
1272 Assert( d_pattern_fun_id[lhs].find( it->first )!=d_pattern_fun_id[lhs].end() );
1273 unsigned req = d_pattern_fun_id[lhs][it->first];
1274 std::map< TNode, unsigned >::iterator itrf = d_pattern_fun_id[rhs].find( it->first );
1275 if( itrf!=d_pattern_fun_id[rhs].end() ){
1276 req = itrf->second>req ? itrf->second : req;
1277 }
1278 if( it->second.size()<req ){
1279 Trace("sg-cconj") << " -> did not find at least " << d_pattern_fun_id[lhs][it->first] << " different values in ground substitutions for variable " << it->first << "." << std::endl;
1280 return false;
1281 }
1282 if( it->second.size()==1 ){
1283 vars.push_back( it->first );
1284 subs.push_back( it->second[0] );
1285 }
1286 }
1287 if( optFilterConfirmationNonCanonical() && !vars.empty() ){
1288 Node slhs = lhs.substitute( vars.begin(), vars.end(), subs.begin(), subs.end() );
1289 Node srhs = rhs.substitute( vars.begin(), vars.end(), subs.begin(), subs.end() );
1290 TNode slhsr = getUniversalRepresentative( slhs, true );
1291 TNode srhsr = getUniversalRepresentative( srhs, true );
1292 if( areUniversalEqual( slhsr, srhsr ) ){
1293 Trace("sg-cconj") << " -> all ground witnesses can be proven by other theorems." << std::endl;
1294 return false;
1295 }else{
1296 Trace("sg-cconj-debug") << "Checked if " << slhsr << " and " << srhsr << " were equal." << std::endl;
1297 }
1298 }
1299 }
1300 }
1301
1302 Trace("sg-cconj") << " -> SUCCESS." << std::endl;
1303 if( optFilterConfirmation() || optFilterFalsification() ){
1304 Trace("sg-cconj") << " confirmed = " << d_subs_confirmCount << ", #witnesses range = " << d_subs_confirmWitnessRange.size() << "." << std::endl;
1305 for( std::map< TNode, std::vector< TNode > >::iterator it = d_subs_confirmWitnessDomain.begin(); it != d_subs_confirmWitnessDomain.end(); ++it ){
1306 Trace("sg-cconj") << " #witnesses for " << it->first << " : " << it->second.size() << std::endl;
1307 }
1308 }
1309
1310 /*
1311 if( getUniversalRepresentative( lhs )!=lhs ){
1312 std::cout << "bad universal representative LHS : " << lhs << " " << getUniversalRepresentative( lhs ) << std::endl;
1313 exit(0);
1314 }
1315 if( getUniversalRepresentative( rhs )!=rhs ){
1316 std::cout << "bad universal representative RHS : " << rhs << " " << getUniversalRepresentative( rhs ) << std::endl;
1317 exit(0);
1318 }
1319 */
1320
1321 //check if still canonical representation (should be, but for efficiency this is not guarenteed)
1322 if( getUniversalRepresentative( lhs )!=lhs || getUniversalRepresentative( rhs )!=rhs ){
1323 Trace("sg-cconj") << " -> after processing, not canonical." << std::endl;
1324 }
1325
1326 return true;
1327 }
1328 }
1329
1330 bool ConjectureGenerator::notifySubstitution( TNode glhs, std::map< TNode, TNode >& subs, TNode rhs ) {
1331 if( Trace.isOn("sg-cconj-debug") ){
1332 Trace("sg-cconj-debug") << "Ground eqc for LHS : " << glhs << ", based on substituion: " << std::endl;
1333 for( std::map< TNode, TNode >::iterator it = subs.begin(); it != subs.end(); ++it ){
1334 Assert( getRepresentative( it->second )==it->second );
1335 Trace("sg-cconj-debug") << " " << it->first << " -> " << it->second << std::endl;
1336 }
1337 }
1338 Trace("sg-cconj-debug") << "Evaluate RHS : : " << rhs << std::endl;
1339 //get the representative of rhs with substitution subs
1340 TNode grhs = getTermDatabase()->evaluateTerm( rhs, subs, true );
1341 Trace("sg-cconj-debug") << "...done evaluating term, got : " << grhs << std::endl;
1342 if( !grhs.isNull() ){
1343 if( glhs!=grhs ){
1344 if( optFilterFalsification() ){
1345 Trace("sg-cconj-debug") << "Ground eqc for RHS : " << grhs << std::endl;
1346 //check based on ground terms
1347 std::map< TNode, Node >::iterator itl = d_ground_eqc_map.find( glhs );
1348 if( itl!=d_ground_eqc_map.end() ){
1349 std::map< TNode, Node >::iterator itr = d_ground_eqc_map.find( grhs );
1350 if( itr!=d_ground_eqc_map.end() ){
1351 Trace("sg-cconj-debug") << "We have ground terms " << itl->second << " and " << itr->second << "." << std::endl;
1352 if( itl->second.isConst() && itr->second.isConst() ){
1353 Trace("sg-cconj-debug") << "...disequal constants." << std::endl;
1354 Trace("sg-cconj-witness") << " Witness of falsification : " << itl->second << " != " << itr->second << ", substutition is : " << std::endl;
1355 for( std::map< TNode, TNode >::iterator it = subs.begin(); it != subs.end(); ++it ){
1356 Trace("sg-cconj-witness") << " " << it->first << " -> " << it->second << std::endl;
1357 }
1358 return false;
1359 }else{
1360 d_subs_unkCount++;
1361 if( optFilterUnknown() ){
1362 return false;
1363 }
1364 }
1365 }
1366 }
1367 }
1368 /*
1369 if( getEqualityEngine()->areDisequal( glhs, grhs, false ) ){
1370 Trace("sg-cconj-debug") << "..." << glhs << " and " << grhs << " are disequal." << std::endl;
1371 return false;
1372 }else{
1373 Trace("sg-cconj-debug") << "..." << glhs << " and " << grhs << " are not disequal." << std::endl;
1374 }
1375 */
1376 }else{
1377 Trace("sg-cconj-witness") << " Witnessed " << glhs << " == " << grhs << ", substutition is : " << std::endl;
1378 for( std::map< TNode, TNode >::iterator it = subs.begin(); it != subs.end(); ++it ){
1379 Trace("sg-cconj-witness") << " " << it->first << " -> " << it->second << std::endl;
1380 if( std::find( d_subs_confirmWitnessDomain[it->first].begin(), d_subs_confirmWitnessDomain[it->first].end(), it->second )==d_subs_confirmWitnessDomain[it->first].end() ){
1381 d_subs_confirmWitnessDomain[it->first].push_back( it->second );
1382 }
1383 }
1384 d_subs_confirmCount++;
1385 if( std::find( d_subs_confirmWitnessRange.begin(), d_subs_confirmWitnessRange.end(), glhs )==d_subs_confirmWitnessRange.end() ){
1386 d_subs_confirmWitnessRange.push_back( glhs );
1387 }
1388 Trace("sg-cconj-debug") << "RHS is identical." << std::endl;
1389 }
1390 }else{
1391 Trace("sg-cconj-debug") << "(could not ground eqc for RHS)." << std::endl;
1392 }
1393 return true;
1394 }
1395
1396
1397 void TermGenerator::reset( ConjectureGenerator * s, TypeNode tn ) {
1398 Assert( d_children.empty() );
1399 d_typ = tn;
1400 d_status = 0;
1401 d_status_num = 0;
1402 d_children.clear();
1403 Trace("sg-gen-tg-debug2") << "...add to context " << this << std::endl;
1404 d_id = s->d_tg_id;
1405 s->changeContext( true );
1406 }
1407
1408 bool TermGenerator::getNextTerm( ConjectureGenerator * s, unsigned depth ) {
1409 if( Trace.isOn("sg-gen-tg-debug2") ){
1410 Trace("sg-gen-tg-debug2") << this << " getNextTerm depth " << depth << " : status = " << d_status << ", num = " << d_status_num;
1411 if( d_status==5 ){
1412 TNode f = s->getTgFunc( d_typ, d_status_num );
1413 Trace("sg-gen-tg-debug2") << ", f = " << f;
1414 Trace("sg-gen-tg-debug2") << ", #args = " << s->d_func_args[f].size();
1415 Trace("sg-gen-tg-debug2") << ", childNum = " << d_status_child_num;
1416 Trace("sg-gen-tg-debug2") << ", #children = " << d_children.size();
1417 }
1418 Trace("sg-gen-tg-debug2") << std::endl;
1419 }
1420
1421 if( d_status==0 ){
1422 d_status++;
1423 if( !d_typ.isNull() ){
1424 if( s->allowVar( d_typ ) ){
1425 //allocate variable
1426 d_status_num = s->d_var_id[d_typ];
1427 s->addVar( d_typ );
1428 Trace("sg-gen-tg-debug2") << this << " ...return unique var #" << d_status_num << std::endl;
1429 return s->considerCurrentTerm() ? true : getNextTerm( s, depth );
1430 }else{
1431 //check allocating new variable
1432 d_status++;
1433 d_status_num = -1;
1434 s->d_tg_gdepth++;
1435 return getNextTerm( s, depth );
1436 }
1437 }else{
1438 d_status = 4;
1439 d_status_num = -1;
1440 return getNextTerm( s, depth );
1441 }
1442 }else if( d_status==2 ){
1443 //cleanup previous information
1444 //if( d_status_num>=0 ){
1445 // s->d_var_eq_tg[d_status_num].pop_back();
1446 //}
1447 //check if there is another variable
1448 if( (d_status_num+1)<(int)s->getNumTgVars( d_typ ) ){
1449 d_status_num++;
1450 //we have equated two variables
1451 //s->d_var_eq_tg[d_status_num].push_back( d_id );
1452 Trace("sg-gen-tg-debug2") << this << "...consider other var #" << d_status_num << std::endl;
1453 return s->considerCurrentTerm() ? true : getNextTerm( s, depth );
1454 }else{
1455 s->d_tg_gdepth--;
1456 d_status++;
1457 return getNextTerm( s, depth );
1458 }
1459 }else if( d_status==4 ){
1460 d_status++;
1461 if( depth>0 && (d_status_num+1)<(int)s->getNumTgFuncs( d_typ ) ){
1462 d_status_num++;
1463 d_status_child_num = 0;
1464 Trace("sg-gen-tg-debug2") << this << "...consider function " << s->getTgFunc( d_typ, d_status_num ) << std::endl;
1465 s->d_tg_gdepth++;
1466 if( !s->considerCurrentTerm() ){
1467 s->d_tg_gdepth--;
1468 //don't consider this function
1469 d_status--;
1470 }else{
1471 //we have decided on a function application
1472 }
1473 return getNextTerm( s, depth );
1474 }else{
1475 //do not choose function applications at depth 0
1476 d_status++;
1477 return getNextTerm( s, depth );
1478 }
1479 }else if( d_status==5 ){
1480 //iterating over arguments
1481 TNode f = s->getTgFunc( d_typ, d_status_num );
1482 if( d_status_child_num<0 ){
1483 //no more arguments
1484 s->d_tg_gdepth--;
1485 d_status--;
1486 return getNextTerm( s, depth );
1487 }else if( d_status_child_num==(int)s->d_func_args[f].size() ){
1488 d_status_child_num--;
1489 return s->considerTermCanon( d_id ) ? true : getNextTerm( s, depth );
1490 //return true;
1491 }else{
1492 Assert( d_status_child_num<(int)s->d_func_args[f].size() );
1493 if( d_status_child_num==(int)d_children.size() ){
1494 d_children.push_back( s->d_tg_id );
1495 Assert( s->d_tg_alloc.find( s->d_tg_id )==s->d_tg_alloc.end() );
1496 s->d_tg_alloc[d_children[d_status_child_num]].reset( s, s->d_func_args[f][d_status_child_num] );
1497 return getNextTerm( s, depth );
1498 }else{
1499 Assert( d_status_child_num+1==(int)d_children.size() );
1500 if( s->d_tg_alloc[d_children[d_status_child_num]].getNextTerm( s, depth-1 ) ){
1501 d_status_child_num++;
1502 return getNextTerm( s, depth );
1503 }else{
1504 d_children.pop_back();
1505 d_status_child_num--;
1506 return getNextTerm( s, depth );
1507 }
1508 }
1509 }
1510 }else if( d_status==1 || d_status==3 ){
1511 if( d_status==1 ){
1512 s->removeVar( d_typ );
1513 Assert( d_status_num==(int)s->d_var_id[d_typ] );
1514 //check if there is only one feasible equivalence class. if so, don't make pattern any more specific.
1515 //unsigned i = s->d_ccand_eqc[0].size()-1;
1516 //if( s->d_ccand_eqc[0][i].size()==1 && s->d_ccand_eqc[1][i].empty() ){
1517 // Trace("ajr-temp") << "Apply this!" << std::endl;
1518 // d_status = 6;
1519 // return getNextTerm( s, depth );
1520 //}
1521 s->d_tg_gdepth++;
1522 }
1523 d_status++;
1524 d_status_num = -1;
1525 return getNextTerm( s, depth );
1526 }else{
1527 //clean up
1528 Assert( d_children.empty() );
1529 Trace("sg-gen-tg-debug2") << "...remove from context " << this << std::endl;
1530 s->changeContext( false );
1531 Assert( d_id==s->d_tg_id );
1532 return false;
1533 }
1534 }
1535
1536 void TermGenerator::resetMatching( ConjectureGenerator * s, TNode eqc, unsigned mode ) {
1537 d_match_status = 0;
1538 d_match_status_child_num = 0;
1539 d_match_children.clear();
1540 d_match_children_end.clear();
1541 d_match_mode = mode;
1542 //if this term generalizes, it must generalize a non-ground term
1543 //if( (d_match_mode & ( 1 << 2 ))!=0 && s->isGroundEqc( eqc ) && d_status==5 ){
1544 // d_match_status = -1;
1545 //}
1546 }
1547
1548 bool TermGenerator::getNextMatch( ConjectureGenerator * s, TNode eqc, std::map< TypeNode, std::map< unsigned, TNode > >& subs, std::map< TNode, bool >& rev_subs ) {
1549 if( d_match_status<0 ){
1550 return false;
1551 }
1552 if( Trace.isOn("sg-gen-tg-match") ){
1553 Trace("sg-gen-tg-match") << "Matching ";
1554 debugPrint( s, "sg-gen-tg-match", "sg-gen-tg-match" );
1555 Trace("sg-gen-tg-match") << " with eqc e" << s->d_em[eqc] << "..." << std::endl;
1556 Trace("sg-gen-tg-match") << " mstatus = " << d_match_status;
1557 if( d_status==5 ){
1558 TNode f = s->getTgFunc( d_typ, d_status_num );
1559 Trace("sg-gen-tg-debug2") << ", f = " << f;
1560 Trace("sg-gen-tg-debug2") << ", #args = " << s->d_func_args[f].size();
1561 Trace("sg-gen-tg-debug2") << ", mchildNum = " << d_match_status_child_num;
1562 Trace("sg-gen-tg-debug2") << ", #mchildren = " << d_match_children.size();
1563 }
1564 Trace("sg-gen-tg-debug2") << ", current substitution : {";
1565 for( std::map< TypeNode, std::map< unsigned, TNode > >::iterator itt = subs.begin(); itt != subs.end(); ++itt ){
1566 for( std::map< unsigned, TNode >::iterator it = itt->second.begin(); it != itt->second.end(); ++it ){
1567 Trace("sg-gen-tg-debug2") << " " << it->first << " -> e" << s->d_em[it->second];
1568 }
1569 }
1570 Trace("sg-gen-tg-debug2") << " } " << std::endl;
1571 }
1572 if( d_status==1 ){
1573 //a variable
1574 if( d_match_status==0 ){
1575 d_match_status++;
1576 if( (d_match_mode & ( 1 << 1 ))!=0 ){
1577 //only ground terms
1578 if( !s->isGroundEqc( eqc ) ){
1579 return false;
1580 }
1581 }else if( (d_match_mode & ( 1 << 2 ))!=0 ){
1582 //only non-ground terms
1583 //if( s->isGroundEqc( eqc ) ){
1584 // return false;
1585 //}
1586 }
1587 //store the match : restricted if match_mode.0 = 1
1588 if( (d_match_mode & ( 1 << 0 ))!=0 ){
1589 std::map< TNode, bool >::iterator it = rev_subs.find( eqc );
1590 if( it==rev_subs.end() ){
1591 rev_subs[eqc] = true;
1592 }else{
1593 return false;
1594 }
1595 }
1596 Assert( subs[d_typ].find( d_status_num )==subs[d_typ].end() );
1597 subs[d_typ][d_status_num] = eqc;
1598 return true;
1599 }else{
1600 //clean up
1601 subs[d_typ].erase( d_status_num );
1602 if( (d_match_mode & ( 1 << 0 ))!=0 ){
1603 rev_subs.erase( eqc );
1604 }
1605 return false;
1606 }
1607 }else if( d_status==2 ){
1608 if( d_match_status==0 ){
1609 d_match_status++;
1610 Assert( d_status_num<(int)s->getNumTgVars( d_typ ) );
1611 std::map< unsigned, TNode >::iterator it = subs[d_typ].find( d_status_num );
1612 Assert( it!=subs[d_typ].end() );
1613 return it->second==eqc;
1614 }else{
1615 return false;
1616 }
1617 }else if( d_status==5 ){
1618 //Assert( d_match_children.size()<=d_children.size() );
1619 //enumerating over f-applications in eqc
1620 if( d_match_status_child_num<0 ){
1621 return false;
1622 }else if( d_match_status==0 ){
1623 //set up next binding
1624 if( d_match_status_child_num==(int)d_match_children.size() ){
1625 if( d_match_status_child_num==0 ){
1626 //initial binding
1627 TNode f = s->getTgFunc( d_typ, d_status_num );
1628 std::map< TNode, TermArgTrie >::iterator it = s->getTermDatabase()->d_func_map_eqc_trie[f].d_data.find( eqc );
1629 if( it!=s->getTermDatabase()->d_func_map_eqc_trie[f].d_data.end() ){
1630 d_match_children.push_back( it->second.d_data.begin() );
1631 d_match_children_end.push_back( it->second.d_data.end() );
1632 }else{
1633 d_match_status++;
1634 d_match_status_child_num--;
1635 return getNextMatch( s, eqc, subs, rev_subs );
1636 }
1637 }else{
1638 d_match_children.push_back( d_match_children[d_match_status_child_num-1]->second.d_data.begin() );
1639 d_match_children_end.push_back( d_match_children[d_match_status_child_num-1]->second.d_data.end() );
1640 }
1641 }
1642 d_match_status++;
1643 Assert( d_match_status_child_num+1==(int)d_match_children.size() );
1644 if( d_match_children[d_match_status_child_num]==d_match_children_end[d_match_status_child_num] ){
1645 //no more arguments to bind
1646 d_match_children.pop_back();
1647 d_match_children_end.pop_back();
1648 d_match_status_child_num--;
1649 return getNextMatch( s, eqc, subs, rev_subs );
1650 }else{
1651 if( d_match_status_child_num==(int)d_children.size() ){
1652 //successfully matched all children
1653 d_match_children.pop_back();
1654 d_match_children_end.pop_back();
1655 d_match_status_child_num--;
1656 return true;//return d_match_children[d_match_status]!=d_match_children_end[d_match_status];
1657 }else{
1658 //do next binding
1659 s->d_tg_alloc[d_children[d_match_status_child_num]].resetMatching( s, d_match_children[d_match_status_child_num]->first, d_match_mode );
1660 return getNextMatch( s, eqc, subs, rev_subs );
1661 }
1662 }
1663 }else{
1664 Assert( d_match_status==1 );
1665 Assert( d_match_status_child_num+1==(int)d_match_children.size() );
1666 Assert( d_match_children[d_match_status_child_num]!=d_match_children_end[d_match_status_child_num] );
1667 d_match_status--;
1668 if( s->d_tg_alloc[d_children[d_match_status_child_num]].getNextMatch( s, d_match_children[d_match_status_child_num]->first, subs, rev_subs ) ){
1669 d_match_status_child_num++;
1670 return getNextMatch( s, eqc, subs, rev_subs );
1671 }else{
1672 //iterate
1673 d_match_children[d_match_status_child_num]++;
1674 return getNextMatch( s, eqc, subs, rev_subs );
1675 }
1676 }
1677 }
1678 Assert( false );
1679 return false;
1680 }
1681
1682 unsigned TermGenerator::getDepth( ConjectureGenerator * s ) {
1683 if( d_status==5 ){
1684 unsigned maxd = 0;
1685 for( unsigned i=0; i<d_children.size(); i++ ){
1686 unsigned d = s->d_tg_alloc[d_children[i]].getDepth( s );
1687 if( d>maxd ){
1688 maxd = d;
1689 }
1690 }
1691 return 1+maxd;
1692 }else{
1693 return 0;
1694 }
1695 }
1696
1697 unsigned TermGenerator::getGeneralizationDepth( ConjectureGenerator * s ) {
1698 if( d_status==5 ){
1699 unsigned sum = 1;
1700 for( unsigned i=0; i<d_children.size(); i++ ){
1701 sum += s->d_tg_alloc[d_children[i]].getGeneralizationDepth( s );
1702 }
1703 return sum;
1704 }else if( d_status==2 ){
1705 return 1;
1706 }else{
1707 Assert( d_status==1 );
1708 return 0;
1709 }
1710 }
1711
1712 Node TermGenerator::getTerm( ConjectureGenerator * s ) {
1713 if( d_status==1 || d_status==2 ){
1714 Assert( !d_typ.isNull() );
1715 return s->getFreeVar( d_typ, d_status_num );
1716 }else if( d_status==5 ){
1717 Node f = s->getTgFunc( d_typ, d_status_num );
1718 if( d_children.size()==s->d_func_args[f].size() ){
1719 std::vector< Node > children;
1720 children.push_back( f );
1721 for( unsigned i=0; i<d_children.size(); i++ ){
1722 Node nc = s->d_tg_alloc[d_children[i]].getTerm( s );
1723 if( nc.isNull() ){
1724 return Node::null();
1725 }else{
1726 //Assert( nc.getType()==s->d_func_args[f][i] );
1727 children.push_back( nc );
1728 }
1729 }
1730 return NodeManager::currentNM()->mkNode( s->d_func_kind[f], children );
1731 }
1732 }else{
1733 Assert( false );
1734 }
1735 return Node::null();
1736 }
1737
1738 void TermGenerator::debugPrint( ConjectureGenerator * s, const char * c, const char * cd ) {
1739 Trace(cd) << "[*" << d_id << "," << d_status << "]:";
1740 if( d_status==1 || d_status==2 ){
1741 Trace(c) << s->getFreeVar( d_typ, d_status_num );
1742 }else if( d_status==5 ){
1743 TNode f = s->getTgFunc( d_typ, d_status_num );
1744 Trace(c) << "(" << f;
1745 for( unsigned i=0; i<d_children.size(); i++ ){
1746 Trace(c) << " ";
1747 s->d_tg_alloc[d_children[i]].debugPrint( s, c, cd );
1748 }
1749 if( d_children.size()<s->d_func_args[f].size() ){
1750 Trace(c) << " ...";
1751 }
1752 Trace(c) << ")";
1753 }else{
1754 Trace(c) << "???";
1755 }
1756 }
1757
1758
1759 void SubstitutionIndex::addSubstitution( TNode eqc, std::vector< TNode >& vars, std::vector< TNode >& terms, unsigned i ) {
1760 if( i==vars.size() ){
1761 d_var = eqc;
1762 }else{
1763 Assert( d_var.isNull() || d_var==vars[i] );
1764 d_var = vars[i];
1765 d_children[terms[i]].addSubstitution( eqc, vars, terms, i+1 );
1766 }
1767 }
1768
1769 bool SubstitutionIndex::notifySubstitutions( ConjectureGenerator * s, std::map< TNode, TNode >& subs, TNode rhs, unsigned numVars, unsigned i ) {
1770 if( i==numVars ){
1771 Assert( d_children.empty() );
1772 return s->notifySubstitution( d_var, subs, rhs );
1773 }else{
1774 Assert( i==0 || !d_children.empty() );
1775 for( std::map< TNode, SubstitutionIndex >::iterator it = d_children.begin(); it != d_children.end(); ++it ){
1776 Trace("sg-cconj-debug2") << "Try " << d_var << " -> " << it->first << " (" << i << "/" << numVars << ")" << std::endl;
1777 subs[d_var] = it->first;
1778 if( !it->second.notifySubstitutions( s, subs, rhs, numVars, i+1 ) ){
1779 return false;
1780 }
1781 }
1782 return true;
1783 }
1784 }
1785
1786
1787 void TheoremIndex::addTheorem( std::vector< TNode >& lhs_v, std::vector< unsigned >& lhs_arg, TNode rhs ){
1788 if( lhs_v.empty() ){
1789 if( std::find( d_terms.begin(), d_terms.end(), rhs )==d_terms.end() ){
1790 d_terms.push_back( rhs );
1791 }
1792 }else{
1793 unsigned index = lhs_v.size()-1;
1794 if( lhs_arg[index]==lhs_v[index].getNumChildren() ){
1795 lhs_v.pop_back();
1796 lhs_arg.pop_back();
1797 addTheorem( lhs_v, lhs_arg, rhs );
1798 }else{
1799 lhs_arg[index]++;
1800 addTheoremNode( lhs_v[index][lhs_arg[index]-1], lhs_v, lhs_arg, rhs );
1801 }
1802 }
1803 }
1804
1805 void TheoremIndex::addTheoremNode( TNode curr, std::vector< TNode >& lhs_v, std::vector< unsigned >& lhs_arg, TNode rhs ){
1806 Trace("thm-db-debug") << "Adding conjecture for subterm " << curr << "..." << std::endl;
1807 if( curr.hasOperator() ){
1808 lhs_v.push_back( curr );
1809 lhs_arg.push_back( 0 );
1810 d_children[curr.getOperator()].addTheorem( lhs_v, lhs_arg, rhs );
1811 }else{
1812 Assert( curr.getKind()==kind::BOUND_VARIABLE );
1813 Assert( d_var.isNull() || d_var==curr );
1814 d_var = curr;
1815 d_children[curr].addTheorem( lhs_v, lhs_arg, rhs );
1816 }
1817 }
1818
1819 void TheoremIndex::getEquivalentTerms( std::vector< TNode >& n_v, std::vector< unsigned >& n_arg,
1820 std::map< TNode, TNode >& smap, std::vector< TNode >& vars, std::vector< TNode >& subs,
1821 std::vector< Node >& terms ) {
1822 Trace("thm-db-debug") << "Get equivalent terms " << n_v.size() << " " << n_arg.size() << std::endl;
1823 if( n_v.empty() ){
1824 Trace("thm-db-debug") << "Number of terms : " << d_terms.size() << std::endl;
1825 //apply substutitions to RHS's
1826 for( unsigned i=0; i<d_terms.size(); i++ ){
1827 Node n = d_terms[i].substitute( vars.begin(), vars.end(), subs.begin(), subs.end() );
1828 terms.push_back( n );
1829 }
1830 }else{
1831 unsigned index = n_v.size()-1;
1832 if( n_arg[index]==n_v[index].getNumChildren() ){
1833 n_v.pop_back();
1834 n_arg.pop_back();
1835 getEquivalentTerms( n_v, n_arg, smap, vars, subs, terms );
1836 }else{
1837 n_arg[index]++;
1838 getEquivalentTermsNode( n_v[index][n_arg[index]-1], n_v, n_arg, smap, vars, subs, terms );
1839 }
1840 }
1841 }
1842
1843 void TheoremIndex::getEquivalentTermsNode( Node curr, std::vector< TNode >& n_v, std::vector< unsigned >& n_arg,
1844 std::map< TNode, TNode >& smap, std::vector< TNode >& vars, std::vector< TNode >& subs,
1845 std::vector< Node >& terms ) {
1846 Trace("thm-db-debug") << "Get equivalent based on subterm " << curr << "..." << std::endl;
1847 if( curr.hasOperator() ){
1848 Trace("thm-db-debug") << "Check based on operator..." << std::endl;
1849 std::map< TNode, TheoremIndex >::iterator it = d_children.find( curr.getOperator() );
1850 if( it!=d_children.end() ){
1851 n_v.push_back( curr );
1852 n_arg.push_back( 0 );
1853 it->second.getEquivalentTerms( n_v, n_arg, smap, vars, subs, terms );
1854 }
1855 Trace("thm-db-debug") << "...done check based on operator" << std::endl;
1856 }
1857 if( !d_var.isNull() ){
1858 Trace("thm-db-debug") << "Check for substitution with " << d_var << "..." << std::endl;
1859 if( curr.getType()==d_var.getType() ){
1860 //add to substitution if possible
1861 bool success = false;
1862 std::map< TNode, TNode >::iterator it = smap.find( d_var );
1863 if( it==smap.end() ){
1864 smap[d_var] = curr;
1865 vars.push_back( d_var );
1866 subs.push_back( curr );
1867 success = true;
1868 }else if( it->second==curr ){
1869 success = true;
1870 }else{
1871 //also check modulo equality (in universal equality engine)
1872 }
1873 Trace("thm-db-debug") << "...check for substitution with " << d_var << ", success = " << success << "." << std::endl;
1874 if( success ){
1875 d_children[d_var].getEquivalentTerms( n_v, n_arg, smap, vars, subs, terms );
1876 }
1877 }
1878 }
1879 }
1880
1881 void TheoremIndex::debugPrint( const char * c, unsigned ind ) {
1882 for( std::map< TNode, TheoremIndex >::iterator it = d_children.begin(); it != d_children.end(); ++it ){
1883 for( unsigned i=0; i<ind; i++ ){ Trace(c) << " "; }
1884 Trace(c) << it->first << std::endl;
1885 it->second.debugPrint( c, ind+1 );
1886 }
1887 if( !d_terms.empty() ){
1888 for( unsigned i=0; i<ind; i++ ){ Trace(c) << " "; }
1889 Trace(c) << "{";
1890 for( unsigned i=0; i<d_terms.size(); i++ ){
1891 Trace(c) << " " << d_terms[i];
1892 }
1893 Trace(c) << " }" << std::endl;
1894 }
1895 //if( !d_var.isNull() ){
1896 // for( unsigned i=0; i<ind; i++ ){ Trace(c) << " "; }
1897 // Trace(c) << "var:" << d_var << std::endl;
1898 //}
1899 }
1900
1901 bool ConjectureGenerator::optReqDistinctVarPatterns() { return false; }
1902 bool ConjectureGenerator::optFilterFalsification() { return true; }
1903 bool ConjectureGenerator::optFilterUnknown() { return true; } //may change
1904 bool ConjectureGenerator::optFilterConfirmation() { return true; }
1905 bool ConjectureGenerator::optFilterConfirmationDomain() { return true; }
1906 bool ConjectureGenerator::optFilterConfirmationOnlyGround() { return true; }//false; }
1907 bool ConjectureGenerator::optFilterConfirmationNonCanonical() { return false; }//true; }
1908 unsigned ConjectureGenerator::optFullCheckFrequency() { return 1; }
1909 unsigned ConjectureGenerator::optFullCheckConjectures() { return options::conjectureGenPerRound(); }
1910
1911 }
1912
1913