Theorem zfcndrep 6118

Description: Axiom of Replacement ax-rep 3428, reproved from conditionless ZFC axioms.

Assertion

Ref	Expression
zfcndrep	|- (A.wE.yA.z(A.yph -> z = y) -> E.yA.z(z e. y <-> E.w(w e. x /\ A.yph)))

Distinct variable group:   x,y,z,w

Proof of Theorem zfcndrep

Step	Hyp	Ref	Expression
1		hbe1 1363	. . . . . 6 |- (E.yA.z(A.yph -> z = y) -> A.yE.yA.z(A.yph -> z = y))
2		ax-17 1317	. . . . . . . 8 |- (z e. w -> A.y z e. w)
3		ax-17 1317	. . . . . . . . . 10 |- (w e. x -> A.y w e. x)
4		hba1 1350	. . . . . . . . . 10 |- (A.yA.yph -> A.yA.yA.yph)
5	3, 4	hban 1356	. . . . . . . . 9 |- ((w e. x /\ A.yA.yph) -> A.y(w e. x /\ A.yA.yph))
6	5	hbex 1353	. . . . . . . 8 |- (E.w(w e. x /\ A.yA.yph) -> A.yE.w(w e. x /\ A.yA.yph))
7	2, 6	hbbi 1357	. . . . . . 7 |- ((z e. w <-> E.w(w e. x /\ A.yA.yph)) -> A.y(z e. w <-> E.w(w e. x /\ A.yA.yph)))
8	7	hbal 1352	. . . . . 6 |- (A.z(z e. w <-> E.w(w e. x /\ A.yA.yph)) -> A.yA.z(z e. w <-> E.w(w e. x /\ A.yA.yph)))
9	1, 8	hbim 1354	. . . . 5 |- ((E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph))) -> A.y(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph))))
10	9	hbex 1353	. . . 4 |- (E.w(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph))) -> A.yE.w(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph))))
11		elequ2 1497	. . . . . . . . . 10 |- (y = x -> (w e. y <-> w e. x))
12	11	anbi1d 679	. . . . . . . . 9 |- (y = x -> ((w e. y /\ A.yA.yph) <-> (w e. x /\ A.yA.yph)))
13	12	exbidv 1657	. . . . . . . 8 |- (y = x -> (E.w(w e. y /\ A.yA.yph) <-> E.w(w e. x /\ A.yA.yph)))
14	13	bibi2d 680	. . . . . . 7 |- (y = x -> ((z e. w <-> E.w(w e. y /\ A.yA.yph)) <-> (z e. w <-> E.w(w e. x /\ A.yA.yph))))
15	14	albidv 1656	. . . . . 6 |- (y = x -> (A.z(z e. w <-> E.w(w e. y /\ A.yA.yph)) <-> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph))))
16	15	imbi2d 674	. . . . 5 |- (y = x -> ((E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. y /\ A.yA.yph))) <-> (E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph)))))
17	16	exbidv 1657	. . . 4 |- (y = x -> (E.w(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. y /\ A.yA.yph))) <-> E.w(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph)))))
18		axrepnd 6098	. . . . 5 |- E.w(E.yA.z(A.yph -> z = y) -> A.z(A.y z e. w <-> E.w(A.z w e. y /\ A.yA.yph)))
19	2	19.3 1378	. . . . . . . . 9 |- (A.y z e. w <-> z e. w)
20		ax-17 1317	. . . . . . . . . . . 12 |- (w e. y -> A.z w e. y)
21	20	19.3 1378	. . . . . . . . . . 11 |- (A.z w e. y <-> w e. y)
22	21	anbi1i 539	. . . . . . . . . 10 |- ((A.z w e. y /\ A.yA.yph) <-> (w e. y /\ A.yA.yph))
23	22	exbii 1398	. . . . . . . . 9 |- (E.w(A.z w e. y /\ A.yA.yph) <-> E.w(w e. y /\ A.yA.yph))
24	19, 23	bibi12i 672	. . . . . . . 8 |- ((A.y z e. w <-> E.w(A.z w e. y /\ A.yA.yph)) <-> (z e. w <-> E.w(w e. y /\ A.yA.yph)))
25	24	albii 1346	. . . . . . 7 |- (A.z(A.y z e. w <-> E.w(A.z w e. y /\ A.yA.yph)) <-> A.z(z e. w <-> E.w(w e. y /\ A.yA.yph)))
26	25	imbi2i 202	. . . . . 6 |- ((E.yA.z(A.yph -> z = y) -> A.z(A.y z e. w <-> E.w(A.z w e. y /\ A.yA.yph))) <-> (E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. y /\ A.yA.yph))))
27	26	exbii 1398	. . . . 5 |- (E.w(E.yA.z(A.yph -> z = y) -> A.z(A.y z e. w <-> E.w(A.z w e. y /\ A.yA.yph))) <-> E.w(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. y /\ A.yA.yph))))
28	18, 27	mpbi 206	. . . 4 |- E.w(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. y /\ A.yA.yph)))
29	10, 17, 28	chvar 1530	. . 3 |- E.w(E.yA.z(A.yph -> z = y) -> A.z(z e. w <-> E.w(w e. x /\ A.yA.yph)))
30	29	19.35i 1427	. 2 |- (A.wE.yA.z(A.yph -> z = y) -> E.wA.z(z e. w <-> E.w(w e. x /\ A.yA.yph)))
31		ax-17 1317	. . . . 5 |- (z e. y -> A.w z e. y)
32		hbe1 1363	. . . . 5 |- (E.w(w e. x /\ A.yph) -> A.wE.w(w e. x /\ A.yph))
33	31, 32	hbbi 1357	. . . 4 |- ((z e. y <-> E.w(w e. x /\ A.yph)) -> A.w(z e. y <-> E.w(w e. x /\ A.yph)))
34	33	hbal 1352	. . 3 |- (A.z(z e. y <-> E.w(w e. x /\ A.yph)) -> A.wA.z(z e. y <-> E.w(w e. x /\ A.yph)))
35		elequ2 1497	. . . . 5 |- (w = y -> (z e. w <-> z e. y))
36		hba1 1350	. . . . . . . . 9 |- (A.yph -> A.yA.yph)
37	36	19.3 1378	. . . . . . . 8 |- (A.yA.yph <-> A.yph)
38	37	anbi2i 538	. . . . . . 7 |- ((w e. x /\ A.yA.yph) <-> (w e. x /\ A.yph))
39	38	exbii 1398	. . . . . 6 |- (E.w(w e. x /\ A.yA.yph) <-> E.w(w e. x /\ A.yph))
40	39	a1i 8	. . . . 5 |- (w = y -> (E.w(w e. x /\ A.yA.yph) <-> E.w(w e. x /\ A.yph)))
41	35, 40	bibi12d 691	. . . 4 |- (w = y -> ((z e. w <-> E.w(w e. x /\ A.yA.yph)) <-> (z e. y <-> E.w(w e. x /\ A.yph))))
42	41	albidv 1656	. . 3 |- (w = y -> (A.z(z e. w <-> E.w(w e. x /\ A.yA.yph)) <-> A.z(z e. y <-> E.w(w e. x /\ A.yph))))
43	8, 34, 42	cbvex 1529	. 2 |- (E.wA.z(z e. w <-> E.w(w e. x /\ A.yA.yph)) <-> E.yA.z(z e. y <-> E.w(w e. x /\ A.yph)))
44	30, 43	sylib 215	1 |- (A.wE.yA.z(A.yph -> z = y) -> E.yA.z(z e. y <-> E.w(w e. x /\ A.yph)))

Syntax hints:   -> wi 3   <-> wb 163   /\ wa 240  A.wal 1296   = wceq 1298   e. wcel 1300  E.wex 1326

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 1304  ax-gen 1305  ax-8 1306  ax-9 1307  ax-10 1308  ax-11 1309  ax-12 1310  ax-13 1311  ax-14 1312  ax-17 1317  ax-4 1319  ax-5o 1321  ax-6o 1324  ax-9o 1481  ax-10o 1500  ax-16 1580  ax-11o 1588  ax-15 1751  ax-ext 1865  ax-rep 3428  ax-sep 3438  ax-nul 3445  ax-pow 3481  ax-reg 5695

This theorem depends on definitions:  df-bi 164  df-or 241  df-an 242  df-ex 1327  df-sb 1536  df-clab 1872  df-cleq 1877  df-clel 1880  df-ne 2019  df-ral 2109  df-rex 2110  df-v 2294  df-dif 2597  df-in 2603  df-ss 2605  df-nul 2876  df-pw 3035  df-sn 3049

Copyright terms: Public domain