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

Theorem isinf 8734
Description: Any set that is not finite is literally infinite, in the sense that it contains subsets of arbitrarily large finite cardinality. (It cannot be proven that the set has countably infinite subsets unless AC is invoked.) The proof does not require the Axiom of Infinity. (Contributed by Mario Carneiro, 15-Jan-2013.)
Assertion
Ref Expression
isinf 𝐴 ∈ Fin → ∀𝑛 ∈ ω ∃𝑥(𝑥𝐴𝑥𝑛))
Distinct variable group:   𝑥,𝐴,𝑛

Proof of Theorem isinf
Dummy variables 𝑓 𝑚 𝑦 𝑧 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 breq2 5073 . . . . . 6 (𝑛 = ∅ → (𝑥𝑛𝑥 ≈ ∅))
21anbi2d 630 . . . . 5 (𝑛 = ∅ → ((𝑥𝐴𝑥𝑛) ↔ (𝑥𝐴𝑥 ≈ ∅)))
32exbidv 1921 . . . 4 (𝑛 = ∅ → (∃𝑥(𝑥𝐴𝑥𝑛) ↔ ∃𝑥(𝑥𝐴𝑥 ≈ ∅)))
4 breq2 5073 . . . . . 6 (𝑛 = 𝑚 → (𝑥𝑛𝑥𝑚))
54anbi2d 630 . . . . 5 (𝑛 = 𝑚 → ((𝑥𝐴𝑥𝑛) ↔ (𝑥𝐴𝑥𝑚)))
65exbidv 1921 . . . 4 (𝑛 = 𝑚 → (∃𝑥(𝑥𝐴𝑥𝑛) ↔ ∃𝑥(𝑥𝐴𝑥𝑚)))
7 sseq1 3995 . . . . . . 7 (𝑥 = 𝑦 → (𝑥𝐴𝑦𝐴))
87adantl 484 . . . . . 6 ((𝑛 = suc 𝑚𝑥 = 𝑦) → (𝑥𝐴𝑦𝐴))
9 breq1 5072 . . . . . . 7 (𝑥 = 𝑦 → (𝑥𝑛𝑦𝑛))
10 breq2 5073 . . . . . . 7 (𝑛 = suc 𝑚 → (𝑦𝑛𝑦 ≈ suc 𝑚))
119, 10sylan9bbr 513 . . . . . 6 ((𝑛 = suc 𝑚𝑥 = 𝑦) → (𝑥𝑛𝑦 ≈ suc 𝑚))
128, 11anbi12d 632 . . . . 5 ((𝑛 = suc 𝑚𝑥 = 𝑦) → ((𝑥𝐴𝑥𝑛) ↔ (𝑦𝐴𝑦 ≈ suc 𝑚)))
1312cbvexdvaw 2045 . . . 4 (𝑛 = suc 𝑚 → (∃𝑥(𝑥𝐴𝑥𝑛) ↔ ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚)))
14 0ss 4353 . . . . . 6 ∅ ⊆ 𝐴
15 0ex 5214 . . . . . . 7 ∅ ∈ V
1615enref 8545 . . . . . 6 ∅ ≈ ∅
17 sseq1 3995 . . . . . . . 8 (𝑥 = ∅ → (𝑥𝐴 ↔ ∅ ⊆ 𝐴))
18 breq1 5072 . . . . . . . 8 (𝑥 = ∅ → (𝑥 ≈ ∅ ↔ ∅ ≈ ∅))
1917, 18anbi12d 632 . . . . . . 7 (𝑥 = ∅ → ((𝑥𝐴𝑥 ≈ ∅) ↔ (∅ ⊆ 𝐴 ∧ ∅ ≈ ∅)))
2015, 19spcev 3610 . . . . . 6 ((∅ ⊆ 𝐴 ∧ ∅ ≈ ∅) → ∃𝑥(𝑥𝐴𝑥 ≈ ∅))
2114, 16, 20mp2an 690 . . . . 5 𝑥(𝑥𝐴𝑥 ≈ ∅)
2221a1i 11 . . . 4 𝐴 ∈ Fin → ∃𝑥(𝑥𝐴𝑥 ≈ ∅))
23 ssdif0 4326 . . . . . . . . . . . . 13 (𝐴𝑥 ↔ (𝐴𝑥) = ∅)
24 eqss 3985 . . . . . . . . . . . . . . 15 (𝑥 = 𝐴 ↔ (𝑥𝐴𝐴𝑥))
25 breq1 5072 . . . . . . . . . . . . . . . . . . 19 (𝑥 = 𝐴 → (𝑥𝑚𝐴𝑚))
2625biimpa 479 . . . . . . . . . . . . . . . . . 18 ((𝑥 = 𝐴𝑥𝑚) → 𝐴𝑚)
27 rspe 3307 . . . . . . . . . . . . . . . . . 18 ((𝑚 ∈ ω ∧ 𝐴𝑚) → ∃𝑚 ∈ ω 𝐴𝑚)
2826, 27sylan2 594 . . . . . . . . . . . . . . . . 17 ((𝑚 ∈ ω ∧ (𝑥 = 𝐴𝑥𝑚)) → ∃𝑚 ∈ ω 𝐴𝑚)
29 isfi 8536 . . . . . . . . . . . . . . . . 17 (𝐴 ∈ Fin ↔ ∃𝑚 ∈ ω 𝐴𝑚)
3028, 29sylibr 236 . . . . . . . . . . . . . . . 16 ((𝑚 ∈ ω ∧ (𝑥 = 𝐴𝑥𝑚)) → 𝐴 ∈ Fin)
3130expcom 416 . . . . . . . . . . . . . . 15 ((𝑥 = 𝐴𝑥𝑚) → (𝑚 ∈ ω → 𝐴 ∈ Fin))
3224, 31sylanbr 584 . . . . . . . . . . . . . 14 (((𝑥𝐴𝐴𝑥) ∧ 𝑥𝑚) → (𝑚 ∈ ω → 𝐴 ∈ Fin))
3332ex 415 . . . . . . . . . . . . 13 ((𝑥𝐴𝐴𝑥) → (𝑥𝑚 → (𝑚 ∈ ω → 𝐴 ∈ Fin)))
3423, 33sylan2br 596 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ (𝐴𝑥) = ∅) → (𝑥𝑚 → (𝑚 ∈ ω → 𝐴 ∈ Fin)))
3534expcom 416 . . . . . . . . . . 11 ((𝐴𝑥) = ∅ → (𝑥𝐴 → (𝑥𝑚 → (𝑚 ∈ ω → 𝐴 ∈ Fin))))
36353impd 1344 . . . . . . . . . 10 ((𝐴𝑥) = ∅ → ((𝑥𝐴𝑥𝑚𝑚 ∈ ω) → 𝐴 ∈ Fin))
3736com12 32 . . . . . . . . 9 ((𝑥𝐴𝑥𝑚𝑚 ∈ ω) → ((𝐴𝑥) = ∅ → 𝐴 ∈ Fin))
3837con3d 155 . . . . . . . 8 ((𝑥𝐴𝑥𝑚𝑚 ∈ ω) → (¬ 𝐴 ∈ Fin → ¬ (𝐴𝑥) = ∅))
39 bren 8521 . . . . . . . . . 10 (𝑥𝑚 ↔ ∃𝑓 𝑓:𝑥1-1-onto𝑚)
40 neq0 4312 . . . . . . . . . . . . . 14 (¬ (𝐴𝑥) = ∅ ↔ ∃𝑧 𝑧 ∈ (𝐴𝑥))
41 eldifi 4106 . . . . . . . . . . . . . . . . . . . . 21 (𝑧 ∈ (𝐴𝑥) → 𝑧𝐴)
4241snssd 4745 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ (𝐴𝑥) → {𝑧} ⊆ 𝐴)
43 unss 4163 . . . . . . . . . . . . . . . . . . . . 21 ((𝑥𝐴 ∧ {𝑧} ⊆ 𝐴) ↔ (𝑥 ∪ {𝑧}) ⊆ 𝐴)
4443biimpi 218 . . . . . . . . . . . . . . . . . . . 20 ((𝑥𝐴 ∧ {𝑧} ⊆ 𝐴) → (𝑥 ∪ {𝑧}) ⊆ 𝐴)
4542, 44sylan2 594 . . . . . . . . . . . . . . . . . . 19 ((𝑥𝐴𝑧 ∈ (𝐴𝑥)) → (𝑥 ∪ {𝑧}) ⊆ 𝐴)
4645ad2ant2r 745 . . . . . . . . . . . . . . . . . 18 (((𝑥𝐴𝑓:𝑥1-1-onto𝑚) ∧ (𝑧 ∈ (𝐴𝑥) ∧ 𝑚 ∈ ω)) → (𝑥 ∪ {𝑧}) ⊆ 𝐴)
47 vex 3500 . . . . . . . . . . . . . . . . . . . . . . 23 𝑧 ∈ V
48 vex 3500 . . . . . . . . . . . . . . . . . . . . . . 23 𝑚 ∈ V
4947, 48f1osn 6657 . . . . . . . . . . . . . . . . . . . . . 22 {⟨𝑧, 𝑚⟩}:{𝑧}–1-1-onto→{𝑚}
5049jctr 527 . . . . . . . . . . . . . . . . . . . . 21 (𝑓:𝑥1-1-onto𝑚 → (𝑓:𝑥1-1-onto𝑚 ∧ {⟨𝑧, 𝑚⟩}:{𝑧}–1-1-onto→{𝑚}))
51 eldifn 4107 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ (𝐴𝑥) → ¬ 𝑧𝑥)
52 disjsn 4650 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑥 ∩ {𝑧}) = ∅ ↔ ¬ 𝑧𝑥)
5351, 52sylibr 236 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ∈ (𝐴𝑥) → (𝑥 ∩ {𝑧}) = ∅)
54 nnord 7591 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑚 ∈ ω → Ord 𝑚)
55 orddisj 6232 . . . . . . . . . . . . . . . . . . . . . . 23 (Ord 𝑚 → (𝑚 ∩ {𝑚}) = ∅)
5654, 55syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑚 ∈ ω → (𝑚 ∩ {𝑚}) = ∅)
5753, 56anim12i 614 . . . . . . . . . . . . . . . . . . . . 21 ((𝑧 ∈ (𝐴𝑥) ∧ 𝑚 ∈ ω) → ((𝑥 ∩ {𝑧}) = ∅ ∧ (𝑚 ∩ {𝑚}) = ∅))
58 f1oun 6637 . . . . . . . . . . . . . . . . . . . . 21 (((𝑓:𝑥1-1-onto𝑚 ∧ {⟨𝑧, 𝑚⟩}:{𝑧}–1-1-onto→{𝑚}) ∧ ((𝑥 ∩ {𝑧}) = ∅ ∧ (𝑚 ∩ {𝑚}) = ∅)) → (𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→(𝑚 ∪ {𝑚}))
5950, 57, 58syl2an 597 . . . . . . . . . . . . . . . . . . . 20 ((𝑓:𝑥1-1-onto𝑚 ∧ (𝑧 ∈ (𝐴𝑥) ∧ 𝑚 ∈ ω)) → (𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→(𝑚 ∪ {𝑚}))
60 df-suc 6200 . . . . . . . . . . . . . . . . . . . . . 22 suc 𝑚 = (𝑚 ∪ {𝑚})
61 f1oeq3 6609 . . . . . . . . . . . . . . . . . . . . . 22 (suc 𝑚 = (𝑚 ∪ {𝑚}) → ((𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚 ↔ (𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→(𝑚 ∪ {𝑚})))
6260, 61ax-mp 5 . . . . . . . . . . . . . . . . . . . . 21 ((𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚 ↔ (𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→(𝑚 ∪ {𝑚}))
63 vex 3500 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑓 ∈ V
64 snex 5335 . . . . . . . . . . . . . . . . . . . . . . . 24 {⟨𝑧, 𝑚⟩} ∈ V
6563, 64unex 7472 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑓 ∪ {⟨𝑧, 𝑚⟩}) ∈ V
66 f1oeq1 6607 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑔 = (𝑓 ∪ {⟨𝑧, 𝑚⟩}) → (𝑔:(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚 ↔ (𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚))
6765, 66spcev 3610 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚 → ∃𝑔 𝑔:(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚)
68 bren 8521 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑥 ∪ {𝑧}) ≈ suc 𝑚 ↔ ∃𝑔 𝑔:(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚)
6967, 68sylibr 236 . . . . . . . . . . . . . . . . . . . . 21 ((𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→suc 𝑚 → (𝑥 ∪ {𝑧}) ≈ suc 𝑚)
7062, 69sylbir 237 . . . . . . . . . . . . . . . . . . . 20 ((𝑓 ∪ {⟨𝑧, 𝑚⟩}):(𝑥 ∪ {𝑧})–1-1-onto→(𝑚 ∪ {𝑚}) → (𝑥 ∪ {𝑧}) ≈ suc 𝑚)
7159, 70syl 17 . . . . . . . . . . . . . . . . . . 19 ((𝑓:𝑥1-1-onto𝑚 ∧ (𝑧 ∈ (𝐴𝑥) ∧ 𝑚 ∈ ω)) → (𝑥 ∪ {𝑧}) ≈ suc 𝑚)
7271adantll 712 . . . . . . . . . . . . . . . . . 18 (((𝑥𝐴𝑓:𝑥1-1-onto𝑚) ∧ (𝑧 ∈ (𝐴𝑥) ∧ 𝑚 ∈ ω)) → (𝑥 ∪ {𝑧}) ≈ suc 𝑚)
73 vex 3500 . . . . . . . . . . . . . . . . . . . 20 𝑥 ∈ V
74 snex 5335 . . . . . . . . . . . . . . . . . . . 20 {𝑧} ∈ V
7573, 74unex 7472 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∪ {𝑧}) ∈ V
76 sseq1 3995 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑦𝐴 ↔ (𝑥 ∪ {𝑧}) ⊆ 𝐴))
77 breq1 5072 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = (𝑥 ∪ {𝑧}) → (𝑦 ≈ suc 𝑚 ↔ (𝑥 ∪ {𝑧}) ≈ suc 𝑚))
7876, 77anbi12d 632 . . . . . . . . . . . . . . . . . . 19 (𝑦 = (𝑥 ∪ {𝑧}) → ((𝑦𝐴𝑦 ≈ suc 𝑚) ↔ ((𝑥 ∪ {𝑧}) ⊆ 𝐴 ∧ (𝑥 ∪ {𝑧}) ≈ suc 𝑚)))
7975, 78spcev 3610 . . . . . . . . . . . . . . . . . 18 (((𝑥 ∪ {𝑧}) ⊆ 𝐴 ∧ (𝑥 ∪ {𝑧}) ≈ suc 𝑚) → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))
8046, 72, 79syl2anc 586 . . . . . . . . . . . . . . . . 17 (((𝑥𝐴𝑓:𝑥1-1-onto𝑚) ∧ (𝑧 ∈ (𝐴𝑥) ∧ 𝑚 ∈ ω)) → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))
8180expcom 416 . . . . . . . . . . . . . . . 16 ((𝑧 ∈ (𝐴𝑥) ∧ 𝑚 ∈ ω) → ((𝑥𝐴𝑓:𝑥1-1-onto𝑚) → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚)))
8281ex 415 . . . . . . . . . . . . . . 15 (𝑧 ∈ (𝐴𝑥) → (𝑚 ∈ ω → ((𝑥𝐴𝑓:𝑥1-1-onto𝑚) → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))))
8382exlimiv 1930 . . . . . . . . . . . . . 14 (∃𝑧 𝑧 ∈ (𝐴𝑥) → (𝑚 ∈ ω → ((𝑥𝐴𝑓:𝑥1-1-onto𝑚) → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))))
8440, 83sylbi 219 . . . . . . . . . . . . 13 (¬ (𝐴𝑥) = ∅ → (𝑚 ∈ ω → ((𝑥𝐴𝑓:𝑥1-1-onto𝑚) → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))))
8584com13 88 . . . . . . . . . . . 12 ((𝑥𝐴𝑓:𝑥1-1-onto𝑚) → (𝑚 ∈ ω → (¬ (𝐴𝑥) = ∅ → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))))
8685expcom 416 . . . . . . . . . . 11 (𝑓:𝑥1-1-onto𝑚 → (𝑥𝐴 → (𝑚 ∈ ω → (¬ (𝐴𝑥) = ∅ → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚)))))
8786exlimiv 1930 . . . . . . . . . 10 (∃𝑓 𝑓:𝑥1-1-onto𝑚 → (𝑥𝐴 → (𝑚 ∈ ω → (¬ (𝐴𝑥) = ∅ → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚)))))
8839, 87sylbi 219 . . . . . . . . 9 (𝑥𝑚 → (𝑥𝐴 → (𝑚 ∈ ω → (¬ (𝐴𝑥) = ∅ → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚)))))
89883imp21 1110 . . . . . . . 8 ((𝑥𝐴𝑥𝑚𝑚 ∈ ω) → (¬ (𝐴𝑥) = ∅ → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚)))
9038, 89syld 47 . . . . . . 7 ((𝑥𝐴𝑥𝑚𝑚 ∈ ω) → (¬ 𝐴 ∈ Fin → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚)))
91903expia 1117 . . . . . 6 ((𝑥𝐴𝑥𝑚) → (𝑚 ∈ ω → (¬ 𝐴 ∈ Fin → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))))
9291exlimiv 1930 . . . . 5 (∃𝑥(𝑥𝐴𝑥𝑚) → (𝑚 ∈ ω → (¬ 𝐴 ∈ Fin → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))))
9392com3l 89 . . . 4 (𝑚 ∈ ω → (¬ 𝐴 ∈ Fin → (∃𝑥(𝑥𝐴𝑥𝑚) → ∃𝑦(𝑦𝐴𝑦 ≈ suc 𝑚))))
943, 6, 13, 22, 93finds2 7613 . . 3 (𝑛 ∈ ω → (¬ 𝐴 ∈ Fin → ∃𝑥(𝑥𝐴𝑥𝑛)))
9594com12 32 . 2 𝐴 ∈ Fin → (𝑛 ∈ ω → ∃𝑥(𝑥𝐴𝑥𝑛)))
9695ralrimiv 3184 1 𝐴 ∈ Fin → ∀𝑛 ∈ ω ∃𝑥(𝑥𝐴𝑥𝑛))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  w3a 1083   = wceq 1536  wex 1779  wcel 2113  wral 3141  wrex 3142  cdif 3936  cun 3937  cin 3938  wss 3939  c0 4294  {csn 4570  cop 4576   class class class wbr 5069  Ord word 6193  suc csuc 6196  1-1-ontowf1o 6357  ωcom 7583  cen 8509  Fincfn 8512
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 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2796  ax-sep 5206  ax-nul 5213  ax-pow 5269  ax-pr 5333  ax-un 7464
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2803  df-cleq 2817  df-clel 2896  df-nfc 2966  df-ne 3020  df-ral 3146  df-rex 3147  df-rab 3150  df-v 3499  df-sbc 3776  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-pss 3957  df-nul 4295  df-if 4471  df-pw 4544  df-sn 4571  df-pr 4573  df-tp 4575  df-op 4577  df-uni 4842  df-br 5070  df-opab 5132  df-tr 5176  df-id 5463  df-eprel 5468  df-po 5477  df-so 5478  df-fr 5517  df-we 5519  df-xp 5564  df-rel 5565  df-cnv 5566  df-co 5567  df-dm 5568  df-rn 5569  df-res 5570  df-ima 5571  df-ord 6197  df-on 6198  df-lim 6199  df-suc 6200  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-om 7584  df-en 8513  df-fin 8516
This theorem is referenced by:  fineqvlem  8735  isinffi  9424  domtriomlem  9867  ishashinf  13824  ctbssinf  34691
  Copyright terms: Public domain W3C validator