eqt>p

Theorem.

Arguments:

a (obj), b (obj), c (obj),

Assertions:

((aeqb)to((clta)leftrightarrow(cltb)))

Proof:

Hyp Ref Line Expr
eqt>n1((aeqb)to((cnea)leftrightarrow(cneb)))
eqt>2((aeqb)to((clea)leftrightarrow(cleb)))
1, 2bi.bldan<>d3((aeqb)to(((clea)wedge(cnea))leftrightarrow((cleb)wedge(cneb))))
df-psub4((clta)leftrightarrow((clea)wedge(cnea)))
df-psub5((cltb)leftrightarrow((cleb)wedge(cneb)))
3, 4, 5<2bitrg6((aeqb)to((clta)leftrightarrow(cltb)))