diff options
| author | clrenard | 2001-11-06 13:05:45 +0000 |
|---|---|---|
| committer | clrenard | 2001-11-06 13:05:45 +0000 |
| commit | 22ac53765e6f3d8ee2f05ad5fcdb046fbf4b6baf (patch) | |
| tree | 3c7468e9f0703d9e70b3aea539aaf8a28ec6a0ed /pretyping/inductiveops.mli | |
| parent | 8cd83fb8dd41521bbc109d37dd49dd3aae0de373 (diff) | |
Suppression des local_constraints, des ctxtty et du focus.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2163 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/inductiveops.mli')
| -rw-r--r-- | pretyping/inductiveops.mli | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/pretyping/inductiveops.mli b/pretyping/inductiveops.mli index 7ca5b8b1bb..2174bf0e96 100644 --- a/pretyping/inductiveops.mli +++ b/pretyping/inductiveops.mli @@ -72,14 +72,14 @@ val build_branch_type : exception Induc val extract_mrectype : constr -> inductive * constr list val find_mrectype : - env -> 'a evar_map -> constr -> inductive * constr list + env -> evar_map -> constr -> inductive * constr list val find_rectype : - env -> 'a evar_map -> constr -> inductive_type + env -> evar_map -> constr -> inductive_type val find_inductive : - env -> 'a evar_map -> constr -> inductive * constr list + env -> evar_map -> constr -> inductive * constr list val find_coinductive : env -> - 'a evar_map -> constr -> inductive * constr list + evar_map -> constr -> inductive * constr list val type_case_branches_with_names : env -> inductive * constr list -> unsafe_judgment -> constr -> types array * types |