diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-10-11 20:03:48 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-10-11 20:03:48 +0000 |
| commit | 6617dfae5110021b28e565fb3ea5b0d58fb9c14a (patch) | |
| tree | 3d4229a3eb3a1a5e0fe669d5a95794afb0af0143 /kernel/declarations.mli | |
| parent | 7f7fa0184ea32c81e77d34683bca8e456b80a19a (diff) | |
Ajout mind_arities_env
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@694 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/declarations.mli')
| -rw-r--r-- | kernel/declarations.mli | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/kernel/declarations.mli b/kernel/declarations.mli index 0c8b15e3c..65f70e277 100644 --- a/kernel/declarations.mli +++ b/kernel/declarations.mli @@ -77,6 +77,8 @@ val mind_user_lc : one_inductive_body -> typed_type array val mind_user_arity : one_inductive_body -> typed_type val mind_nth_type_packet : mutual_inductive_body -> int -> one_inductive_body +val mind_arities_context : mutual_inductive_body -> rel_declaration list + (*s Declaration of inductive types. *) type mutual_inductive_entry = { |