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