From e53462c1c1b6c4231714cab7e48f9fbc69a3dd61 Mon Sep 17 00:00:00 2001
From: Nikolaj Bjorner <nbjorner@hotmail.com>
Date: Mon, 11 May 2015 17:11:21 -0700
Subject: [PATCH] update ddnf experiment code

Signed-off-by: Nikolaj Bjorner <nbjorner@hotmail.com>
---
 src/muz/ddnf/ddnf.cpp | 43 +++++++++++++++++++++++++++++++++++++++----
 src/muz/ddnf/ddnf.h   |  2 ++
 src/test/ddnf.cpp     |  3 +++
 3 files changed, 44 insertions(+), 4 deletions(-)

diff --git a/src/muz/ddnf/ddnf.cpp b/src/muz/ddnf/ddnf.cpp
index 82cb9d1fa..14f4a2b75 100644
--- a/src/muz/ddnf/ddnf.cpp
+++ b/src/muz/ddnf/ddnf.cpp
@@ -194,6 +194,7 @@ namespace datalog {
             new_tbvs.push_back(&t);
             for (unsigned i = 0; i < new_tbvs.size(); ++i) {
                 tbv const& nt = *new_tbvs[i];
+                IF_VERBOSE(10, m_tbv.display(verbose_stream() << "insert: ", nt); verbose_stream() << "\n";);
                 if (contains(nt)) continue;
                 ddnf_node* n = alloc(ddnf_node, *this, m_tbv, nt, m_noderefs.size());
                 m_noderefs.push_back(n);
@@ -233,6 +234,37 @@ namespace datalog {
             }
         }
 
+        bool contains(tbv const& t) {
+            ddnf_node dummy(*this, m_tbv, t, 0);
+            return m_nodes.contains(&dummy);
+        }    
+
+        bool well_formed() {
+            ptr_vector<ddnf_node> todo;
+            todo.push_back(m_root);
+            reset_accumulate();
+            while (!todo.empty()) {
+                ddnf_node* n = todo.back();
+                todo.pop_back();
+                if (m_marked[n->get_id()]) continue;
+                m_marked[n->get_id()] = true;
+                unsigned sz = n->num_children();
+                for (unsigned i = 0; i < sz; ++i) {
+                    ddnf_node* child = (*n)[i];
+                    if (!m_tbv.contains(n->get_tbv(), child->get_tbv())) {
+                        IF_VERBOSE(0, 
+                                   m_tbv.display(verbose_stream() << "parent ", n->get_tbv());
+                                   m_tbv.display(verbose_stream() << " does not contains child: ", child->get_tbv());
+                                   display(verbose_stream());
+                                   );
+                        return false;
+                    }
+                    todo.push_back(child);
+                }
+
+            }
+            return true;
+        }
    
 
     private:
@@ -242,10 +274,6 @@ namespace datalog {
             return *(m_nodes.find(&dummy));
         }
     
-        bool contains(tbv const& t) {
-            ddnf_node dummy(*this, m_tbv, t, 0);
-            return m_nodes.contains(&dummy);
-        }    
 
         void insert(ddnf_node& root, ddnf_node* new_n, ptr_vector<tbv const>& new_intersections) {
             tbv const& new_tbv = new_n->get_tbv();
@@ -354,6 +382,13 @@ namespace datalog {
     unsigned ddnf_core::size() const {
         return m_imp->size();
     }
+    bool ddnf_core::contains(tbv const& t) {
+        return m_imp->contains(t);
+    }
+    bool ddnf_core::well_formed()  {
+        return m_imp->well_formed();
+    }
+
     void ddnf_core::reset_accumulate() {
         return m_imp->reset_accumulate();
     }
diff --git a/src/muz/ddnf/ddnf.h b/src/muz/ddnf/ddnf.h
index 1e5e912ba..79c79ed9d 100644
--- a/src/muz/ddnf/ddnf.h
+++ b/src/muz/ddnf/ddnf.h
@@ -55,6 +55,8 @@ namespace datalog {
         ddnf_node* insert(tbv const& t);
         tbv_manager& get_tbv_manager();
         unsigned size() const;
+        bool contains(tbv const& t);
+        bool well_formed();
 
         //
         // accumulate labels covered by the stream of tbvs, 
diff --git a/src/test/ddnf.cpp b/src/test/ddnf.cpp
index 5ab395e20..27eec9f45 100644
--- a/src/test/ddnf.cpp
+++ b/src/test/ddnf.cpp
@@ -101,6 +101,7 @@ datalog::ddnf_core* populate_ddnf(char const* file, ptr_vector<tbv>& tbvs) {
                 exit(0);
             }
             if (p == 0 && tbvm.equals(*t, *tX)) break;
+            // std::cout << ddnf->well_formed() << "\n";
         }
     }
 
@@ -131,10 +132,12 @@ void tst_ddnf(char ** argv, int argc, int& i) {
     read_args(argv, argc);
     ptr_vector<tbv> tbvs;
     datalog::ddnf_core* ddnf = populate_ddnf(g_file, tbvs);
+    IF_VERBOSE(1, ddnf->display(verbose_stream()););
     create_forwarding(g_file, *ddnf, tbvs);
     std::cout << "resulting size: " << ddnf->size() << "\n";
     ddnf->display_statistics(std::cout);
     IF_VERBOSE(1, ddnf->display(verbose_stream()););
+    std::cout << ddnf->well_formed() << "\n";
 
     tbv_manager& tbvm = ddnf->get_tbv_manager();
     for (unsigned i = 0; i < tbvs.size(); ++i) {