diff options
| author |  Stephane Glondu <steph@glondu.net> | 2010-07-21 09:46:51 +0200 |
|---|---|---|
| committer | Stephane Glondu <steph@glondu.net> | 2010-07-21 09:46:51 +0200 |
| commit | 5b7eafd0f00a16d78f99a27f5c7d5a0de77dc7e6 (patch) | |
| tree | 631ad791a7685edafeb1fb2e8faeedc8379318ae /pretyping/typing.mli | |
| parent | da178a880e3ace820b41d38b191d3785b82991f5 (diff) | |
Imported Upstream snapshot 8.3~beta0+13298
Diffstat (limited to 'pretyping/typing.mli')
| -rw-r--r-- | pretyping/typing.mli | 19 |
1 files changed, 8 insertions, 11 deletions
diff --git a/pretyping/typing.mli b/pretyping/typing.mli index c9d7d572..e3b3e948 100644 --- a/pretyping/typing.mli +++ b/pretyping/typing.mli @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(*i $Id: typing.mli 6113 2004-09-17 20:28:19Z barras $ i*) +(*i $Id$ i*) (*i*) open Term @@ -21,14 +21,11 @@ open Evd val type_of : env -> evar_map -> constr -> types (* Typecheck a type and return its sort *) val sort_of : env -> evar_map -> types -> sorts -(* Typecheck a term has a given type (assuming the type is OK *) +(* Typecheck a term has a given type (assuming the type is OK) *) val check : env -> evar_map -> constr -> types -> unit - -(* The same but with metas... *) -val mtype_of : env -> evar_defs -> constr -> types -val msort_of : env -> evar_defs -> types -> sorts -val mcheck : env -> evar_defs -> constr -> types -> unit -val meta_type : evar_defs -> metavariable -> types - -(* unused typing function... *) -val mtype_of_type : env -> evar_defs -> types -> types + +(* Returns the instantiated type of a metavariable *) +val meta_type : evar_map -> metavariable -> types + +(* Solve existential variables using typing *) +val solve_evars : env -> evar_map -> constr -> constr |