Module Bin_shape_lib.Core_fragment.List.Assoc

val find : ('a * 'b) list ‑> equal:('a ‑> 'c ‑> bool) ‑> 'c ‑> 'b option