HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
Unicode version

Theorem pw2en 4587
Description: The power set of a set is equinumerous to set exponentiation with a base of ordinal 2. Proposition 10.44 of [TakeutiZaring] p. 96. (This proof seems excessively long. An attempt to find a shorter one is on my to-do list.)
Hypothesis
Ref Expression
pw2en.1 |- A e. V
Assertion
Ref Expression
pw2en |- P~A ~~ (2o ^m A)

Proof of Theorem pw2en
StepHypRef Expression
1 pw2en.1 . . 3 |- A e. V
21pwex 2823 . 2 |- P~A e. V
31opabex2 3716 . . 3 |- {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} e. V
43a1i 8 . 2 |- (x e. P~A -> {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} e. V)
5 visset 1859 . . . . 5 |- y e. V
65cnvex 3625 . . . 4 |- `'y e. V
7 imaexg 3508 . . . 4 |- (`'y e. V -> (`'y"{{(/)}}) e. V)
86, 7ax-mp 7 . . 3 |- (`'y"{{(/)}}) e. V
98a1i 8 . 2 |- (y e. (2o ^m A) -> (`'y"{{(/)}}) e. V)
10 sseqin2 2281 . . . . . . . . 9 |- (x (_ A <-> (A i^i x) = x)
1110biimpi 149 . . . . . . . 8 |- (x (_ A -> (A i^i x) = x)
1211eqeq1d 1526 . . . . . . 7 |- (x (_ A -> ((A i^i x) = (`'y"{{(/)}}) <-> x = (`'y"{{(/)}})))
13 eleq2 1578 . . . . . . . . . 10 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (<.u, {(/)}>. e. y <-> <.u, {(/)}>. e. {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}))
14 p0ex 2828 . . . . . . . . . . . 12 |- {(/)} e. V
15 visset 1859 . . . . . . . . . . . 12 |- u e. V
1614, 15elimasn 3518 . . . . . . . . . . 11 |- (u e. (`'y"{{(/)}}) <-> <.{(/)}, u>. e. `'y)
1714, 15opelcnv 3389 . . . . . . . . . . 11 |- (<.{(/)}, u>. e. `'y <-> <.u, {(/)}>. e. y)
1816, 17bitri 171 . . . . . . . . . 10 |- (u e. (`'y"{{(/)}}) <-> <.u, {(/)}>. e. y)
1913, 18syl5bb 535 . . . . . . . . 9 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (u e. (`'y"{{(/)}}) <-> <.u, {(/)}>. e. {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}))
20 eq2ab 1616 . . . . . . . . . . . 12 |- ({v | v = (/)} = {v | (v = (/) /\ u e. x)} <-> A.v(v = (/) <-> (v = (/) /\ u e. x)))
21 df-sn 2470 . . . . . . . . . . . . 13 |- {(/)} = {v | v = (/)}
2221eqeq1i 1525 . . . . . . . . . . . 12 |- ({(/)} = {v | (v = (/) /\ u e. x)} <-> {v | v = (/)} = {v | (v = (/) /\ u e. x)})
23 iba 645 . . . . . . . . . . . . . 14 |- (u e. x -> (v = (/) <-> (v = (/) /\ u e. x)))
242319.21aiv 1324 . . . . . . . . . . . . 13 |- (u e. x -> A.v(v = (/) <-> (v = (/) /\ u e. x)))
25 0ex 2785 . . . . . . . . . . . . . . 15 |- (/) e. V
26 eqeq1 1524 . . . . . . . . . . . . . . . 16 |- (v = (/) -> (v = (/) <-> (/) = (/)))
2726anbi1d 620 . . . . . . . . . . . . . . . 16 |- (v = (/) -> ((v = (/) /\ u e. x) <-> ((/) = (/) /\ u e. x)))
2826, 27bibi12d 632 . . . . . . . . . . . . . . 15 |- (v = (/) -> ((v = (/) <-> (v = (/) /\ u e. x)) <-> ((/) = (/) <-> ((/) = (/) /\ u e. x))))
2925, 28cla4v 1914 . . . . . . . . . . . . . 14 |- (A.v(v = (/) <-> (v = (/) /\ u e. x)) -> ((/) = (/) <-> ((/) = (/) /\ u e. x)))
30 eqid 1518 . . . . . . . . . . . . . . . 16 |- (/) = (/)
3130a1bi 195 . . . . . . . . . . . . . . 15 |- (u e. x <-> ((/) = (/) -> u e. x))
32 pm4.71 638 . . . . . . . . . . . . . . 15 |- (((/) = (/) -> u e. x) <-> ((/) = (/) <-> ((/) = (/) /\ u e. x)))
3331, 32bitri 171 . . . . . . . . . . . . . 14 |- (u e. x <-> ((/) = (/) <-> ((/) = (/) /\ u e. x)))
3429, 33sylibr 198 . . . . . . . . . . . . 13 |- (A.v(v = (/) <-> (v = (/) /\ u e. x)) -> u e. x)
3524, 34impbii 155 . . . . . . . . . . . 12 |- (u e. x <-> A.v(v = (/) <-> (v = (/) /\ u e. x)))
3620, 22, 353bitr4ri 182 . . . . . . . . . . 11 |- (u e. x <-> {(/)} = {v | (v = (/) /\ u e. x)})
3736anbi2i 483 . . . . . . . . . 10 |- ((u e. A /\ u e. x) <-> (u e. A /\ {(/)} = {v | (v = (/) /\ u e. x)}))
38 elin 2259 . . . . . . . . . 10 |- (u e. (A i^i x) <-> (u e. A /\ u e. x))
39 eleq1 1577 . . . . . . . . . . . 12 |- (z = u -> (z e. A <-> u e. A))
40 eleq1 1577 . . . . . . . . . . . . . . 15 |- (z = u -> (z e. x <-> u e. x))
4140anbi2d 619 . . . . . . . . . . . . . 14 |- (z = u -> ((v = (/) /\ z e. x) <-> (v = (/) /\ u e. x)))
4241abbidv 1620 . . . . . . . . . . . . 13 |- (z = u -> {v | (v = (/) /\ z e. x)} = {v | (v = (/) /\ u e. x)})
4342eqeq2d 1529 . . . . . . . . . . . 12 |- (z = u -> (w = {v | (v = (/) /\ z e. x)} <-> w = {v | (v = (/) /\ u e. x)}))
4439, 43anbi12d 631 . . . . . . . . . . 11 |- (z = u -> ((z e. A /\ w = {v | (v = (/) /\ z e. x)}) <-> (u e. A /\ w = {v | (v = (/) /\ u e. x)})))
45 eqeq1 1524 . . . . . . . . . . . 12 |- (w = {(/)} -> (w = {v | (v = (/) /\ u e. x)} <-> {(/)} = {v | (v = (/) /\ u e. x)}))
4645anbi2d 619 . . . . . . . . . . 11 |- (w = {(/)} -> ((u e. A /\ w = {v | (v = (/) /\ u e. x)}) <-> (u e. A /\ {(/)} = {v | (v = (/) /\ u e. x)})))
4715, 14, 44, 46opelopab 2897 . . . . . . . . . 10 |- (<.u, {(/)}>. e. {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} <-> (u e. A /\ {(/)} = {v | (v = (/) /\ u e. x)}))
4837, 38, 473bitr4i 181 . . . . . . . . 9 |- (u e. (A i^i x) <-> <.u, {(/)}>. e. {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})})
4919, 48syl6rbbr 542 . . . . . . . 8 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (u e. (A i^i x) <-> u e. (`'y"{{(/)}})))
5049eqrdv 1516 . . . . . . 7 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (A i^i x) = (`'y"{{(/)}}))
5112, 50syl5cbi 207 . . . . . 6 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (x (_ A -> x = (`'y"{{(/)}})))
52 sseq1 2134 . . . . . . 7 |- (x = (`'y"{{(/)}}) -> (x (_ A <-> (`'y"{{(/)}}) (_ A))
53 imassrn 3507 . . . . . . . 8 |- (`'y"{{(/)}}) (_ ran `' y
5421, 14eqeltrri 1588 . . . . . . . . . . . . . 14 |- {v | v = (/)} e. V
55 pm3.26 317 . . . . . . . . . . . . . . 15 |- ((v = (/) /\ z e. x) -> v = (/))
5655ss2abi 2172 . . . . . . . . . . . . . 14 |- {v | (v = (/) /\ z e. x)} (_ {v | v = (/)}
5754, 56ssexi 2794 . . . . . . . . . . . . 13 |- {v | (v = (/) /\ z e. x)} e. V
58 eqid 1518 . . . . . . . . . . . . 13 |- {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}
5957, 58fnopab2 3725 . . . . . . . . . . . 12 |- {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} Fn A
60 fneq1 3688 . . . . . . . . . . . 12 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (y Fn A <-> {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} Fn A))
6159, 60mpbiri 192 . . . . . . . . . . 11 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> y Fn A)
62 fndm 3693 . . . . . . . . . . 11 |- (y Fn A -> dom y = A)
6361, 62syl 10 . . . . . . . . . 10 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> dom y = A)
64 dfdm4 3396 . . . . . . . . . 10 |- dom y = ran `' y
6563, 64syl5eqr 1564 . . . . . . . . 9 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> ran `' y = A)
6665sseq2d 2141 . . . . . . . 8 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> ((`'y"{{(/)}}) (_ ran `' y <-> (`'y"{{(/)}}) (_ A))
6753, 66mpbii 191 . . . . . . 7 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (`'y"{{(/)}}) (_ A)
6852, 67syl5cbir 209 . . . . . 6 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (x = (`'y"{{(/)}}) -> x (_ A))
6951, 68impbid 519 . . . . 5 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (x (_ A <-> x = (`'y"{{(/)}})))
70 visset 1859 . . . . . 6 |- x e. V
7170elpw 2461 . . . . 5 |- (x e. P~A <-> x (_ A)
7269, 71syl5bb 535 . . . 4 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (x e. P~A <-> x = (`'y"{{(/)}})))
7372pm5.32ri 649 . . 3 |- ((x e. P~A /\ y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}) <-> (x = (`'y"{{(/)}}) /\ y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}))
74 ancom 437 . . 3 |- ((x = (`'y"{{(/)}}) /\ y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}) <-> (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} /\ x = (`'y"{{(/)}})))
75 iba 645 . . . . . . . . . . . . 13 |- (z e. x -> (v = (/) <-> (v = (/) /\ z e. x)))
76 elsn 2479 . . . . . . . . . . . . 13 |- (v e. {(/)} <-> v = (/))
7775, 76syl5bb 535 . . . . . . . . . . . 12 |- (z e. x -> (v e. {(/)} <-> (v = (/) /\ z e. x)))
7877abbi2dv 1621 . . . . . . . . . . 11 |- (z e. x -> {(/)} = {v | (v = (/) /\ z e. x)})
7914prid2 2514 . . . . . . . . . . . 12 |- {(/)} e. {(/), {(/)}}
80 df2o2 4277 . . . . . . . . . . . 12 |- 2o = {(/), {(/)}}
8179, 80eleqtrri 1590 . . . . . . . . . . 11 |- {(/)} e. 2o
8278, 81syl6eqelr 1600 . . . . . . . . . 10 |- (z e. x -> {v | (v = (/) /\ z e. x)} e. 2o)
83 abn0 2343 . . . . . . . . . . . . 13 |- ({v | (v = (/) /\ z e. x)} =/= (/) <-> E.v(v = (/) /\ z e. x))
84 pm3.27 321 . . . . . . . . . . . . . 14 |- ((v = (/) /\ z e. x) -> z e. x)
858419.23aiv 1333 . . . . . . . . . . . . 13 |- (E.v(v = (/) /\ z e. x) -> z e. x)
8683, 85sylbi 197 . . . . . . . . . . . 12 |- ({v | (v = (/) /\ z e. x)} =/= (/) -> z e. x)
8786necon1bi 1652 . . . . . . . . . . 11 |- (-. z e. x -> {v | (v = (/) /\ z e. x)} = (/))
8825prid1 2513 . . . . . . . . . . . 12 |- (/) e. {(/), {(/)}}
8988, 80eleqtrri 1590 . . . . . . . . . . 11 |- (/) e. 2o
9087, 89syl6eqel 1599 . . . . . . . . . 10 |- (-. z e. x -> {v | (v = (/) /\ z e. x)} e. 2o)
9182, 90pm2.61i 124 . . . . . . . . 9 |- {v | (v = (/) /\ z e. x)} e. 2o
9291a1i 8 . . . . . . . 8 |- (z e. A -> {v | (v = (/) /\ z e. x)} e. 2o)
9358, 92fopab 3941 . . . . . . 7 |- {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}:A-->2o
94 feq1 3727 . . . . . . 7 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> (y:A-->2o <-> {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}:A-->2o))
9593, 94mpbiri 192 . . . . . 6 |- (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> y:A-->2o)
96 eleq2 1578 . . . . . . . . . . . . . . . . 17 |- (x = (`'y"{{(/)}}) -> (z e. x <-> z e. (`'y"{{(/)}})))
97 visset 1859 . . . . . . . . . . . . . . . . . . 19 |- z e. V
9814, 97elimasn 3518 . . . . . . . . . . . . . . . . . 18 |- (z e. (`'y"{{(/)}}) <-> <.{(/)}, z>. e. `'y)
9914, 97opelcnv 3389 . . . . . . . . . . . . . . . . . 18 |- (<.{(/)}, z>. e. `'y <-> <.z, {(/)}>. e. y)
10098, 99bitri 171 . . . . . . . . . . . . . . . . 17 |- (z e. (`'y"{{(/)}}) <-> <.z, {(/)}>. e. y)
10196, 100syl6bb 539 . . . . . . . . . . . . . . . 16 |- (x = (`'y"{{(/)}}) -> (z e. x <-> <.z, {(/)}>. e. y))
10214fnopfvb 3865 . . . . . . . . . . . . . . . . . 18 |- ((y Fn A /\ z e. A) -> ((y` z) = {(/)} <-> <.z, {(/)}>. e. y))
103 ffn 3734 . . . . . . . . . . . . . . . . . 18 |- (y:A-->2o -> y Fn A)
104102, 103sylan 450 . . . . . . . . . . . . . . . . 17 |- ((y:A-->2o /\ z e. A) -> ((y` z) = {(/)} <-> <.z, {(/)}>. e. y))
105104bicomd 524 . . . . . . . . . . . . . . . 16 |- ((y:A-->2o /\ z e. A) -> (<.z, {(/)}>. e. y <-> (y` z) = {(/)}))
106101, 105sylan9bb 543 . . . . . . . . . . . . . . 15 |- ((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) -> (z e. x <-> (y` z) = {(/)}))
107106biimpa 416 . . . . . . . . . . . . . 14 |- (((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) /\ z e. x) -> (y` z) = {(/)})
10878adantl 388 . . . . . . . . . . . . . 14 |- (((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) /\ z e. x) -> {(/)} = {v | (v = (/) /\ z e. x)})
109107, 108eqtrd 1550 . . . . . . . . . . . . 13 |- (((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) /\ z e. x) -> (y` z) = {v | (v = (/) /\ z e. x)})
110 ffvelrn 3928 . . . . . . . . . . . . . . . . . . . 20 |- ((y:A-->2o /\ z e. A) -> (y` z) e. 2o)
11180eleq2i 1581 . . . . . . . . . . . . . . . . . . . . 21 |- ((y` z) e. 2o <-> (y` z) e. {(/), {(/)}})
112 fvex 3843 . . . . . . . . . . . . . . . . . . . . . 22 |- (y` z) e. V
113112elpr 2482 . . . . . . . . . . . . . . . . . . . . 21 |- ((y` z) e. {(/), {(/)}} <-> ((y` z) = (/) \/ (y` z) = {(/)}))
114111, 113bitri 171 . . . . . . . . . . . . . . . . . . . 20 |- ((y` z) e. 2o <-> ((y` z) = (/) \/ (y` z) = {(/)}))
115110, 114sylib 196 . . . . . . . . . . . . . . . . . . 19 |- ((y:A-->2o /\ z e. A) -> ((y` z) = (/) \/ (y` z) = {(/)}))
116115ord 230 . . . . . . . . . . . . . . . . . 18 |- ((y:A-->2o /\ z e. A) -> (-. (y` z) = (/) -> (y` z) = {(/)}))
117116adantl 388 . . . . . . . . . . . . . . . . 17 |- ((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) -> (-. (y` z) = (/) -> (y` z) = {(/)}))
118117, 106sylibrd 202 . . . . . . . . . . . . . . . 16 |- ((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) -> (-. (y` z) = (/) -> z e. x))
119118con1d 93 . . . . . . . . . . . . . . 15 |- ((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) -> (-. z e. x -> (y` z) = (/)))
120119imp 348 . . . . . . . . . . . . . 14 |- (((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) /\ -. z e. x) -> (y` z) = (/))
12187adantl 388 . . . . . . . . . . . . . 14 |- (((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) /\ -. z e. x) -> {v | (v = (/) /\ z e. x)} = (/))
122120, 121eqtr4d 1553 . . . . . . . . . . . . 13 |- (((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) /\ -. z e. x) -> (y` z) = {v | (v = (/) /\ z e. x)})
123109, 122pm2.61dan 480 . . . . . . . . . . . 12 |- ((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) -> (y` z) = {v | (v = (/) /\ z e. x)})
124 fvopab2 3902 . . . . . . . . . . . . . 14 |- ((z e. A /\ {v | (v = (/) /\ z e. x)} e. V) -> ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z) = {v | (v = (/) /\ z e. x)})
12557, 124mpan2 700 . . . . . . . . . . . . 13 |- (z e. A -> ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z) = {v | (v = (/) /\ z e. x)})
126125ad2antll 407 . . . . . . . . . . . 12 |- ((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) -> ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z) = {v | (v = (/) /\ z e. x)})
127123, 126eqtr4d 1553 . . . . . . . . . . 11 |- ((x = (`'y"{{(/)}}) /\ (y:A-->2o /\ z e. A)) -> (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z))
128127exp32 377 . . . . . . . . . 10 |- (x = (`'y"{{(/)}}) -> (y:A-->2o -> (z e. A -> (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z))))
129128imp 348 . . . . . . . . 9 |- ((x = (`'y"{{(/)}}) /\ y:A-->2o) -> (z e. A -> (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z)))
130129r19.21aiv 1759 . . . . . . . 8 |- ((x = (`'y"{{(/)}}) /\ y:A-->2o) -> A.z e. A (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z))
131 ax-17 1007 . . . . . . . . . . . 12 |- (u e. y -> A.z u e. y)
132 hbopab1 2890 . . . . . . . . . . . 12 |- (u e. {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} -> A.z u e. {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})})
133131, 132eqfnfvf2 3912 . . . . . . . . . . 11 |- ((y Fn A /\ {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} Fn A) -> (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} <-> A.z e. A (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z)))
13459, 133mpan2 700 . . . . . . . . . 10 |- (y Fn A -> (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} <-> A.z e. A (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z)))
135103, 134syl 10 . . . . . . . . 9 |- (y:A-->2o -> (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} <-> A.z e. A (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z)))
136135adantl 388 . . . . . . . 8 |- ((x = (`'y"{{(/)}}) /\ y:A-->2o) -> (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} <-> A.z e. A (y` z) = ({<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}` z)))
137130, 136mpbird 194 . . . . . . 7 |- ((x = (`'y"{{(/)}}) /\ y:A-->2o) -> y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})})
138137ex 371 . . . . . 6 |- (x = (`'y"{{(/)}}) -> (y:A-->2o -> y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}))
13995, 138impbid2 521 . . . . 5 |- (x = (`'y"{{(/)}}) -> (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} <-> y:A-->2o))
140 2on 4275 . . . . . . 7 |- 2o e. On
141140elisseti 1864 . . . . . 6 |- 2o e. V
142141, 1elmap 4475 . . . . 5 |- (y e. (2o ^m A) <-> y:A-->2o)
143139, 142syl6bbr 541 . . . 4 |- (x = (`'y"{{(/)}}) -> (y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} <-> y e. (2o ^m A)))
144143pm5.32ri 649 . . 3 |- ((y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})} /\ x = (`'y"{{(/)}})) <-> (y e. (2o ^m A) /\ x = (`'y"{{(/)}})))
14573, 74, 1443bitri 175 . 2 |- ((x e. P~A /\ y = {<.z, w>. | (z e. A /\ w = {v | (v = (/) /\ z e. x)})}) <-> (y e. (2o ^m A) /\ x = (`'y"{{(/)}})))
1462, 4, 9, 145en2 4543 1 |- P~A ~~ (2o ^m A)
Colors of variables: wff set class
Syntax hints:  -. wn 2   -> wi 3   <-> wb 144   \/ wo 220   /\ wa 221  A.wal 990   = wceq 992   e. wcel 994  E.wex 1016  {cab 1505   =/= wne 1628  A.wral 1691  Vcvv 1857   i^i cin 2098   (_ wss 2099  (/)c0 2332  P~cpw 2458  {csn 2467  {cpr 2468  <.cop 2469   class class class wbr 2692  {copab 2740  Oncon0 2975  `'ccnv 3250  dom cdm 3251  ran crn 3252  "cima 3254   Fn wfn 3258  -->wf 3259  ` cfv 3263  (class class class)co 4021  2oc2o 4265   ^m cm 4463   ~~ cen 4505
This theorem is referenced by:  pwen 4650  aleph1 5021  infmap1 7785
This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 998  ax-gen 999  ax-8 1000  ax-9 1001  ax-10 1002  ax-11 1003  ax-12 1004  ax-13 1005  ax-14 1006  ax-17 1007  ax-4 1009  ax-5o 1011  ax-6o 1014  ax-9o 1159  ax-10o 1177  ax-16 1247  ax-11o 1255  ax-ext 1500  ax-rep 2767  ax-sep 2777  ax-nul 2784  ax-pow 2818  ax-pr 2855  ax-un 3089
This theorem depends on definitions:  df-bi 145  df-or 222  df-an 223  df-3or 782  df-3an 783  df-ex 1017  df-sb 1209  df-eu 1421  df-mo 1422  df-clab 1506  df-cleq 1511  df-clel 1514  df-ne 1630  df-ral 1695  df-rex 1696  df-v 1858  df-sbc 1987  df-csb 2052  df-dif 2101  df-un 2102  df-in 2103  df-ss 2105  df-nul 2333  df-pw 2459  df-sn 2470  df-pr 2471  df-tp 2473  df-op 2474  df-uni 2570  df-br 2693  df-opab 2741  df-tr 2755  df-eprel 2910  df-id 2913  df-po 2918  df-so 2929  df-fr 2947  df-we 2962  df-ord 2978  df-on 2979  df-suc 2981  df-xp 3265  df-rel 3266  df-cnv 3267  df-co 3268  df-dm 3269  df-rn 3270  df-res 3271  df-ima 3272  df-fun 3273  df-fn 3274  df-f 3275  df-f1 3276  df-fo 3277  df-f1o 3278  df-fv 3279  df-opr 4023  df-oprab 4024  df-1o 4269  df-2o 4270  df-map 4465  df-en 4509
Copyright terms: Public domain