fix(kernel/metavar): typo

Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
This commit is contained in:
Leonardo de Moura 2014-05-01 15:28:34 -07:00
parent 739f98b642
commit 0bc101ac28
2 changed files with 1 additions and 5 deletions

View file

@ -94,7 +94,7 @@ substitution substitution::assign(name const & m, level const & l) const {
} }
std::pair<level, justification> substitution::d_instantiate_metavars(level const & l, bool use_jst, bool updt) { std::pair<level, justification> substitution::d_instantiate_metavars(level const & l, bool use_jst, bool updt) {
if (!has_param(l)) if (!has_meta(l))
return mk_pair(l, justification()); return mk_pair(l, justification());
justification j; justification j;
auto save_jst = [&](justification const & j2) { j = mk_composite1(j, j2); }; auto save_jst = [&](justification const & j2) { j = mk_composite1(j, j2); };

View file

@ -96,10 +96,6 @@ public:
/** \brief Return true iff the metavariable \c m occurrs (directly or indirectly) in \c e. */ /** \brief Return true iff the metavariable \c m occurrs (directly or indirectly) in \c e. */
bool occurs_expr(name const & m, expr const & e) const; bool occurs_expr(name const & m, expr const & e) const;
/** \brief Return true iff the meta universe parameter \c m occurrs (directly or indirectly) in \c e. */
bool occurs_level(name const & m, expr const & e) const;
bool occurs(expr const & m, expr const & e) const { lean_assert(is_metavar(m)); return occurs_expr(mlocal_name(m), e); } bool occurs(expr const & m, expr const & e) const { lean_assert(is_metavar(m)); return occurs_expr(mlocal_name(m), e); }
bool occurs(level const & m, expr const & e) const { lean_assert(is_meta(m)); return occurs_expr(meta_id(m), e); }
}; };
} }