Metamath Proof Explorer


Theorem pwfseq

Description: The powerset of a Dedekind-infinite set does not inject into the set of finite sequences. The proof is due to Halbeisen and Shelah. Proposition 1.7 of KanamoriPincus p. 418. (Contributed by Mario Carneiro, 31-May-2015)

Ref Expression
Assertion pwfseq ⊢ ω ≼ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n

Proof

Step Hyp Ref Expression
1 reldom ⊢ Rel ⁡ ≼
2 1 brrelex2i ⊢ ω ≼ A → A ∈ V
3 domeng ⊢ A ∈ V → ω ≼ A ↔ ∃ t ω ≈ t ∧ t ⊆ A
4 bren ⊢ ω ≈ t ↔ ∃ h h : ω ⟶ 1-1 onto t
5 harcl ⊢ har ⁡ 𝒫 A ∈ On
6 infxpenc2 ⊢ har ⁡ 𝒫 A ∈ On → ∃ m ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b
7 5 6 ax-mp ⊢ ∃ m ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b
8 oveq2 ⊢ n = k → A n = A k
9 8 cbviunv ⊢ ⋃ n ∈ ω A n = ⋃ k ∈ ω A k
10 f1eq3 ⊢ ⋃ n ∈ ω A n = ⋃ k ∈ ω A k → g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n ↔ g : 𝒫 A ⟶ 1-1 ⋃ k ∈ ω A k
11 9 10 ax-mp ⊢ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n ↔ g : 𝒫 A ⟶ 1-1 ⋃ k ∈ ω A k
12 11 bilani ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ∧ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n → g : 𝒫 A ⟶ 1-1 ⋃ k ∈ ω A k
13 simpllr ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ∧ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n → t ⊆ A
14 simplll ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ∧ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n → h : ω ⟶ 1-1 onto t
15 biid ⊢ u ⊆ A ∧ r ⊆ u × u ∧ r We u ∧ ω ≼ u ↔ u ⊆ A ∧ r ⊆ u × u ∧ r We u ∧ ω ≼ u
16 simplr ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ∧ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n → ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b
17 sseq2 ⊢ b = w → ω ⊆ b ↔ ω ⊆ w
18 fveq2 ⊢ b = w → m ⁡ b = m ⁡ w
19 18 f1oeq1d ⊢ b = w → m ⁡ b : b × b ⟶ 1-1 onto b ↔ m ⁡ w : b × b ⟶ 1-1 onto b
20 xpeq12 ⊢ b = w ∧ b = w → b × b = w × w
21 20 anidms ⊢ b = w → b × b = w × w
22 21 f1oeq2d ⊢ b = w → m ⁡ w : b × b ⟶ 1-1 onto b ↔ m ⁡ w : w × w ⟶ 1-1 onto b
23 f1oeq3 ⊢ b = w → m ⁡ w : w × w ⟶ 1-1 onto b ↔ m ⁡ w : w × w ⟶ 1-1 onto w
24 19 22 23 3bitrd ⊢ b = w → m ⁡ b : b × b ⟶ 1-1 onto b ↔ m ⁡ w : w × w ⟶ 1-1 onto w
25 17 24 imbi12d ⊢ b = w → ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ↔ ω ⊆ w → m ⁡ w : w × w ⟶ 1-1 onto w
26 25 cbvralvw ⊢ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ↔ ∀ w ∈ har ⁡ 𝒫 A ω ⊆ w → m ⁡ w : w × w ⟶ 1-1 onto w
27 16 26 sylib ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ∧ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n → ∀ w ∈ har ⁡ 𝒫 A ω ⊆ w → m ⁡ w : w × w ⟶ 1-1 onto w
28 eqid ⊢ OrdIso r u = OrdIso r u
29 eqid ⊢ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z = s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z
30 eqid ⊢ OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 = OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1
31 eqid ⊢ seq ω p ∈ V , f ∈ V ⟼ x ∈ u suc ⁡ p ⟼ f ⁡ x ↾ p OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 x ⁡ p ∅ OrdIso r u ⁡ ∅ = seq ω p ∈ V , f ∈ V ⟼ x ∈ u suc ⁡ p ⟼ f ⁡ x ↾ p OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 x ⁡ p ∅ OrdIso r u ⁡ ∅
32 oveq2 ⊢ n = k → u n = u k
33 32 cbviunv ⊢ ⋃ n ∈ ω u n = ⋃ k ∈ ω u k
34 33 mpteq1i ⊢ y ∈ ⋃ n ∈ ω u n ⟼ dom ⁡ y seq ω p ∈ V , f ∈ V ⟼ x ∈ u suc ⁡ p ⟼ f ⁡ x ↾ p OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 x ⁡ p ∅ OrdIso r u ⁡ ∅ ⁡ dom ⁡ y ⁡ y = y ∈ ⋃ k ∈ ω u k ⟼ dom ⁡ y seq ω p ∈ V , f ∈ V ⟼ x ∈ u suc ⁡ p ⟼ f ⁡ x ↾ p OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 x ⁡ p ∅ OrdIso r u ⁡ ∅ ⁡ dom ⁡ y ⁡ y
35 eqid ⊢ x ∈ ω , y ∈ u ⟼ OrdIso r u ⁡ x y = x ∈ ω , y ∈ u ⟼ OrdIso r u ⁡ x y
36 eqid ⊢ OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 ∘ x ∈ ω , y ∈ u ⟼ OrdIso r u ⁡ x y ∘ y ∈ ⋃ n ∈ ω u n ⟼ dom ⁡ y seq ω p ∈ V , f ∈ V ⟼ x ∈ u suc ⁡ p ⟼ f ⁡ x ↾ p OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 x ⁡ p ∅ OrdIso r u ⁡ ∅ ⁡ dom ⁡ y ⁡ y = OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 ∘ x ∈ ω , y ∈ u ⟼ OrdIso r u ⁡ x y ∘ y ∈ ⋃ n ∈ ω u n ⟼ dom ⁡ y seq ω p ∈ V , f ∈ V ⟼ x ∈ u suc ⁡ p ⟼ f ⁡ x ↾ p OrdIso r u ∘ m ⁡ dom ⁡ OrdIso r u ∘ s ∈ dom ⁡ OrdIso r u , z ∈ dom ⁡ OrdIso r u ⟼ OrdIso r u ⁡ s OrdIso r u ⁡ z -1 x ⁡ p ∅ OrdIso r u ⁡ ∅ ⁡ dom ⁡ y ⁡ y
37 12 13 14 15 27 28 29 30 31 34 35 36 pwfseqlem5 ⊢ ¬ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b ∧ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n
38 37 imnani ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b → ¬ g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n
39 38 nexdv ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b → ¬ ∃ g g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n
40 brdomi ⊢ 𝒫 A ≼ ⋃ n ∈ ω A n → ∃ g g : 𝒫 A ⟶ 1-1 ⋃ n ∈ ω A n
41 39 40 nsyl ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A ∧ ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
42 41 ex ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A → ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
43 42 exlimdv ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A → ∃ m ∀ b ∈ har ⁡ 𝒫 A ω ⊆ b → m ⁡ b : b × b ⟶ 1-1 onto b → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
44 7 43 mpi ⊢ h : ω ⟶ 1-1 onto t ∧ t ⊆ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
45 44 ex ⊢ h : ω ⟶ 1-1 onto t → t ⊆ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
46 45 exlimiv ⊢ ∃ h h : ω ⟶ 1-1 onto t → t ⊆ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
47 4 46 sylbi ⊢ ω ≈ t → t ⊆ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
48 47 imp ⊢ ω ≈ t ∧ t ⊆ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
49 48 exlimiv ⊢ ∃ t ω ≈ t ∧ t ⊆ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
50 3 49 biimtrdi ⊢ A ∈ V → ω ≼ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n
51 2 50 mpcom ⊢ ω ≼ A → ¬ 𝒫 A ≼ ⋃ n ∈ ω A n