dcc94dde82
It now reflects the definition used in the elaboration paper.
23 lines
792 B
C++
23 lines
792 B
C++
/*
|
|
Copyright (c) 2014 Microsoft Corporation. All rights reserved.
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
|
|
|
Author: Leonardo de Moura
|
|
*/
|
|
#include "kernel/extension_context.h"
|
|
#include "kernel/expr.h"
|
|
|
|
namespace lean {
|
|
expr extension_context::whnf(expr const & e, constraint_seq & cs) {
|
|
auto p = whnf(e); cs += p.second; return p.first;
|
|
}
|
|
pair<expr, constraint_seq> extension_context::infer(expr const & e) {
|
|
return infer_type(e);
|
|
}
|
|
expr extension_context::infer_type(expr const & e, constraint_seq & cs) {
|
|
auto p = infer_type(e); cs += p.second; return p.first;
|
|
}
|
|
bool extension_context::is_def_eq(expr const & e1, expr const & e2, delayed_justification & j, constraint_seq & cs) {
|
|
auto p = is_def_eq(e1, e2, j); cs += p.second; return p.first;
|
|
}
|
|
}
|