let remove t key = match Hashtbl.find t.tbl key with | None -> () | Some el -> Hashtbl.remove t.tbl key; Heap.remove el