End Hashtable.

(* Specifications: *)
Lemma sepcon_rebase : forall l m, 0 <= m <= Zlength l ->
fold_right sepcon emp l = fold_right sepcon emp (rebase l m).
Lemma rebase_map : forall {A B} (f : A -> B) l m, rebase (map f l) m = map f (rebase l m).