Theorem iunpw 2904

Description: The power class of an intersection in terms of indexed intersection. Part of Exercise 24(b) of [Enderton] p. 33.

Hypothesis

Ref	Expression
iunpw.1	|- A e. V

Assertion

Ref	Expression
iunpw	|- (E.x e. A x = U.A <-> P~U.A = U_x e. A P~x)

Distinct variable group:   x,A

Proof of Theorem iunpw

Step	Hyp	Ref	Expression
1		sseq2 2073	. . . . . . . 8 |- (x = U.A -> (y (_ x <-> y (_ U.A))
2	1	biimprcd 156	. . . . . . 7 |- (y (_ U.A -> (x = U.A -> y (_ x))
3	2	r19.22sdv 1730	. . . . . 6 |- (y (_ U.A -> (E.x e. A x = U.A -> E.x e. A y (_ x))
4	3	com12 11	. . . . 5 |- (E.x e. A x = U.A -> (y (_ U.A -> E.x e. A y (_ x))
5		ssiun 2582	. . . . . 6 |- (E.x e. A y (_ x -> y (_ U_x e. A x)
6		uniiun 2591	. . . . . 6 |- U.A = U_x e. A x
7	5, 6	syl6ssr 2098	. . . . 5 |- (E.x e. A y (_ x -> y (_ U.A)
8	4, 7	impbid1 515	. . . 4 |- (E.x e. A x = U.A -> (y (_ U.A <-> E.x e. A y (_ x))
9		visset 1804	. . . . 5 |- y e. V
10	9	elpw 2394	. . . 4 |- (y e. P~U.A <-> y (_ U.A)
11		eliun 2560	. . . . 5 |- (y e. U_x e. A P~x <-> E.x e. A y e. P~x)
12		df-pw 2392	. . . . . . 7 |- P~x = {y | y (_ x}
13	12	abeq2i 1562	. . . . . 6 |- (y e. P~x <-> y (_ x)
14	13	rexbii 1660	. . . . 5 |- (E.x e. A y e. P~x <-> E.x e. A y (_ x)
15	11, 14	bitr 173	. . . 4 |- (y e. U_x e. A P~x <-> E.x e. A y (_ x)
16	8, 10, 15	3bitr4g 553	. . 3 |- (E.x e. A x = U.A -> (y e. P~U.A <-> y e. U_x e. A P~x))
17	16	eqrdv 1466	. 2 |- (E.x e. A x = U.A -> P~U.A = U_x e. A P~x)
18		ssid 2070	. . . . 5 |- U.A (_ U.A
19		eleq2 1527	. . . . . 6 |- (P~U.A = U_x e. A P~x -> (U.A e. P~U.A <-> U.A e. U_x e. A P~x))
20		iunpw.1	. . . . . . . 8 |- A e. V
21	20	uniex 2861	. . . . . . 7 |- U.A e. V
22	21	elpw 2394	. . . . . 6 |- (U.A e. P~U.A <-> U.A (_ U.A)
23	19, 22	syl5bbr 532	. . . . 5 |- (P~U.A = U_x e. A P~x -> (U.A (_ U.A <-> U.A e. U_x e. A P~x))
24	18, 23	mpbii 193	. . . 4 |- (P~U.A = U_x e. A P~x -> U.A e. U_x e. A P~x)
25		eliun 2560	. . . 4 |- (U.A e. U_x e. A P~x <-> E.x e. A U.A e. P~x)
26	24, 25	sylib 198	. . 3 |- (P~U.A = U_x e. A P~x -> E.x e. A U.A e. P~x)
27		elssuni 2516	. . . . . . 7 |- (x e. A -> x (_ U.A)
28		elpwi 2396	. . . . . . 7 |- (U.A e. P~x -> U.A (_ x)
29	27, 28	anim12i 333	. . . . . 6 |- ((x e. A /\ U.A e. P~x) -> (x (_ U.A /\ U.A (_ x))
30		eqss 2067	. . . . . 6 |- (x = U.A <-> (x (_ U.A /\ U.A (_ x))
31	29, 30	sylibr 200	. . . . 5 |- ((x e. A /\ U.A e. P~x) -> x = U.A)
32	31	ex 373	. . . 4 |- (x e. A -> (U.A e. P~x -> x = U.A))
33	32	r19.22i 1724	. . 3 |- (E.x e. A U.A e. P~x -> E.x e. A x = U.A)
34	26, 33	syl 10	. 2 |- (P~U.A = U_x e. A P~x -> E.x e. A x = U.A)
35	17, 34	impbi 157	1 |- (E.x e. A x = U.A <-> P~U.A = U_x e. A P~x)

Syntax hints:   <-> wb 146   /\ wa 223   = wceq 953   e. wcel 955  E.wrex 1638  Vcvv 1802   (_ wss 2037  P~cpw 2391  U.cuni 2493  U_ciun 2556

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 959  ax-gen 960  ax-8 961  ax-10 963  ax-12 965  ax-13 966  ax-14 967  ax-17 968  ax-4 970  ax-5o 972  ax-6o 975  ax-9o 1119  ax-10o 1136  ax-16 1206  ax-11o 1213  ax-ext 1452  ax-sep 2693  ax-un 2857

This theorem depends on definitions:  df-bi 147  df-or 224  df-an 225  df-ex 978  df-sb 1168  df-clab 1457  df-cleq 1462  df-clel 1465  df-ral 1641  df-rex 1642  df-v 1803  df-in 2041  df-ss 2043  df-pw 2392  df-uni 2494  df-iun 2558

Copyright terms: Public domain