sig
  val ( |> ) : ('a, 'b) Core_hashtbl.t -> 'a -> 'b
  val ( |?> ) : ('a, 'b) Core_hashtbl.t -> 'a -> 'b option
  val ( <| ) : ('a, 'b) Core_hashtbl.t -> 'a * 'b -> unit
end