From b1eef69751a05eebdbdc9d3091e1dae3386218d0 Mon Sep 17 00:00:00 2001 From: coq Date: Fri, 16 Aug 2002 10:00:36 +0000 Subject: Strengthenning rules for modules + No modules in sections git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2969 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/closure.mli | 3 +++ 1 file changed, 3 insertions(+) (limited to 'kernel/closure.mli') diff --git a/kernel/closure.mli b/kernel/closure.mli index 826d58fbac..d3c5e5c59f 100644 --- a/kernel/closure.mli +++ b/kernel/closure.mli @@ -187,6 +187,9 @@ val whd_stack : (* [unfold_reference] unfolds references in a [fconstr] *) val unfold_reference : clos_infos -> table_key -> fconstr option +(* [mind_equiv] checks whether two mutual inductives are intentionally equal *) +val mind_equiv : clos_infos -> mutual_inductive -> mutual_inductive -> bool + (***********************************************************************) (*i This is for lazy debug *) -- cgit v1.2.3