(* SPECIALIZATIONS: *)

(* Specifications: *)
Lemma eqc_bottom: forall(m:fmap)(k:dim)(x:dart),
inv_hmap m -> exd m x -> eqc m x (bottom m k x).
Lemma eqc_top: forall(m:fmap)(k:dim)(x:dart),
inv_hmap m -> exd m x -> eqc m x (top m k x).