diff options
Diffstat (limited to 'src/util.mli')
| -rw-r--r-- | src/util.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/util.mli b/src/util.mli index a29bdba2..3d83a1a4 100644 --- a/src/util.mli +++ b/src/util.mli @@ -73,6 +73,9 @@ val remove_duplicates : 'a list -> 'a list (** [remove_dups compare eq l] as remove_duplicates but with parameterised comparison and equality *) val remove_dups : ('a -> 'a -> int) -> ('a -> 'a -> bool) -> 'a list -> 'a list +(** Lift a comparison order to the lexical order on lists *) +val lex_ord_list : ('a -> 'a -> int) -> 'a list -> 'a list -> int + (** [assoc_equal_opt] and [assoc_compare_opt] are like List.assoc_opt but take equality/comparison functions as arguments, rather than relying on OCaml's built in equality *) |