Global Instance rev_eqlistA_compat : Proper (eqlistA==>eqlistA) (@rev A).

(* Specifications: *)
Lemma eqlistA_rev : forall l1 l1',
eqlistA l1 l1' -> eqlistA (rev l1) (rev l1').
Lemma SortA_equivlistA_eqlistA : forall l l',
SortA l -> SortA l' -> equivlistA l l' -> eqlistA l l'.