aboutsummaryrefslogtreecommitdiff
path: root/interp/notation_ops.mli
diff options
context:
space:
mode:
Diffstat (limited to 'interp/notation_ops.mli')
-rw-r--r--interp/notation_ops.mli5
1 files changed, 5 insertions, 0 deletions
diff --git a/interp/notation_ops.mli b/interp/notation_ops.mli
index 0d4bdf3e85..9d451a5bb9 100644
--- a/interp/notation_ops.mli
+++ b/interp/notation_ops.mli
@@ -16,6 +16,11 @@ open Glob_term
val eq_notation_constr : Id.t list * Id.t list -> notation_constr -> notation_constr -> bool
+val strictly_finer_notation_constr : Id.t list * Id.t list -> notation_constr -> notation_constr -> bool
+(** Tell if [t1] is a strict refinement of [t2]
+ (this is a partial order and returning [false] does not mean that
+ [t2] is finer than [t1]) *)
+
(** Substitution of kernel names in interpretation data *)
val subst_interpretation :