let find_pop t key = match Hashtbl.find t.tbl key with | None -> None | Some el -> let (_k, v) = Heap.heap_el_get_el el in Hashtbl.remove t.tbl key; Heap.remove el; Some v