eqt<

Theorem.

Arguments:

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

Assertions:

((aeqb)to((alec)leftrightarrow(blec)))

Proof:

Hyp Ref Line Expr
ax-tr1((blea)to((alec)to(blec)))
ax-tr2((aleb)to((blec)to(alec)))
1, 2im.bldan<>3(((blea)wedge(aleb))to(((alec)to(blec))wedge((blec)to(alec))))
df-equ4((beqa)leftrightarrow((blea)wedge(aleb)))
dfbi5(((alec)leftrightarrow(blec))leftrightarrow(((alec)to(blec))wedge((blec)to(alec))))
3, 4, 5<imtr6((beqa)to((alec)leftrightarrow(blec)))
6eqsym7((aeqb)to((alec)leftrightarrow(blec)))