diff options
| author |  filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 1999-10-08 08:18:57 +0000 |
|---|---|---|
| committer | filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 1999-10-08 08:18:57 +0000 |
| commit | fd28f10096f82ef133bbf10512c8bee617b6b8b3 (patch) | |
| tree | 96892fb5b66038cef8ca48b0cc3f0383e38fc9a5 /kernel/indtypes.mli | |
| parent | 610caabdaac2f9ca635737839f645cc870d83975 (diff) | |
deplacements des var. ex. hors du noyau
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@93 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/indtypes.mli')
| -rw-r--r-- | kernel/indtypes.mli | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/kernel/indtypes.mli b/kernel/indtypes.mli index 8a200aab0..a77cc0921 100644 --- a/kernel/indtypes.mli +++ b/kernel/indtypes.mli @@ -12,12 +12,12 @@ open Environ (* [mind_check_arities] checks that the types declared for all the inductive types are some arities. *) -val mind_check_arities : 'a unsafe_env -> mutual_inductive_entry -> unit +val mind_check_arities : unsafe_env -> mutual_inductive_entry -> unit -val sort_of_arity : 'a unsafe_env -> constr -> sorts +val sort_of_arity : unsafe_env -> constr -> sorts val cci_inductive : - 'a unsafe_env -> 'a unsafe_env -> path_kind -> int -> bool -> + unsafe_env -> unsafe_env -> path_kind -> int -> bool -> (identifier * typed_type * identifier list * bool * bool * constr) list -> constraints -> mutual_inductive_body |