eqt<p

Theorem.

Arguments:

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

Assertions:

((aeqb)to((altc)leftrightarrow(bltc)))

Proof:

Hyp Ref Line Expr
eqt<n1((aeqb)to((anec)leftrightarrow(bnec)))
eqt<2((aeqb)to((alec)leftrightarrow(blec)))
1, 2bi.bldan<>d3((aeqb)to(((alec)wedge(anec))leftrightarrow((blec)wedge(bnec))))
df-psub4((altc)leftrightarrow((alec)wedge(anec)))
df-psub5((bltc)leftrightarrow((blec)wedge(bnec)))
3, 4, 5<2bitrg6((aeqb)to((altc)leftrightarrow(bltc)))