aboutsummaryrefslogtreecommitdiff
path: root/pretyping/classops.mli
diff options
context:
space:
mode:
Diffstat (limited to 'pretyping/classops.mli')
-rw-r--r--pretyping/classops.mli5
1 files changed, 2 insertions, 3 deletions
diff --git a/pretyping/classops.mli b/pretyping/classops.mli
index aa0cca3dc9..07f1623f83 100644
--- a/pretyping/classops.mli
+++ b/pretyping/classops.mli
@@ -14,7 +14,6 @@ open Decl_kinds
open Term
open Evd
open Environ
-open Declare
open Nametab
(*i*)
@@ -26,6 +25,8 @@ type cl_typ =
| CL_CONST of constant
| CL_IND of inductive
+val subst_cl_typ : substitution -> cl_typ -> cl_typ
+
(* This is the type of infos for declared classes *)
type cl_info_typ = {
cl_strength : strength;
@@ -66,8 +67,6 @@ val inductive_class_of : inductive -> cl_index
val class_args_of : constr -> constr list
-val strength_of_cl : cl_typ -> strength
-
(*s [declare_coercion] adds a coercion in the graph of coercion paths *)
val declare_coercion :
coe_typ -> unsafe_judgment -> strength -> isid:bool ->