From dd96b1e5e8d0eb9f93cff423b6f9cf900aee49d7 Mon Sep 17 00:00:00 2001 From: Matthieu Sozeau Date: Fri, 30 May 2014 20:55:48 +0200 Subject: - Fix hashing of levels to get the "right" order in universe contexts etc... - Add a tentative syntax for specifying universes: Type{"i"} and foo@{Type{"i"},Type{"j"}}. These are always rigid. - Use level-to-level substitutions where the more general level-to-universe substitutions were previously used. --- kernel/vars.mli | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'kernel/vars.mli') diff --git a/kernel/vars.mli b/kernel/vars.mli index 9d5d16d0c..b4f616b13 100644 --- a/kernel/vars.mli +++ b/kernel/vars.mli @@ -78,7 +78,9 @@ val subst_univs_fn_puniverses : universe_level_subst_fn -> 'a puniverses -> 'a puniverses val subst_univs_constr : universe_subst -> constr -> constr + +(** Level substitutions for polymorphism. *) + val subst_univs_puniverses : universe_level_subst -> 'a puniverses -> 'a puniverses val subst_univs_level_constr : universe_level_subst -> constr -> constr - -val subst_univs_context : Univ.universe_subst -> rel_context -> rel_context +val subst_univs_level_context : Univ.universe_level_subst -> rel_context -> rel_context -- cgit v1.2.3