max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

chore(library/tactic/clear_tactic): remove dead code

Browse source
This commit is contained in:
Leonardo de Moura 2019-08-05 08:58:59 -07:00
parent 3ecf8ac8ec
commit 215a3ac8fd
2 changed files with 0 additions and 24 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
src/library/tactic/clear_tactic.cpp
View file

@ -27,27 +27,6 @@ expr clear(metavar_context & mctx, expr const & mvar, expr const & H) {
return new_mvar;
}
expr clear_rec_core(metavar_context & mctx, expr const & mvar) {
optional<metavar_decl> g = mctx.find_metavar_decl(mvar);
lean_assert(g);
local_context lctx = g->get_context();
if (optional<local_decl> d = lctx.find_if([](local_decl const & decl) { return is_rec(decl.get_info()); })) {
return clear(mctx, mvar, d->mk_ref());
} else {
return mvar;
}
}
expr clear_recs(metavar_context & mctx, expr const & mvar) {
expr curr = mvar;
while (true) {
expr next = clear_rec_core(mctx, curr);
if (next == curr)
return curr;
curr = next;
}
}
void initialize_clear_tactic() {
}

3
src/library/tactic/clear_tactic.h
View file

@ -8,9 +8,6 @@ Author: Leonardo de Moura
#include "library/tactic/tactic_state.h"
namespace lean {
expr clear(metavar_context & mctx, expr const & mvar, expr const & H);
/* Eliminate hypotheses that are marked as 'rec'
(i.e., auxiliary hypotheses generated by the equation compiler). */
expr clear_recs(metavar_context & mctx, expr const & mvar);
void initialize_clear_tactic();
void finalize_clear_tactic();
}