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