Theorem 2gencl 1366

Description: Implicit substitution for class with embedded variable.

Hypotheses

Ref	Expression
2gencl.1	|- (C e. S <-> E.x(x e. R /\ A = C))
2gencl.2	|- (D e. S <-> E.y(y e. R /\ B = D))
2gencl.3	|- (A = C -> (ph <-> ps))
2gencl.4	|- (B = D -> (ps <-> ch))
2gencl.5	|- ((x e. R /\ y e. R) -> ph)

Assertion

Ref	Expression
2gencl	|- ((C e. S /\ D e. S) -> ch)

Distinct variable group(s):   x,y   x,R   ps,x   y,C   y,S   ch,y

Proof of Theorem 2gencl

Step	Hyp	Ref	Expression
1		2gencl.2	. . . 4 |- (D e. S <-> E.y(y e. R /\ B = D))
2		2gencl.4	. . . . 5 |- (B = D -> (ps <-> ch))
3	2	imbi2d 464	. . . 4 |- (B = D -> ((C e. S -> ps) <-> (C e. S -> ch)))
4		2gencl.1	. . . . . 6 |- (C e. S <-> E.x(x e. R /\ A = C))
5		2gencl.3	. . . . . . 7 |- (A = C -> (ph <-> ps))
6	5	imbi2d 464	. . . . . 6 |- (A = C -> ((y e. R -> ph) <-> (y e. R -> ps)))
7		2gencl.5	. . . . . . 7 |- ((x e. R /\ y e. R) -> ph)
8	7	exp 291	. . . . . 6 |- (x e. R -> (y e. R -> ph))
9	4, 6, 8	gencl 1365	. . . . 5 |- (C e. S -> (y e. R -> ps))
10	9	com12 13	. . . 4 |- (y e. R -> (C e. S -> ps))
11	1, 3, 10	gencl 1365	. . 3 |- (D e. S -> (C e. S -> ch))
12	11	com12 13	. 2 |- (C e. S -> (D e. S -> ch))
13	12	imp 277	1 |- ((C e. S /\ D e. S) -> ch)

Syntax hints:   -> wi 2   <-> wb 127   /\ wa 196  E.wex 678   = wceq 1091   e. wcel 1092

This theorem is referenced by:  3gencl 1367  axaddrcl 4067  axmulrcl 4069  axmulgt0 4086

This theorem was proved from axioms:  ax-1 3  ax-2 4  ax-3 5  ax-mp 6  ax-4 673  ax-5 674  ax-6 675  ax-gen 677  ax-17 925

This theorem depends on definitions:  df-bi 128  df-an 198  df-ex 679

metamath.org