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/term.ml | |
| 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/term.ml')
| -rw-r--r-- | checker/term.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/checker/term.ml b/checker/term.ml index ad26c5edc..0f8aa804f 100644 --- a/checker/term.ml +++ b/checker/term.ml @@ -478,5 +478,5 @@ let subst_univs_level_constr subst c = let c' = aux c in if !changed then c' else c -let subst_univs_context s = - map_rel_context (subst_univs_constr s) +let subst_univs_level_context s = + map_rel_context (subst_univs_level_constr s) |