Theorem eqrelrel

Description: Extensionality principle for ordered triples (used by 2-place operations df-oprab ), analogous to eqrel . Use relrelss to express the antecedent in terms of the relation predicate. (Contributed by NM, 17-Dec-2008)

	Ref	Expression
Assertion	eqrelrel	|- ( ( A u. B ) C_ ( ( _V X. _V ) X. _V ) -> ( A = B <-> A. x A. y A. z ( <. <. x , y >. , z >. e. A <-> <. <. x , y >. , z >. e. B ) ) )

Proof

Step	Hyp	Ref	Expression
1		unss	|- ( ( A C_ ( ( _V X. _V ) X. _V ) /\ B C_ ( ( _V X. _V ) X. _V ) ) <-> ( A u. B ) C_ ( ( _V X. _V ) X. _V ) )
2		ssrelrel	|- ( A C_ ( ( _V X. _V ) X. _V ) -> ( A C_ B <-> A. x A. y A. z ( <. <. x , y >. , z >. e. A -> <. <. x , y >. , z >. e. B ) ) )
3		ssrelrel	|- ( B C_ ( ( _V X. _V ) X. _V ) -> ( B C_ A <-> A. x A. y A. z ( <. <. x , y >. , z >. e. B -> <. <. x , y >. , z >. e. A ) ) )
4	2 3	bi2anan9	|- ( ( A C_ ( ( _V X. _V ) X. _V ) /\ B C_ ( ( _V X. _V ) X. _V ) ) -> ( ( A C_ B /\ B C_ A ) <-> ( A. x A. y A. z ( <. <. x , y >. , z >. e. A -> <. <. x , y >. , z >. e. B ) /\ A. x A. y A. z ( <. <. x , y >. , z >. e. B -> <. <. x , y >. , z >. e. A ) ) ) )
5		eqss	|- ( A = B <-> ( A C_ B /\ B C_ A ) )
6		2albiim	|- ( A. y A. z ( <. <. x , y >. , z >. e. A <-> <. <. x , y >. , z >. e. B ) <-> ( A. y A. z ( <. <. x , y >. , z >. e. A -> <. <. x , y >. , z >. e. B ) /\ A. y A. z ( <. <. x , y >. , z >. e. B -> <. <. x , y >. , z >. e. A ) ) )
7	6	albii	|- ( A. x A. y A. z ( <. <. x , y >. , z >. e. A <-> <. <. x , y >. , z >. e. B ) <-> A. x ( A. y A. z ( <. <. x , y >. , z >. e. A -> <. <. x , y >. , z >. e. B ) /\ A. y A. z ( <. <. x , y >. , z >. e. B -> <. <. x , y >. , z >. e. A ) ) )
8		19.26	|- ( A. x ( A. y A. z ( <. <. x , y >. , z >. e. A -> <. <. x , y >. , z >. e. B ) /\ A. y A. z ( <. <. x , y >. , z >. e. B -> <. <. x , y >. , z >. e. A ) ) <-> ( A. x A. y A. z ( <. <. x , y >. , z >. e. A -> <. <. x , y >. , z >. e. B ) /\ A. x A. y A. z ( <. <. x , y >. , z >. e. B -> <. <. x , y >. , z >. e. A ) ) )
9	7 8	bitri	|- ( A. x A. y A. z ( <. <. x , y >. , z >. e. A <-> <. <. x , y >. , z >. e. B ) <-> ( A. x A. y A. z ( <. <. x , y >. , z >. e. A -> <. <. x , y >. , z >. e. B ) /\ A. x A. y A. z ( <. <. x , y >. , z >. e. B -> <. <. x , y >. , z >. e. A ) ) )
10	4 5 9	3bitr4g	|- ( ( A C_ ( ( _V X. _V ) X. _V ) /\ B C_ ( ( _V X. _V ) X. _V ) ) -> ( A = B <-> A. x A. y A. z ( <. <. x , y >. , z >. e. A <-> <. <. x , y >. , z >. e. B ) ) )
11	1 10	sylbir	|- ( ( A u. B ) C_ ( ( _V X. _V ) X. _V ) -> ( A = B <-> A. x A. y A. z ( <. <. x , y >. , z >. e. A <-> <. <. x , y >. , z >. e. B ) ) )