`sig
type ('k1, 'k2, 'd) t
val make : unit -> ('k1, 'k2, 'd) Ephemeron.K2.Bucket.t
val add : ('k1, 'k2, 'd) Ephemeron.K2.Bucket.t -> 'k1 -> 'k2 -> 'd -> unit
val remove : ('k1, 'k2, 'd) Ephemeron.K2.Bucket.t -> 'k1 -> 'k2 -> unit
val find : ('k1, 'k2, 'd) Ephemeron.K2.Bucket.t -> 'k1 -> 'k2 -> 'd option
val length : ('k1, 'k2, 'd) Ephemeron.K2.Bucket.t -> int
val clear : ('k1, 'k2, 'd) Ephemeron.K2.Bucket.t -> unit
end`