Instance list_EqDec (A : Set) (dA : EqDec A) : EqDec (list A).

Theorem eqbPair_symm : forall (A B : Set)(eqda : EqDec A)(eqdb : EqDec B) (p1 p2 : (A * B)), eqbPair _ _ p1 p2 = eqbPair _ _ p2 p1.