diff options
| author | herbelin | 2006-03-29 21:21:52 +0000 |
|---|---|---|
| committer | herbelin | 2006-03-29 21:21:52 +0000 |
| commit | e7c20952e90d4f70ae84ab60b6aab62691c18aa0 (patch) | |
| tree | def5eed04feeb6d147f0c91a619fe8a519527179 /kernel/inductive.mli | |
| parent | 6f3b7eb486426ef8104b9b958088315342845795 (diff) | |
Inductifs avec polymorphisme de sorte (version initiale)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8673 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/inductive.mli')
| -rw-r--r-- | kernel/inductive.mli | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/kernel/inductive.mli b/kernel/inductive.mli index f419bc3fab..a0ff0cefba 100644 --- a/kernel/inductive.mli +++ b/kernel/inductive.mli @@ -69,3 +69,17 @@ val scrape_mind : env -> mutual_inductive -> mutual_inductive (*s Guard conditions for fix and cofix-points. *) val check_fix : env -> fixpoint -> unit val check_cofix : env -> cofixpoint -> unit + +(*s Support for sort-polymorphic inductive types *) + +val constructor_instances : env -> mind_specif -> inductive -> + constr array -> env * types array array * universe array + +val set_inductive_level : env -> sorts -> types -> types + +val find_inductive_level : env -> mind_specif -> inductive -> + universe array -> universe array -> sorts + +val is_small_inductive : mind_specif -> bool + +val max_inductive_sort : sorts array -> universe |