diff --git a/src/tactic/portfolio/CMakeLists.txt b/src/tactic/portfolio/CMakeLists.txt
index 0913bf7f0..6e954717f 100644
--- a/src/tactic/portfolio/CMakeLists.txt
+++ b/src/tactic/portfolio/CMakeLists.txt
@@ -3,6 +3,7 @@ z3_add_component(portfolio
     default_tactic.cpp
     smt_strategic_solver.cpp
     solver2lookahead.cpp
+    solver_subsumption_tactic.cpp
   COMPONENT_DEPENDENCIES
     aig_tactic
     fp
@@ -16,4 +17,6 @@ z3_add_component(portfolio
     fd_solver
   TACTIC_HEADERS
     default_tactic.h
+    solver_subsumption_tactic.h
+
 )
diff --git a/src/tactic/portfolio/solver_subsumption_tactic.cpp b/src/tactic/portfolio/solver_subsumption_tactic.cpp
new file mode 100644
index 000000000..57edce73d
--- /dev/null
+++ b/src/tactic/portfolio/solver_subsumption_tactic.cpp
@@ -0,0 +1,167 @@
+/*++
+Copyright (c) 2011 Microsoft Corporation
+
+Module Name:
+
+    solver_subsumption_tactic.cpp
+
+Author:
+
+    Nikolaj Bjorner (nbjorner) 2021-7-23
+
+--*/
+#include "ast/ast_util.h"
+#include "tactic/tactical.h"
+#include "tactic/portfolio/solver_subsumption_tactic.h"
+#include "solver/solver.h"
+
+class solver_subsumption_tactic : public tactic {
+    ast_manager& m;
+    params_ref    m_params;
+    solver_ref    m_solver;
+
+    void push() {
+        m_solver->push();
+    }
+
+    void pop() {
+        m_solver->pop(1);
+    }
+
+    void assert_expr(expr* f) {
+        m_solver->assert_expr(f);
+    }
+
+    bool subsumed(expr* f) {
+        expr_ref_vector fmls(m);
+        fmls.push_back(m.mk_not(f));
+        lbool is_sat = m_solver->check_sat(fmls);
+        return (is_sat == l_false);
+    }
+
+    /**
+    * Check subsumption (a \/ b \/ c)
+    * if (a \/ b) is already implied
+    * Use a naive algorithm (not binary disection here)
+    */
+
+    bool simplify(expr_ref& f) {
+        if (!m.is_or(f))
+            return false;
+        expr_ref_vector ors(m);
+        ors.append(to_app(f)->get_num_args(), to_app(f)->get_args());
+        unsigned j = 0;
+        expr_ref_vector prefix(m);
+        for (unsigned i = 0; i < ors.size(); ++i) {
+            expr_ref_vector fmls(m);
+            fmls.append(prefix);
+            for (unsigned k = i + 1; k < ors.size(); ++k)
+                fmls.push_back(m.mk_not(ors.get(k)));
+            lbool is_sat = m_solver->check_sat(fmls);
+            if (is_sat == l_false)
+                continue;
+            fmls.reset();
+            fmls.push_back(ors.get(i));
+            
+            is_sat = m_solver->check_sat(fmls);
+            if (is_sat == l_false)
+                continue;
+            prefix.push_back(ors.get(i));                
+        }
+        if (ors.size() != prefix.size()) {
+            ors.reset();
+            ors.append(prefix.size(), prefix.data());
+            f = mk_or(ors);
+            return true;
+        }
+        return false;
+    }
+
+    void simplify(vector<std::pair<unsigned, expr_ref>>& fmls, unsigned_vector& change) {
+
+        if (fmls.size() == 0)
+            return;
+
+        if (fmls.size() == 1) {
+            if (subsumed(fmls[0].second)) {                
+                change.push_back(fmls[0].first);
+                fmls[0].second = m.mk_true();                
+            }
+            else if (simplify(fmls[0].second)) 
+                change.push_back(fmls[0].first);            
+            return;
+        }
+        unsigned mid = fmls.size() / 2;
+
+        vector<std::pair<unsigned, expr_ref>> pre(mid, fmls.data());
+        vector<std::pair<unsigned, expr_ref>> post(fmls.size() - mid, fmls.data() + mid);
+        push();
+        for (auto [p, f] : post)
+            assert_expr(f);
+        simplify(pre, change);
+        pop();
+        push();
+        for (auto [p, f] : pre)
+            assert_expr(f);
+        simplify(post, change);
+        pop();
+        if (!change.empty()) {
+            fmls.reset();
+            fmls.append(pre);
+            fmls.append(post);
+        }
+    }
+
+public:
+    solver_subsumption_tactic(ast_manager& m, params_ref const& p) :
+        m(m),
+        m_params(p) {
+    }
+
+    tactic* translate(ast_manager& other_m) override {
+        return alloc(solver_subsumption_tactic, other_m, m_params);
+    }
+
+    ~solver_subsumption_tactic() override {}
+
+    void updt_params(params_ref const& p) override { m_params = p; }
+
+    void collect_param_descrs(param_descrs& r) override { 
+    }
+
+    void operator()(goal_ref const& g, goal_ref_buffer& result) override {
+        TRACE("tactic", tout << "params: " << m_params << "\n"; g->display(tout););
+        tactic_report report("subsumption", *g);
+
+        vector<std::pair<unsigned, expr_ref>> fmls;
+        unsigned_vector change;
+        unsigned sz = g->size();
+        if (sz == 1) {
+            result.push_back(g.get());
+            return;
+        }
+        for (unsigned i = 0; i < sz; i++)
+            fmls.push_back(std::make_pair(i, expr_ref(g->form(i), m)));
+        if (!m_solver) {
+            scoped_ptr<solver_factory> f = mk_smt_strategic_solver_factory();
+            m_solver = (*f)(m, m_params, false, false, true, symbol::null);
+        }
+        simplify(fmls, change);
+        if (change.empty()) {
+            result.push_back(g.get());
+            return;
+        }
+        g->inc_depth();
+        for (unsigned idx : change)
+            g->update(idx, fmls[idx].second);
+        g->elim_true();
+        result.push_back(g.get());
+    }
+
+    void cleanup() override {}
+};
+
+tactic* mk_solver_subsumption_tactic(ast_manager& m, params_ref const& p) {
+    return alloc(solver_subsumption_tactic, m, p);
+}
+
diff --git a/src/tactic/portfolio/solver_subsumption_tactic.h b/src/tactic/portfolio/solver_subsumption_tactic.h
new file mode 100644
index 000000000..c088aa0b0
--- /dev/null
+++ b/src/tactic/portfolio/solver_subsumption_tactic.h
@@ -0,0 +1,25 @@
+/*++
+Copyright (c) 2011 Microsoft Corporation
+
+Module Name:
+
+    solver_subsumption_tactic.h
+
+Author:
+
+    Nikolaj Bjorner (nbjorner) 2021-7-23
+
+--*/
+#pragma once
+
+#include "util/params.h"
+class ast_manager;
+class tactic;
+
+tactic * mk_solver_subsumption_tactic(ast_manager & m, params_ref const & p = params_ref());
+
+/*
+  ADD_TACTIC("solver_subsumption", "remove assertions that are subsumed.", "mk_solver_subsumption_tactic(m, p)")
+*/
+
+