checkpoint

Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>

src/smt/uses_theory.cpp

@@ -0,0 +1,49 @@
+/*++
+Copyright (c) 2006 Microsoft Corporation
+
+Module Name:
+
+    uses_theory.cpp
+
+Abstract:
+
+    <abstract>
+
+Author:
+
+    Leonardo de Moura (leonardo) 2008-10-21.
+
+Revision History:
+
+--*/
+
+#include"uses_theory.h"
+#include"for_each_expr.h"
+
+bool uses_theory(expr * n, family_id fid) {
+    expr_mark visited;
+    return uses_theory(n, fid, visited);
+}
+
+namespace uses_theory_ns {
+    struct found {}; 
+    struct proc {
+        family_id m_fid;
+        proc(family_id fid):m_fid(fid) {}
+        void operator()(var * n) {}
+        void operator()(app * n) { if (n->get_family_id() == m_fid) throw found(); }
+        void operator()(quantifier * n) {}
+    };
+};
+
+bool uses_theory(expr * n, family_id fid, expr_mark & visited) {
+    uses_theory_ns::proc p(fid);
+    try {
+        for_each_expr(p, visited, n);
+    }
+    catch (uses_theory_ns::found) {
+        return true;
+    }
+    return false;
+}
+