diff options
| author |  Matthieu Sozeau <mattam@mattam.org> | 2014-05-30 21:55:24 +0200 |
|---|---|---|
| committer | Matthieu Sozeau <mattam@mattam.org> | 2014-06-04 15:48:31 +0200 |
| commit | 86c6649382bb9e42281ffe956c627c6d3987559b (patch) | |
| tree | 7d42f94d33c2ac2e4241ce92014abc0785aed6ca /checker/inductive.mli | |
| parent | dd96b1e5e8d0eb9f93cff423b6f9cf900aee49d7 (diff) | |
- Force every universe level to be >= Prop, so one cannot "go under" it anymore.
- Finish the change to level-to-level substitutions, in the checker.
Diffstat (limited to 'checker/inductive.mli')
| -rw-r--r-- | checker/inductive.mli | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/checker/inductive.mli b/checker/inductive.mli index e223af0c9..dfdda3179 100644 --- a/checker/inductive.mli +++ b/checker/inductive.mli @@ -22,7 +22,8 @@ type mind_specif = mutual_inductive_body * one_inductive_body Raises [Not_found] if the inductive type is not found. *) val lookup_mind_specif : env -> inductive -> mind_specif -val make_inductive_subst : mutual_inductive_body -> Univ.universe_instance -> Univ.universe_subst +val make_inductive_subst : mutual_inductive_body -> Univ.universe_instance -> + Univ.universe_level_subst val inductive_instance : mutual_inductive_body -> Univ.universe_instance val type_of_inductive : env -> mind_specif puniverses -> constr |