Theorem infpwfien 9818

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.

Step	Hyp	Ref	Expression
1		infxpidm2 9773	. . . . . . 7 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴)
2		infn0 9076	. . . . . . . 8 ⊢ (ω ≼ 𝐴 → 𝐴 ≠ ∅)
3	2	adantl 482	. . . . . . 7 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → 𝐴 ≠ ∅)
4		fseqen 9783	. . . . . . 7 ⊢ (((𝐴 × 𝐴) ≈ 𝐴 ∧ 𝐴 ≠ ∅) → ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ≈ (ω × 𝐴))
5	1, 3, 4	syl2anc 584	. . . . . 6 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ≈ (ω × 𝐴))
6		xpdom1g 8856	. . . . . . 7 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (ω × 𝐴) ≼ (𝐴 × 𝐴))
7		domentr 8799	. . . . . . 7 ⊢ (((ω × 𝐴) ≼ (𝐴 × 𝐴) ∧ (𝐴 × 𝐴) ≈ 𝐴) → (ω × 𝐴) ≼ 𝐴)
8	6, 1, 7	syl2anc 584	. . . . . 6 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (ω × 𝐴) ≼ 𝐴)
9		endomtr 8798	. . . . . 6 ⊢ ((∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ≈ (ω × 𝐴) ∧ (ω × 𝐴) ≼ 𝐴) → ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ≼ 𝐴)
10	5, 8, 9	syl2anc 584	. . . . 5 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ≼ 𝐴)
11		numdom 9794	. . . . 5 ⊢ ((𝐴 ∈ dom card ∧ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ≼ 𝐴) → ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∈ dom card)
12	10, 11	syldan 591	. . . 4 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∈ dom card)
13		eliun 4928	. . . . . . . . 9 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↔ ∃𝑛 ∈ ω 𝑥 ∈ (𝐴 ↑m 𝑛))
14		elmapi 8637	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (𝐴 ↑m 𝑛) → 𝑥:𝑛⟶𝐴)
15	14	ad2antll 726	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → 𝑥:𝑛⟶𝐴)
16	15	frnd 6608	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → ran 𝑥 ⊆ 𝐴)
17		vex 3436	. . . . . . . . . . . . . . 15 ⊢ 𝑥 ∈ V
18	17	rnex 7759	. . . . . . . . . . . . . 14 ⊢ ran 𝑥 ∈ V
19	18	elpw 4537	. . . . . . . . . . . . 13 ⊢ (ran 𝑥 ∈ 𝒫 𝐴 ↔ ran 𝑥 ⊆ 𝐴)
20	16, 19	sylibr 233	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → ran 𝑥 ∈ 𝒫 𝐴)
21		simprl 768	. . . . . . . . . . . . . 14 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ∈ ω)
22		ssid 3943	. . . . . . . . . . . . . 14 ⊢ 𝑛 ⊆ 𝑛
23		ssnnfi 8952	. . . . . . . . . . . . . 14 ⊢ ((𝑛 ∈ ω ∧ 𝑛 ⊆ 𝑛) → 𝑛 ∈ Fin)
24	21, 22, 23	sylancl 586	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → 𝑛 ∈ Fin)
25		ffn 6600	. . . . . . . . . . . . . . 15 ⊢ (𝑥:𝑛⟶𝐴 → 𝑥 Fn 𝑛)
26		dffn4 6694	. . . . . . . . . . . . . . 15 ⊢ (𝑥 Fn 𝑛 ↔ 𝑥:𝑛–onto→ran 𝑥)
27	25, 26	sylib 217	. . . . . . . . . . . . . 14 ⊢ (𝑥:𝑛⟶𝐴 → 𝑥:𝑛–onto→ran 𝑥)
28	15, 27	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → 𝑥:𝑛–onto→ran 𝑥)
29		fofi 9105	. . . . . . . . . . . . 13 ⊢ ((𝑛 ∈ Fin ∧ 𝑥:𝑛–onto→ran 𝑥) → ran 𝑥 ∈ Fin)
30	24, 28, 29	syl2anc 584	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → ran 𝑥 ∈ Fin)
31	20, 30	elind 4128	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ (𝑛 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑛))) → ran 𝑥 ∈ (𝒫 𝐴 ∩ Fin))
32	31	expr 457	. . . . . . . . . 10 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑛 ∈ ω) → (𝑥 ∈ (𝐴 ↑m 𝑛) → ran 𝑥 ∈ (𝒫 𝐴 ∩ Fin)))
33	32	rexlimdva 3213	. . . . . . . . 9 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (∃𝑛 ∈ ω 𝑥 ∈ (𝐴 ↑m 𝑛) → ran 𝑥 ∈ (𝒫 𝐴 ∩ Fin)))
34	13, 33	syl5bi 241	. . . . . . . 8 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) → ran 𝑥 ∈ (𝒫 𝐴 ∩ Fin)))
35	34	imp 407	. . . . . . 7 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)) → ran 𝑥 ∈ (𝒫 𝐴 ∩ Fin))
36	35	fmpttd 6989	. . . . . 6 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥):∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)⟶(𝒫 𝐴 ∩ Fin))
37	36	ffnd 6601	. . . . 5 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) Fn ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛))
38	36	frnd 6608	. . . . . 6 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) ⊆ (𝒫 𝐴 ∩ Fin))
39		simpr 485	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → 𝑦 ∈ (𝒫 𝐴 ∩ Fin))
40	39	elin2d 4133	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → 𝑦 ∈ Fin)
41		isfi 8764	. . . . . . . . . . 11 ⊢ (𝑦 ∈ Fin ↔ ∃𝑚 ∈ ω 𝑦 ≈ 𝑚)
42	40, 41	sylib 217	. . . . . . . . . 10 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → ∃𝑚 ∈ ω 𝑦 ≈ 𝑚)
43		ensym 8789	. . . . . . . . . . . . 13 ⊢ (𝑦 ≈ 𝑚 → 𝑚 ≈ 𝑦)
44		bren 8743	. . . . . . . . . . . . 13 ⊢ (𝑚 ≈ 𝑦 ↔ ∃𝑥 𝑥:𝑚–1-1-onto→𝑦)
45	43, 44	sylib 217	. . . . . . . . . . . 12 ⊢ (𝑦 ≈ 𝑚 → ∃𝑥 𝑥:𝑚–1-1-onto→𝑦)
46		simprl 768	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑚 ∈ ω)
47		f1of 6716	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥:𝑚–1-1-onto→𝑦 → 𝑥:𝑚⟶𝑦)
48	47	ad2antll 726	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑥:𝑚⟶𝑦)
49		simplr 766	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑦 ∈ (𝒫 𝐴 ∩ Fin))
50	49	elin1d 4132	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑦 ∈ 𝒫 𝐴)
51	50	elpwid 4544	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑦 ⊆ 𝐴)
52	48, 51	fssd 6618	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑥:𝑚⟶𝐴)
53		simplll 772	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝐴 ∈ dom card)
54		vex 3436	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑚 ∈ V
55		elmapg 8628	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐴 ∈ dom card ∧ 𝑚 ∈ V) → (𝑥 ∈ (𝐴 ↑m 𝑚) ↔ 𝑥:𝑚⟶𝐴))
56	53, 54, 55	sylancl 586	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → (𝑥 ∈ (𝐴 ↑m 𝑚) ↔ 𝑥:𝑚⟶𝐴))
57	52, 56	mpbird 256	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑥 ∈ (𝐴 ↑m 𝑚))
58		oveq2 7283	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑚 → (𝐴 ↑m 𝑛) = (𝐴 ↑m 𝑚))
59	58	eleq2d 2824	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑚 → (𝑥 ∈ (𝐴 ↑m 𝑛) ↔ 𝑥 ∈ (𝐴 ↑m 𝑚)))
60	59	rspcev 3561	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑚 ∈ ω ∧ 𝑥 ∈ (𝐴 ↑m 𝑚)) → ∃𝑛 ∈ ω 𝑥 ∈ (𝐴 ↑m 𝑛))
61	46, 57, 60	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → ∃𝑛 ∈ ω 𝑥 ∈ (𝐴 ↑m 𝑛))
62	61, 13	sylibr 233	. . . . . . . . . . . . . . 15 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛))
63		f1ofo 6723	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥:𝑚–1-1-onto→𝑦 → 𝑥:𝑚–onto→𝑦)
64	63	ad2antll 726	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑥:𝑚–onto→𝑦)
65		forn 6691	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥:𝑚–onto→𝑦 → ran 𝑥 = 𝑦)
66	64, 65	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → ran 𝑥 = 𝑦)
67	66	eqcomd 2744	. . . . . . . . . . . . . . 15 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → 𝑦 = ran 𝑥)
68	62, 67	jca 512	. . . . . . . . . . . . . 14 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ (𝑚 ∈ ω ∧ 𝑥:𝑚–1-1-onto→𝑦)) → (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥))
69	68	expr 457	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑚 ∈ ω) → (𝑥:𝑚–1-1-onto→𝑦 → (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥)))
70	69	eximdv 1920	. . . . . . . . . . . 12 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑚 ∈ ω) → (∃𝑥 𝑥:𝑚–1-1-onto→𝑦 → ∃𝑥(𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥)))
71	45, 70	syl5 34	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) ∧ 𝑚 ∈ ω) → (𝑦 ≈ 𝑚 → ∃𝑥(𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥)))
72	71	rexlimdva 3213	. . . . . . . . . 10 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → (∃𝑚 ∈ ω 𝑦 ≈ 𝑚 → ∃𝑥(𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥)))
73	42, 72	mpd 15	. . . . . . . . 9 ⊢ (((𝐴 ∈ dom card ∧ ω ≼ 𝐴) ∧ 𝑦 ∈ (𝒫 𝐴 ∩ Fin)) → ∃𝑥(𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥))
74	73	ex 413	. . . . . . . 8 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝑦 ∈ (𝒫 𝐴 ∩ Fin) → ∃𝑥(𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥)))
75		eqid 2738	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) = (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥)
76	75	elrnmpt 5865	. . . . . . . . . 10 ⊢ (𝑦 ∈ V → (𝑦 ∈ ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) ↔ ∃𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)𝑦 = ran 𝑥))
77	76	elv 3438	. . . . . . . . 9 ⊢ (𝑦 ∈ ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) ↔ ∃𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)𝑦 = ran 𝑥)
78		df-rex 3070	. . . . . . . . 9 ⊢ (∃𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)𝑦 = ran 𝑥 ↔ ∃𝑥(𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥))
79	77, 78	bitri 274	. . . . . . . 8 ⊢ (𝑦 ∈ ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) ↔ ∃𝑥(𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ 𝑦 = ran 𝑥))
80	74, 79	syl6ibr 251	. . . . . . 7 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝑦 ∈ (𝒫 𝐴 ∩ Fin) → 𝑦 ∈ ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥)))
81	80	ssrdv 3927	. . . . . 6 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝒫 𝐴 ∩ Fin) ⊆ ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥))
82	38, 81	eqssd 3938	. . . . 5 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) = (𝒫 𝐴 ∩ Fin))
83		df-fo 6439	. . . . 5 ⊢ ((𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥):∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)–onto→(𝒫 𝐴 ∩ Fin) ↔ ((𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) Fn ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ ran (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥) = (𝒫 𝐴 ∩ Fin)))
84	37, 82, 83	sylanbrc 583	. . . 4 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥):∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)–onto→(𝒫 𝐴 ∩ Fin))
85		fodomnum 9813	. . . 4 ⊢ (∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∈ dom card → ((𝑥 ∈ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ↦ ran 𝑥):∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)–onto→(𝒫 𝐴 ∩ Fin) → (𝒫 𝐴 ∩ Fin) ≼ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛)))
86	12, 84, 85	sylc 65	. . 3 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝒫 𝐴 ∩ Fin) ≼ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛))
87		domtr 8793	. . 3 ⊢ (((𝒫 𝐴 ∩ Fin) ≼ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ∧ ∪ 𝑛 ∈ ω (𝐴 ↑m 𝑛) ≼ 𝐴) → (𝒫 𝐴 ∩ Fin) ≼ 𝐴)
88	86, 10, 87	syl2anc 584	. 2 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝒫 𝐴 ∩ Fin) ≼ 𝐴)
89		pwexg 5301	. . . . 5 ⊢ (𝐴 ∈ dom card → 𝒫 𝐴 ∈ V)
90	89	adantr 481	. . . 4 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → 𝒫 𝐴 ∈ V)
91		inex1g 5243	. . . 4 ⊢ (𝒫 𝐴 ∈ V → (𝒫 𝐴 ∩ Fin) ∈ V)
92	90, 91	syl 17	. . 3 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝒫 𝐴 ∩ Fin) ∈ V)
93		infpwfidom 9784	. . 3 ⊢ ((𝒫 𝐴 ∩ Fin) ∈ V → 𝐴 ≼ (𝒫 𝐴 ∩ Fin))
94	92, 93	syl 17	. 2 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → 𝐴 ≼ (𝒫 𝐴 ∩ Fin))
95		sbth 8880	. 2 ⊢ (((𝒫 𝐴 ∩ Fin) ≼ 𝐴 ∧ 𝐴 ≼ (𝒫 𝐴 ∩ Fin)) → (𝒫 𝐴 ∩ Fin) ≈ 𝐴)
96	88, 94, 95	syl2anc 584	1 ⊢ ((𝐴 ∈ dom card ∧ ω ≼ 𝐴) → (𝒫 𝐴 ∩ Fin) ≈ 𝐴)

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1539  ∃wex 1782   ∈ wcel 2106   ≠ wne 2943  ∃wrex 3065  Vcvv 3432   ∩ cin 3886   ⊆ wss 3887  ∅c0 4256  𝒫 cpw 4533  ∪ ciun 4924   class class class wbr 5074   ↦ cmpt 5157   × cxp 5587  dom cdm 5589  ran crn 5590   Fn wfn 6428  ⟶wf 6429  –onto→wfo 6431  –1-1-onto→wf1o 6432  (class class class)co 7275  ωcom 7712   ↑_m cmap 8615   ≈ cen 8730   ≼ cdom 8731  Fincfn 8733  cardccrd 9693

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  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 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-inf2 9399

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-rmo 3071  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-int 4880  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-se 5545  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-isom 6442  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-om 7713  df-1st 7831  df-2nd 7832  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-seqom 8279  df-1o 8297  df-er 8498  df-map 8617  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-oi 9269  df-card 9697  df-acn 9700

This theorem is referenced by:  inffien  9819  isnumbasgrplem3  40930