From e7d592ada2d681876d2bcf0a45d4267b3746064f Mon Sep 17 00:00:00 2001 From: herbelin Date: Wed, 14 Feb 2001 15:41:55 +0000 Subject: Mise en place d'un système optionnel de discharge immédiat; prise en compte des défs locales dans les arguments des inductifs; nettoyage divers MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1381 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/indtypes.mli | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'kernel/indtypes.mli') diff --git a/kernel/indtypes.mli b/kernel/indtypes.mli index be97f5249..d0e3a4cb0 100644 --- a/kernel/indtypes.mli +++ b/kernel/indtypes.mli @@ -42,8 +42,9 @@ val mind_check_wellformed : env -> mutual_inductive_entry -> unit (* [cci_inductive] checks positivity and builds an inductive body *) val cci_inductive : - env -> env -> path_kind -> bool -> - (int * identifier * types * identifier list * bool * bool * types array) + (identifier * variable_path) list -> env -> env -> path_kind -> bool -> + (Sign.rel_context * int * identifier * types * + identifier list * bool * bool * types array) list -> constraints -> mutual_inductive_body -- cgit v1.2.3