This is an inofficial mirror of http://metamath.tirix.org for personal testing of a visualizer extension only.

Metamath Proof Explorer

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 ) ) )