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