aboutsummaryrefslogtreecommitdiff
path: root/library
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2019-10-13 16:03:43 +0200
committerPierre-Marie Pédrot2019-10-13 16:03:43 +0200
commit564f265bfda10a2c6d4e7297dec47a14ad4b61b3 (patch)
tree17ceaf5d055c0c2a8eb02ccb364d832f5ef694a7 /library
parentcc4cddda2eb2a05f685c8404e4864ea0bcdac6eb (diff)
parent8398ec48072b0bbe5e571a8d1f1f6c1ace9270f4 (diff)
Merge PR #10670: ComAssumption cleanup
Ack-by: ejgallego Ack-by: gares Reviewed-by: ppedrot
Diffstat (limited to 'library')
-rw-r--r--library/lib.ml3
-rw-r--r--library/lib.mli2
2 files changed, 0 insertions, 5 deletions
diff --git a/library/lib.ml b/library/lib.ml
index 991e23eb3a..0d9efe2d5d 100644
--- a/library/lib.ml
+++ b/library/lib.ml
@@ -425,9 +425,6 @@ let extract_worklist info =
let sections () = Safe_typing.sections_of_safe_env @@ Global.safe_env ()
-let is_polymorphic_univ u =
- Section.is_polymorphic_univ u (sections ())
-
let replacement_context () =
Section.replacement_context (Global.env ()) (sections ())
diff --git a/library/lib.mli b/library/lib.mli
index d3315b0f2e..59d77480e9 100644
--- a/library/lib.mli
+++ b/library/lib.mli
@@ -183,8 +183,6 @@ val is_in_section : GlobRef.t -> bool
val replacement_context : unit -> Opaqueproof.work_list
-val is_polymorphic_univ : Univ.Level.t -> bool
-
(** {6 Discharge: decrease the section level if in the current section } *)
(* XXX Why can't we use the kernel functions ? *)