(* Face equivalence: *)

Definition eqf(m:fmap)(x y:dart):=
  expf m x y \/ expf m y x.

(* Specifications: *)
Lemma refl_eqf : forall (m:fmap)(x:dart), exd m x -> eqf m x x.
Lemma symm_eqf : forall (m:fmap)(x y:dart), eqf m x y -> eqf m y x.
Lemma trans_eqf : forall (m:fmap), inv_qhmap m -> forall (x y z:dart), eqf m x y -> eqf m y z -> eqf m x z.
Lemma eqf_dec : forall (m:fmap)(x y:dart), {eqf m x y} + {~eqf m x y}.