(* *********************************************************************** *)
(** * Hints for [equiv] *)

Hint Extern 0 (?x === ?x) => reflexivity.

(* Specifications: *)
Lemma equiv_reflexive' : forall (A : Type) `{EqDec A} (x : A), x === x.
Lemma equiv_symmetric' : forall (A : Type) `{EqDec A} (x y : A), x === y -> y === x.
Lemma equiv_transitive' : forall (A : Type) `{EqDec A} (x y z : A), x === y -> y === z -> x === z.
Lemma equiv_decidable : forall (A : Type) `{EqDec A} (x y : A), decidable (x === y).