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

Theorem infpwfien 10053
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 10008 . . . . . . 7 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝐴 Γ— 𝐴) β‰ˆ 𝐴)
2 infn0 9303 . . . . . . . 8 (Ο‰ β‰Ό 𝐴 β†’ 𝐴 β‰  βˆ…)
32adantl 482 . . . . . . 7 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ 𝐴 β‰  βˆ…)
4 fseqen 10018 . . . . . . 7 (((𝐴 Γ— 𝐴) β‰ˆ 𝐴 ∧ 𝐴 β‰  βˆ…) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰ˆ (Ο‰ Γ— 𝐴))
51, 3, 4syl2anc 584 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰ˆ (Ο‰ Γ— 𝐴))
6 xpdom1g 9065 . . . . . . 7 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (Ο‰ Γ— 𝐴) β‰Ό (𝐴 Γ— 𝐴))
7 domentr 9005 . . . . . . 7 (((Ο‰ Γ— 𝐴) β‰Ό (𝐴 Γ— 𝐴) ∧ (𝐴 Γ— 𝐴) β‰ˆ 𝐴) β†’ (Ο‰ Γ— 𝐴) β‰Ό 𝐴)
86, 1, 7syl2anc 584 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (Ο‰ Γ— 𝐴) β‰Ό 𝐴)
9 endomtr 9004 . . . . . 6 ((βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰ˆ (Ο‰ Γ— 𝐴) ∧ (Ο‰ Γ— 𝐴) β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴)
105, 8, 9syl2anc 584 . . . . 5 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴)
11 numdom 10029 . . . . 5 ((𝐴 ∈ dom card ∧ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∈ dom card)
1210, 11syldan 591 . . . 4 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∈ dom card)
13 eliun 5000 . . . . . . . . 9 (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↔ βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛))
14 elmapi 8839 . . . . . . . . . . . . . . 15 (π‘₯ ∈ (𝐴 ↑m 𝑛) β†’ π‘₯:π‘›βŸΆπ΄)
1514ad2antll 727 . . . . . . . . . . . . . 14 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ π‘₯:π‘›βŸΆπ΄)
1615frnd 6722 . . . . . . . . . . . . 13 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ βŠ† 𝐴)
17 vex 3478 . . . . . . . . . . . . . . 15 π‘₯ ∈ V
1817rnex 7899 . . . . . . . . . . . . . 14 ran π‘₯ ∈ V
1918elpw 4605 . . . . . . . . . . . . 13 (ran π‘₯ ∈ 𝒫 𝐴 ↔ ran π‘₯ βŠ† 𝐴)
2016, 19sylibr 233 . . . . . . . . . . . 12 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ ∈ 𝒫 𝐴)
21 simprl 769 . . . . . . . . . . . . . 14 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ 𝑛 ∈ Ο‰)
22 ssid 4003 . . . . . . . . . . . . . 14 𝑛 βŠ† 𝑛
23 ssnnfi 9165 . . . . . . . . . . . . . 14 ((𝑛 ∈ Ο‰ ∧ 𝑛 βŠ† 𝑛) β†’ 𝑛 ∈ Fin)
2421, 22, 23sylancl 586 . . . . . . . . . . . . 13 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ 𝑛 ∈ Fin)
25 ffn 6714 . . . . . . . . . . . . . . 15 (π‘₯:π‘›βŸΆπ΄ β†’ π‘₯ Fn 𝑛)
26 dffn4 6808 . . . . . . . . . . . . . . 15 (π‘₯ Fn 𝑛 ↔ π‘₯:𝑛–ontoβ†’ran π‘₯)
2725, 26sylib 217 . . . . . . . . . . . . . 14 (π‘₯:π‘›βŸΆπ΄ β†’ π‘₯:𝑛–ontoβ†’ran π‘₯)
2815, 27syl 17 . . . . . . . . . . . . 13 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ π‘₯:𝑛–ontoβ†’ran π‘₯)
29 fofi 9334 . . . . . . . . . . . . 13 ((𝑛 ∈ Fin ∧ π‘₯:𝑛–ontoβ†’ran π‘₯) β†’ ran π‘₯ ∈ Fin)
3024, 28, 29syl2anc 584 . . . . . . . . . . . 12 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ ∈ Fin)
3120, 30elind 4193 . . . . . . . . . . 11 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ (𝑛 ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m 𝑛))) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin))
3231expr 457 . . . . . . . . . 10 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑛 ∈ Ο‰) β†’ (π‘₯ ∈ (𝐴 ↑m 𝑛) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin)))
3332rexlimdva 3155 . . . . . . . . 9 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin)))
3413, 33biimtrid 241 . . . . . . . 8 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin)))
3534imp 407 . . . . . . 7 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)) β†’ ran π‘₯ ∈ (𝒫 𝐴 ∩ Fin))
3635fmpttd 7111 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)⟢(𝒫 𝐴 ∩ Fin))
3736ffnd 6715 . . . . 5 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) Fn βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛))
3836frnd 6722 . . . . . 6 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) βŠ† (𝒫 𝐴 ∩ Fin))
39 simpr 485 . . . . . . . . . . . 12 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ 𝑦 ∈ (𝒫 𝐴 ∩ Fin))
4039elin2d 4198 . . . . . . . . . . 11 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ 𝑦 ∈ Fin)
41 isfi 8968 . . . . . . . . . . 11 (𝑦 ∈ Fin ↔ βˆƒπ‘š ∈ Ο‰ 𝑦 β‰ˆ π‘š)
4240, 41sylib 217 . . . . . . . . . 10 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ βˆƒπ‘š ∈ Ο‰ 𝑦 β‰ˆ π‘š)
43 ensym 8995 . . . . . . . . . . . . 13 (𝑦 β‰ˆ π‘š β†’ π‘š β‰ˆ 𝑦)
44 bren 8945 . . . . . . . . . . . . 13 (π‘š β‰ˆ 𝑦 ↔ βˆƒπ‘₯ π‘₯:π‘šβ€“1-1-onto→𝑦)
4543, 44sylib 217 . . . . . . . . . . . 12 (𝑦 β‰ˆ π‘š β†’ βˆƒπ‘₯ π‘₯:π‘šβ€“1-1-onto→𝑦)
46 simprl 769 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘š ∈ Ο‰)
47 f1of 6830 . . . . . . . . . . . . . . . . . . . 20 (π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ π‘₯:π‘šβŸΆπ‘¦)
4847ad2antll 727 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯:π‘šβŸΆπ‘¦)
49 simplr 767 . . . . . . . . . . . . . . . . . . . . 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 6732 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯:π‘šβŸΆπ΄)
53 simplll 773 . . . . . . . . . . . . . . . . . . 19 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ 𝐴 ∈ dom card)
54 vex 3478 . . . . . . . . . . . . . . . . . . 19 π‘š ∈ V
55 elmapg 8829 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ dom card ∧ π‘š ∈ V) β†’ (π‘₯ ∈ (𝐴 ↑m π‘š) ↔ π‘₯:π‘šβŸΆπ΄))
5653, 54, 55sylancl 586 . . . . . . . . . . . . . . . . . 18 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ (π‘₯ ∈ (𝐴 ↑m π‘š) ↔ π‘₯:π‘šβŸΆπ΄))
5752, 56mpbird 256 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯ ∈ (𝐴 ↑m π‘š))
58 oveq2 7413 . . . . . . . . . . . . . . . . . . 19 (𝑛 = π‘š β†’ (𝐴 ↑m 𝑛) = (𝐴 ↑m π‘š))
5958eleq2d 2819 . . . . . . . . . . . . . . . . . 18 (𝑛 = π‘š β†’ (π‘₯ ∈ (𝐴 ↑m 𝑛) ↔ π‘₯ ∈ (𝐴 ↑m π‘š)))
6059rspcev 3612 . . . . . . . . . . . . . . . . 17 ((π‘š ∈ Ο‰ ∧ π‘₯ ∈ (𝐴 ↑m π‘š)) β†’ βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛))
6146, 57, 60syl2anc 584 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ βˆƒπ‘› ∈ Ο‰ π‘₯ ∈ (𝐴 ↑m 𝑛))
6261, 13sylibr 233 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛))
63 f1ofo 6837 . . . . . . . . . . . . . . . . . 18 (π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ π‘₯:π‘šβ€“onto→𝑦)
6463ad2antll 727 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ π‘₯:π‘šβ€“onto→𝑦)
65 forn 6805 . . . . . . . . . . . . . . . . 17 (π‘₯:π‘šβ€“onto→𝑦 β†’ ran π‘₯ = 𝑦)
6664, 65syl 17 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ ran π‘₯ = 𝑦)
6766eqcomd 2738 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ 𝑦 = ran π‘₯)
6862, 67jca 512 . . . . . . . . . . . . . 14 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (π‘š ∈ Ο‰ ∧ π‘₯:π‘šβ€“1-1-onto→𝑦)) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
6968expr 457 . . . . . . . . . . . . 13 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ π‘š ∈ Ο‰) β†’ (π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7069eximdv 1920 . . . . . . . . . . . 12 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ π‘š ∈ Ο‰) β†’ (βˆƒπ‘₯ π‘₯:π‘šβ€“1-1-onto→𝑦 β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7145, 70syl5 34 . . . . . . . . . . 11 ((((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ π‘š ∈ Ο‰) β†’ (𝑦 β‰ˆ π‘š β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7271rexlimdva 3155 . . . . . . . . . 10 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ (βˆƒπ‘š ∈ Ο‰ 𝑦 β‰ˆ π‘š β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
7342, 72mpd 15 . . . . . . . . 9 (((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
7473ex 413 . . . . . . . 8 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝑦 ∈ (𝒫 𝐴 ∩ Fin) β†’ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯)))
75 eqid 2732 . . . . . . . . . . 11 (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) = (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯)
7675elrnmpt 5953 . . . . . . . . . 10 (𝑦 ∈ V β†’ (𝑦 ∈ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) ↔ βˆƒπ‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)𝑦 = ran π‘₯))
7776elv 3480 . . . . . . . . 9 (𝑦 ∈ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) ↔ βˆƒπ‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)𝑦 = ran π‘₯)
78 df-rex 3071 . . . . . . . . 9 (βˆƒπ‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)𝑦 = ran π‘₯ ↔ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
7977, 78bitri 274 . . . . . . . 8 (𝑦 ∈ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) ↔ βˆƒπ‘₯(π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ 𝑦 = ran π‘₯))
8074, 79syl6ibr 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 6546 . . . . 5 ((π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)–ontoβ†’(𝒫 𝐴 ∩ Fin) ↔ ((π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) Fn βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ ran (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯) = (𝒫 𝐴 ∩ Fin)))
8437, 82, 83sylanbrc 583 . . . 4 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)–ontoβ†’(𝒫 𝐴 ∩ Fin))
85 fodomnum 10048 . . . 4 (βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∈ dom card β†’ ((π‘₯ ∈ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ↦ ran π‘₯):βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)–ontoβ†’(𝒫 𝐴 ∩ Fin) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛)))
8612, 84, 85sylc 65 . . 3 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛))
87 domtr 8999 . . 3 (((𝒫 𝐴 ∩ Fin) β‰Ό βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) ∧ βˆͺ 𝑛 ∈ Ο‰ (𝐴 ↑m 𝑛) β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό 𝐴)
8886, 10, 87syl2anc 584 . 2 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰Ό 𝐴)
89 pwexg 5375 . . . . 5 (𝐴 ∈ dom card β†’ 𝒫 𝐴 ∈ V)
9089adantr 481 . . . 4 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ 𝒫 𝐴 ∈ V)
91 inex1g 5318 . . . 4 (𝒫 𝐴 ∈ V β†’ (𝒫 𝐴 ∩ Fin) ∈ V)
9290, 91syl 17 . . 3 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) ∈ V)
93 infpwfidom 10019 . . 3 ((𝒫 𝐴 ∩ Fin) ∈ V β†’ 𝐴 β‰Ό (𝒫 𝐴 ∩ Fin))
9492, 93syl 17 . 2 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ 𝐴 β‰Ό (𝒫 𝐴 ∩ Fin))
95 sbth 9089 . 2 (((𝒫 𝐴 ∩ Fin) β‰Ό 𝐴 ∧ 𝐴 β‰Ό (𝒫 𝐴 ∩ Fin)) β†’ (𝒫 𝐴 ∩ Fin) β‰ˆ 𝐴)
9688, 94, 95syl2anc 584 1 ((𝐴 ∈ dom card ∧ Ο‰ β‰Ό 𝐴) β†’ (𝒫 𝐴 ∩ Fin) β‰ˆ 𝐴)
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541  βˆƒwex 1781   ∈ wcel 2106   β‰  wne 2940  βˆƒwrex 3070  Vcvv 3474   ∩ 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 6535  βŸΆwf 6536  β€“ontoβ†’wfo 6538  β€“1-1-ontoβ†’wf1o 6539  (class class class)co 7405  Ο‰com 7851   ↑m cmap 8816   β‰ˆ cen 8932   β‰Ό cdom 8933  Fincfn 8935  cardccrd 9926
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-inf2 9632
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  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 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7852  df-1st 7971  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-seqom 8444  df-1o 8462  df-er 8699  df-map 8818  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-oi 9501  df-card 9930  df-acn 9933
This theorem is referenced by:  inffien  10054  isnumbasgrplem3  41832
  Copyright terms: Public domain W3C validator