napply (refl_eq ??).
nqed.
-nlemma bsymmetric_eqpair :
+nlemma symmetric_eqpair :
∀T1,T2:Type.∀p1,p2:ProdT T1 T2.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.
(symmetricT T1 bool f1) →
napply (refl_eq ??).
nqed.
-nlemma bsymmetric_eqtriple :
+nlemma symmetric_eqtriple :
∀T1,T2,T3:Type.∀p1,p2:Prod3T T1 T2 T3.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.
(symmetricT T1 bool f1) →
napply (refl_eq ??).
nqed.
-nlemma bsymmetric_eqquadruple :
+nlemma symmetric_eqquadruple :
∀T1,T2,T3,T4:Type.∀p1,p2:Prod4T T1 T2 T3 T4.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.
(symmetricT T1 bool f1) →
napply (refl_eq ??).
nqed.
-nlemma bsymmetric_eqquintuple :
+nlemma symmetric_eqquintuple :
∀T1,T2,T3,T4,T5:Type.∀p1,p2:Prod5T T1 T2 T3 T4 T5.
∀f1:T1 → T1 → bool.∀f2:T2 → T2 → bool.∀f3:T3 → T3 → bool.∀f4:T4 → T4 → bool.∀f5:T5 → T5 → bool.
(symmetricT T1 bool f1) →