aboutsummaryrefslogtreecommitdiff
path: root/pretyping/inductiveops.mli
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2019-05-28 13:54:26 +0200
committerPierre-Marie Pédrot2019-05-28 13:54:26 +0200
commitd4ca25df0f481345c99744acda28728c9682f0ac (patch)
treecb9c1d93a219f7d4491fd52bca61478bf5f4f531 /pretyping/inductiveops.mli
parente005f390312b8900df36aa27bc087e18701c8fcd (diff)
parent645ffc989659f2abaf1cb4949ac2ad4d748d6083 (diff)
Merge PR #10133: mind_kelim is the highest allowed sort instead of a list
Ack-by: maximedenes Reviewed-by: ppedrot
Diffstat (limited to 'pretyping/inductiveops.mli')
-rw-r--r--pretyping/inductiveops.mli4
1 files changed, 3 insertions, 1 deletions
diff --git a/pretyping/inductiveops.mli b/pretyping/inductiveops.mli
index cfc650938e..aacbecf6c7 100644
--- a/pretyping/inductiveops.mli
+++ b/pretyping/inductiveops.mli
@@ -141,7 +141,9 @@ val constructor_nrealdecls_env : env -> constructor -> int
val constructor_has_local_defs : env -> constructor -> bool
val inductive_has_local_defs : env -> inductive -> bool
-val allowed_sorts : env -> inductive -> Sorts.family list
+val sorts_below : Sorts.family -> Sorts.family list
+
+val top_allowed_sort : env -> inductive -> Sorts.family
(** (Co)Inductive records with primitive projections do not have eta-conversion,
hence no dependent elimination. *)