MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  infpwfien Structured version   Visualization version   GIF version

Theorem infpwfien 10059
Description: Any infinite well-orderable set is equinumerous to its set of finite subsets. (Contributed by Mario Carneiro, 18-May-2015.)
Assertion
Ref Expression
infpwfien ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰ˆ 𝐴)

Proof of Theorem infpwfien
Dummy variables π‘š 𝑛 π‘₯ 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 infxpidm2 10014 . . . . . . 7 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝐴 Γ— 𝐴) β‰ˆ 𝐴)
2 infn0 9309 . . . . . . . 8 (Ο‰ β‰Ό 𝐴 β†’ 𝐴 β‰  βˆ…)
32adantl 480 . . . . . . 7 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ 𝐴 β‰  βˆ…)
4 fseqen 10024 . . . . . . 7 (((𝐴 Γ— 𝐴) β‰ˆ 𝐴 ∧ 𝐴 β‰  βˆ…) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰ˆ (Ο‰ Γ— 𝐴))
51, 3, 4syl2anc 582 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰ˆ (Ο‰ Γ— 𝐴))
6 xpdom1g 9071 . . . . . . 7 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (Ο‰ Γ— 𝐴) β‰Ό (𝐴 Γ— 𝐴))
7 domentr 9011 . . . . . . 7 (((Ο‰ Γ— 𝐴) β‰Ό (𝐴 Γ— 𝐴) ∧ (𝐴 Γ— 𝐴) β‰ˆ 𝐴) β†’ (Ο‰ Γ— 𝐴) β‰Ό 𝐴)
86, 1, 7syl2anc 582 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (Ο‰ Γ— 𝐴) β‰Ό 𝐴)
9 endomtr 9010 . . . . . 6 ((βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰ˆ (Ο‰ Γ— 𝐴) ∧ (Ο‰ Γ— 𝐴) β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴)
105, 8, 9syl2anc 582 . . . . 5 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴)
11 numdom 10035 . . . . 5 ((𝐴 ∈ dom card ∧ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∈ dom card)
1210, 11syldan 589 . . . 4 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∈ dom card)
13 eliun 5000 . . . . . . . . 9 (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↔ βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛))
14 elmapi 8845 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (𝐴 ↑m 𝑛) β†’ π‘₯:π‘›βŸΆπ΄)
1514ad2antll 725 . . . . . . . . . . . . . 14 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ π‘₯:π‘›βŸΆπ΄)
1615frnd 6724 . . . . . . . . . . . . 13 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ βŠ† 𝐴)
17 vex 3476 . . . . . . . . . . . . . . 15 π‘₯ ∈ V
1817rnex 7905 . . . . . . . . . . . . . 14 ran π‘₯ ∈ V
1918elpw 4605 . . . . . . . . . . . . 13 (ran π‘₯ ∈ 𝒫 𝐴 ↔ ran π‘₯ βŠ† 𝐴)
2016, 19sylibr 233 . . . . . . . . . . . 12 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ ∈ 𝒫 𝐴)
21 simprl 767 . . . . . . . . . . . . . 14 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ 𝑛 ∈ Ο‰)
22 ssid 4003 . . . . . . . . . . . . . 14 𝑛 βŠ† 𝑛
23 ssnnfi 9171 . . . . . . . . . . . . . 14 ((𝑛 ∈ Ο‰ ∧ 𝑛 βŠ† 𝑛) β†’ 𝑛 ∈ Fin)
2421, 22, 23sylancl 584 . . . . . . . . . . . . 13 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ 𝑛 ∈ Fin)
25 ffn 6716 . . . . . . . . . . . . . . 15 (π‘₯:π‘›βŸΆπ΄ β†’ π‘₯ Fn 𝑛)
26 dffn4 6810 . . . . . . . . . . . . . . 15 (π‘₯ Fn 𝑛 ↔ π‘₯:𝑛–ontoβ†’ran π‘₯)
2725, 26sylib 217 . . . . . . . . . . . . . 14 (π‘₯:π‘›βŸΆπ΄ β†’ π‘₯:𝑛–ontoβ†’ran π‘₯)
2815, 27syl 17 . . . . . . . . . . . . 13 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ π‘₯:𝑛–ontoβ†’ran π‘₯)
29 fofi 9340 . . . . . . . . . . . . 13 ((𝑛 ∈ Fin ∧ π‘₯:𝑛–ontoβ†’ran π‘₯) β†’ ran π‘₯ ∈ Fin)
3024, 28, 29syl2anc 582 . . . . . . . . . . . 12 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ ∈ Fin)
3120, 30elind 4193 . . . . . . . . . . 11 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin))
3231expr 455 . . . . . . . . . 10 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑛 ∈ Ο‰) β†’ (π‘₯ ∈ (𝐴 ↑m 𝑛) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin)))
3332rexlimdva 3153 . . . . . . . . 9 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin)))
3413, 33biimtrid 241 . . . . . . . 8 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin)))
3534imp 405 . . . . . . 7 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin))
3635fmpttd 7115 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)⟢(𝒫 𝐴 ∩ Fin))
3736ffnd 6717 . . . . 5 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) Fn βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛))
3836frnd 6724 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) βŠ† (𝒫 𝐴 ∩ Fin))
39 simpr 483 . . . . . . . . . . . 12 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ 𝑦 ∈ (𝒫 𝐴 ∩ Fin))
4039elin2d 4198 . . . . . . . . . . 11 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ 𝑦 ∈ Fin)
41 isfi 8974 . . . . . . . . . . 11 (𝑦 ∈ Fin ↔ βˆƒπ‘š ∈ Ο‰ 𝑦 β‰ˆ π‘š)
4240, 41sylib 217 . . . . . . . . . 10 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ βˆƒπ‘š ∈ Ο‰ 𝑦 β‰ˆ π‘š)
43 ensym 9001 . . . . . . . . . . . . 13 (𝑦 β‰ˆ π‘š β†’ π‘š β‰ˆ 𝑦)
44 bren 8951 . . . . . . . . . . . . 13 (π‘š β‰ˆ 𝑦 ↔ βˆƒπ‘₯ π‘₯:π‘šβ€“1-1-onto→𝑦)
4543, 44sylib 217 . . . . . . . . . . . 12 (𝑦 β‰ˆ π‘š β†’ βˆƒπ‘₯ π‘₯:π‘šβ€“1-1-onto→𝑦)
46 simprl 767 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘š ∈ Ο‰)
47 f1of 6832 . . . . . . . . . . . . . . . . . . . 20 (π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ π‘₯:π‘šβŸΆπ‘¦)
4847ad2antll 725 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯:π‘šβŸΆπ‘¦)
49 simplr 765 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ 𝑦 ∈ (𝒫 𝐴 ∩ Fin))
5049elin1d 4197 . . . . . . . . . . . . . . . . . . . 20 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ 𝑦 ∈ 𝒫 𝐴)
5150elpwid 4610 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ 𝑦 βŠ† 𝐴)
5248, 51fssd 6734 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯:π‘šβŸΆπ΄)
53 simplll 771 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ 𝐴 ∈ dom card)
54 vex 3476 . . . . . . . . . . . . . . . . . . 19 π‘š ∈ V
55 elmapg 8835 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ dom card ∧ π‘š ∈ V) β†’ (π‘₯ ∈ (𝐴 ↑m π‘š) ↔ π‘₯:π‘šβŸΆπ΄))
5653, 54, 55sylancl 584 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ (π‘₯ ∈ (𝐴 ↑m π‘š) ↔ π‘₯:π‘šβŸΆπ΄))
5752, 56mpbird 256 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯ ∈ (𝐴 ↑m π‘š))
58 oveq2 7419 . . . . . . . . . . . . . . . . . . 19 (𝑛 = π‘š β†’ (𝐴 ↑m 𝑛) = (𝐴 ↑m π‘š))
5958eleq2d 2817 . . . . . . . . . . . . . . . . . 18 (𝑛 = π‘š β†’ (π‘₯ ∈ (𝐴 ↑m 𝑛) ↔ π‘₯ ∈ (𝐴 ↑m π‘š)))
6059rspcev 3611 . . . . . . . . . . . . . . . . 17 ((π‘š ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m π‘š)) β†’ βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛))
6146, 57, 60syl2anc 582 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛))
6261, 13sylibr 233 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛))
63 f1ofo 6839 . . . . . . . . . . . . . . . . . 18 (π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ π‘₯:π‘šβ€“onto→𝑦)
6463ad2antll 725 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯:π‘šβ€“onto→𝑦)
65 forn 6807 . . . . . . . . . . . . . . . . 17 (π‘₯:π‘šβ€“onto→𝑦 β†’ ran π‘₯ = 𝑦)
6664, 65syl 17 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ ran π‘₯ = 𝑦)
6766eqcomd 2736 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ 𝑦 = ran π‘₯)
6862, 67jca 510 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
6968expr 455 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ π‘š ∈ Ο‰) β†’ (π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7069eximdv 1918 . . . . . . . . . . . 12 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ π‘š ∈ Ο‰) β†’ (βˆƒπ‘₯ π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7145, 70syl5 34 . . . . . . . . . . 11 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ π‘š ∈ Ο‰) β†’ (𝑦 β‰ˆ π‘š β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7271rexlimdva 3153 . . . . . . . . . 10 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ (βˆƒπ‘š ∈ Ο‰ 𝑦 β‰ˆ π‘š β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7342, 72mpd 15 . . . . . . . . 9 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
7473ex 411 . . . . . . . 8 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
75 eqid 2730 . . . . . . . . . . 11 (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) = (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯)
7675elrnmpt 5954 . . . . . . . . . 10 (𝑦 ∈ V β†’ (𝑦 ∈ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) ↔ βˆƒπ‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)𝑦 = ran π‘₯))
7776elv 3478 . . . . . . . . 9 (𝑦 ∈ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) ↔ βˆƒπ‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)𝑦 = ran π‘₯)
78 df-rex 3069 . . . . . . . . 9 (βˆƒπ‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)𝑦 = ran π‘₯ ↔ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
7977, 78bitri 274 . . . . . . . 8 (𝑦 ∈ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) ↔ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
8074, 79imbitrrdi 251 . . . . . . 7 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) β†’ 𝑦 ∈ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯)))
8180ssrdv 3987 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) βŠ† ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯))
8238, 81eqssd 3998 . . . . 5 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) = (𝒫 𝐴 ∩ Fin))
83 df-fo 6548 . . . . 5 ((π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)–ontoβ†’(𝒫 𝐴 ∩ Fin) ↔ ((π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) Fn βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) = (𝒫 𝐴 ∩ Fin)))
8437, 82, 83sylanbrc 581 . . . 4 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)–ontoβ†’(𝒫 𝐴 ∩ Fin))
85 fodomnum 10054 . . . 4 (βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∈ dom card β†’ ((π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)–ontoβ†’(𝒫 𝐴 ∩ Fin) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)))
8612, 84, 85sylc 65 . . 3 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛))
87 domtr 9005 . . 3 (((𝒫 𝐴 ∩ Fin) β‰Ό βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό 𝐴)
8886, 10, 87syl2anc 582 . 2 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό 𝐴)
89 pwexg 5375 . . . . 5 (𝐴 ∈ dom card β†’ 𝒫 𝐴 ∈ V)
9089adantr 479 . . . 4 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ 𝒫 𝐴 ∈ V)
91 inex1g 5318 . . . 4 (𝒫 𝐴 ∈ V β†’ (𝒫 𝐴 ∩ Fin) ∈ V)
9290, 91syl 17 . . 3 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) ∈ V)
93 infpwfidom 10025 . . 3 ((𝒫 𝐴 ∩ Fin) ∈ V β†’ 𝐴 β‰Ό (𝒫 𝐴 ∩ Fin))
9492, 93syl 17 . 2 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ 𝐴 β‰Ό (𝒫 𝐴 ∩ Fin))
95 sbth 9095 . 2 (((𝒫 𝐴 ∩ Fin) β‰Ό 𝐴 ∧ 𝐴 β‰Ό (𝒫 𝐴 ∩ Fin)) β†’ (𝒫 𝐴 ∩ Fin) β‰ˆ 𝐴)
9688, 94, 95syl2anc 582 1 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰ˆ 𝐴)
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 394   = wceq 1539  βˆƒwex 1779   ∈ wcel 2104   β‰  wne 2938  βˆƒwrex 3068  Vcvv 3472   ∩ cin 3946   βŠ† wss 3947  βˆ…c0 4321  π’« cpw 4601  βˆͺ ciun 4996   class class class wbr 5147   ↦ cmpt 5230   Γ— cxp 5673  dom cdm 5675  ran crn 5676   Fn wfn 6537  βŸΆwf 6538  β€“ontoβ†’wfo 6540  β€“1-1-ontoβ†’wf1o 6541  (class class class)co 7411  Ο‰com 7857   ↑m cmap 8822   β‰ˆ cen 8938   β‰Ό cdom 8939  Fincfn 8941  cardccrd 9932
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2701  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7727  ax-inf2 9638
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2532  df-eu 2561  df-clab 2708  df-cleq 2722  df-clel 2808  df-nfc 2883  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3374  df-reu 3375  df-rab 3431  df-v 3474  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6299  df-ord 6366  df-on 6367  df-lim 6368  df-suc 6369  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-isom 6551  df-riota 7367  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7858  df-1st 7977  df-2nd 7978  df-frecs 8268  df-wrecs 8299  df-recs 8373  df-rdg 8412  df-seqom 8450  df-1o 8468  df-er 8705  df-map 8824  df-en 8942  df-dom 8943  df-sdom 8944  df-fin 8945  df-oi 9507  df-card 9936  df-acn 9939
This theorem is referenced by:  inffien  10060  isnumbasgrplem3  42149
  Copyright terms: Public domain W3C validator