diff options
Diffstat (limited to 'pretyping/retyping.mli')
-rw-r--r-- | pretyping/retyping.mli | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/pretyping/retyping.mli b/pretyping/retyping.mli index 2e32601d9..c8ef3d2e5 100644 --- a/pretyping/retyping.mli +++ b/pretyping/retyping.mli @@ -24,8 +24,10 @@ open Environ type metamap = (int * constr) list val get_type_of : env -> 'a evar_map -> constr -> constr +val get_sort_of : env -> 'a evar_map -> types -> sorts +val get_sort_family_of : env -> 'a evar_map -> types -> sorts_family + val get_type_of_with_meta : env -> 'a evar_map -> metamap -> constr -> constr -val get_sort_of : env -> 'a evar_map -> constr -> sorts (* Makes an assumption from a constr *) val get_assumption_of : env -> 'a evar_map -> constr -> types |