diff options
Diffstat (limited to 'kernel/closure.mli')
| -rw-r--r-- | kernel/closure.mli | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/kernel/closure.mli b/kernel/closure.mli index 88f9139e6e..2a0c1f89e3 100644 --- a/kernel/closure.mli +++ b/kernel/closure.mli @@ -179,8 +179,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 +(* [mind_equiv] checks whether two inductive types are intentionally equal *) +val mind_equiv : env -> inductive -> inductive -> bool +val mind_equiv_infos : clos_infos -> inductive -> inductive -> bool (************************************************************************) (*i This is for lazy debug *) |