erdszelem7 - Mathbox for Mario Carneiro

	Mathbox for Mario Carneiro		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > erdszelem7		Structured version Visualization version GIF version

Theorem erdszelem7 33878

Description: Lemma for erdsze 33883. (Contributed by Mario Carneiro, 22-Jan-2015.)

**Hypotheses**
Ref	Expression
erdsze.n	⊢ (𝜑 → 𝑁 ∈ ℕ)
erdsze.f	⊢ (𝜑 → 𝐹:(1...𝑁)–1-1→ℝ)
erdszelem.k	⊢ 𝐾 = (𝑥 ∈ (1...𝑁) ↦ sup((♯ “ {𝑦 ∈ 𝒫 (1...𝑥) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝑥 ∈ 𝑦)}), ℝ, < ))
erdszelem.o	⊢ 𝑂 Or ℝ
erdszelem.a	⊢ (𝜑 → 𝐴 ∈ (1...𝑁))
erdszelem7.r	⊢ (𝜑 → 𝑅 ∈ ℕ)
erdszelem7.m	⊢ (𝜑 → ¬ (𝐾‘𝐴) ∈ (1...(𝑅 − 1)))

**Assertion**
Ref	Expression
erdszelem7	⊢ (𝜑 → ∃𝑠 ∈ 𝒫 (1...𝑁)(𝑅 ≤ (♯‘𝑠) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠))))

Distinct variable groups: 𝑥,𝑦,𝑠,𝐹 𝐾,𝑠 𝐴,𝑠,𝑥,𝑦 𝑂,𝑠,𝑥,𝑦 𝑅,𝑠,𝑥,𝑦 𝑁,𝑠,𝑥,𝑦 𝜑,𝑠,𝑥,𝑦 Allowed substitution hints: 𝐾(𝑥,𝑦)

**Proof of Theorem erdszelem7**
Step	Hyp	Ref	Expression
1		hashf 14248	. . . 4 ⊢ ♯:V⟶(ℕ₀ ∪ {+∞})
2		ffun 6676	. . . 4 ⊢ (♯:V⟶(ℕ₀ ∪ {+∞}) → Fun ♯)
3	1, 2	ax-mp 5	. . 3 ⊢ Fun ♯
4		erdszelem.a	. . . 4 ⊢ (𝜑 → 𝐴 ∈ (1...𝑁))
5		erdsze.n	. . . . 5 ⊢ (𝜑 → 𝑁 ∈ ℕ)
6		erdsze.f	. . . . 5 ⊢ (𝜑 → 𝐹:(1...𝑁)–1-1→ℝ)
7		erdszelem.k	. . . . 5 ⊢ 𝐾 = (𝑥 ∈ (1...𝑁) ↦ sup((♯ “ {𝑦 ∈ 𝒫 (1...𝑥) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝑥 ∈ 𝑦)}), ℝ, < ))
8		erdszelem.o	. . . . 5 ⊢ 𝑂 Or ℝ
9	5, 6, 7, 8	erdszelem5 33876	. . . 4 ⊢ ((𝜑 ∧ 𝐴 ∈ (1...𝑁)) → (𝐾‘𝐴) ∈ (♯ “ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}))
10	4, 9	mpdan 685	. . 3 ⊢ (𝜑 → (𝐾‘𝐴) ∈ (♯ “ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}))
11		fvelima 6913	. . 3 ⊢ ((Fun ♯ ∧ (𝐾‘𝐴) ∈ (♯ “ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)})) → ∃𝑠 ∈ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)} (♯‘𝑠) = (𝐾‘𝐴))
12	3, 10, 11	sylancr 587	. 2 ⊢ (𝜑 → ∃𝑠 ∈ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)} (♯‘𝑠) = (𝐾‘𝐴))
13		eqid 2731	. . . . . 6 ⊢ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)} = {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}
14	13	erdszelem1 33872	. . . . 5 ⊢ (𝑠 ∈ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)} ↔ (𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠))
15		simprl1 1218	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → 𝑠 ⊆ (1...𝐴))
16		elfzuz3 13448	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (1...𝑁) → 𝑁 ∈ (ℤ_≥‘𝐴))
17		fzss2 13491	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘𝐴) → (1...𝐴) ⊆ (1...𝑁))
18	4, 16, 17	3syl 18	. . . . . . . . . 10 ⊢ (𝜑 → (1...𝐴) ⊆ (1...𝑁))
19	18	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → (1...𝐴) ⊆ (1...𝑁))
20	15, 19	sstrd 3957	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → 𝑠 ⊆ (1...𝑁))
21		velpw 4570	. . . . . . . 8 ⊢ (𝑠 ∈ 𝒫 (1...𝑁) ↔ 𝑠 ⊆ (1...𝑁))
22	20, 21	sylibr 233	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → 𝑠 ∈ 𝒫 (1...𝑁))
23		erdszelem7.m	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (𝐾‘𝐴) ∈ (1...(𝑅 − 1)))
24	5, 6, 7, 8	erdszelem6 33877	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐾:(1...𝑁)⟶ℕ)
25	24, 4	ffvelcdmd 7041	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐾‘𝐴) ∈ ℕ)
26		nnuz 12815	. . . . . . . . . . . . . 14 ⊢ ℕ = (ℤ_≥‘1)
27	25, 26	eleqtrdi 2842	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐾‘𝐴) ∈ (ℤ_≥‘1))
28		erdszelem7.r	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ ℕ)
29		nnz 12529	. . . . . . . . . . . . . 14 ⊢ (𝑅 ∈ ℕ → 𝑅 ∈ ℤ)
30		peano2zm 12555	. . . . . . . . . . . . . 14 ⊢ (𝑅 ∈ ℤ → (𝑅 − 1) ∈ ℤ)
31	28, 29, 30	3syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑅 − 1) ∈ ℤ)
32		elfz5 13443	. . . . . . . . . . . . 13 ⊢ (((𝐾‘𝐴) ∈ (ℤ_≥‘1) ∧ (𝑅 − 1) ∈ ℤ) → ((𝐾‘𝐴) ∈ (1...(𝑅 − 1)) ↔ (𝐾‘𝐴) ≤ (𝑅 − 1)))
33	27, 31, 32	syl2anc 584	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐾‘𝐴) ∈ (1...(𝑅 − 1)) ↔ (𝐾‘𝐴) ≤ (𝑅 − 1)))
34		nnltlem1 12579	. . . . . . . . . . . . 13 ⊢ (((𝐾‘𝐴) ∈ ℕ ∧ 𝑅 ∈ ℕ) → ((𝐾‘𝐴) < 𝑅 ↔ (𝐾‘𝐴) ≤ (𝑅 − 1)))
35	25, 28, 34	syl2anc 584	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝐾‘𝐴) < 𝑅 ↔ (𝐾‘𝐴) ≤ (𝑅 − 1)))
36	33, 35	bitr4d 281	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝐾‘𝐴) ∈ (1...(𝑅 − 1)) ↔ (𝐾‘𝐴) < 𝑅))
37	23, 36	mtbid 323	. . . . . . . . . 10 ⊢ (𝜑 → ¬ (𝐾‘𝐴) < 𝑅)
38	28	nnred 12177	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑅 ∈ ℝ)
39	13	erdszelem2 33873	. . . . . . . . . . . . . 14 ⊢ ((♯ “ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}) ∈ Fin ∧ (♯ “ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}) ⊆ ℕ)
40	39	simpri 486	. . . . . . . . . . . . 13 ⊢ (♯ “ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}) ⊆ ℕ
41		nnssre 12166	. . . . . . . . . . . . 13 ⊢ ℕ ⊆ ℝ
42	40, 41	sstri 3956	. . . . . . . . . . . 12 ⊢ (♯ “ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}) ⊆ ℝ
43	42, 10	sselid 3945	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐾‘𝐴) ∈ ℝ)
44	38, 43	lenltd 11310	. . . . . . . . . 10 ⊢ (𝜑 → (𝑅 ≤ (𝐾‘𝐴) ↔ ¬ (𝐾‘𝐴) < 𝑅))
45	37, 44	mpbird 256	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ≤ (𝐾‘𝐴))
46	45	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → 𝑅 ≤ (𝐾‘𝐴))
47		simprr 771	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → (♯‘𝑠) = (𝐾‘𝐴))
48	46, 47	breqtrrd 5138	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → 𝑅 ≤ (♯‘𝑠))
49		simprl2 1219	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)))
50	22, 48, 49	jca32 516	. . . . . 6 ⊢ ((𝜑 ∧ ((𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠) ∧ (♯‘𝑠) = (𝐾‘𝐴))) → (𝑠 ∈ 𝒫 (1...𝑁) ∧ (𝑅 ≤ (♯‘𝑠) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)))))
51	50	expr 457	. . . . 5 ⊢ ((𝜑 ∧ (𝑠 ⊆ (1...𝐴) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)) ∧ 𝐴 ∈ 𝑠)) → ((♯‘𝑠) = (𝐾‘𝐴) → (𝑠 ∈ 𝒫 (1...𝑁) ∧ (𝑅 ≤ (♯‘𝑠) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠))))))
52	14, 51	sylan2b 594	. . . 4 ⊢ ((𝜑 ∧ 𝑠 ∈ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)}) → ((♯‘𝑠) = (𝐾‘𝐴) → (𝑠 ∈ 𝒫 (1...𝑁) ∧ (𝑅 ≤ (♯‘𝑠) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠))))))
53	52	expimpd 454	. . 3 ⊢ (𝜑 → ((𝑠 ∈ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)} ∧ (♯‘𝑠) = (𝐾‘𝐴)) → (𝑠 ∈ 𝒫 (1...𝑁) ∧ (𝑅 ≤ (♯‘𝑠) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠))))))
54	53	reximdv2 3157	. 2 ⊢ (𝜑 → (∃𝑠 ∈ {𝑦 ∈ 𝒫 (1...𝐴) ∣ ((𝐹 ↾ 𝑦) Isom < , 𝑂 (𝑦, (𝐹 “ 𝑦)) ∧ 𝐴 ∈ 𝑦)} (♯‘𝑠) = (𝐾‘𝐴) → ∃𝑠 ∈ 𝒫 (1...𝑁)(𝑅 ≤ (♯‘𝑠) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠)))))
55	12, 54	mpd 15	1 ⊢ (𝜑 → ∃𝑠 ∈ 𝒫 (1...𝑁)(𝑅 ≤ (♯‘𝑠) ∧ (𝐹 ↾ 𝑠) Isom < , 𝑂 (𝑠, (𝐹 “ 𝑠))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 396 ∧ w3a 1087 = wceq 1541 ∈ wcel 2106 ∃wrex 3069 {crab 3405 Vcvv 3446 ∪ cun 3911 ⊆ wss 3913 𝒫 cpw 4565 {csn 4591 class class class wbr 5110 ↦ cmpt 5193 Or wor 5549 ↾ cres 5640 “ cima 5641 Fun wfun 6495 ⟶wf 6497 –1-1→wf1 6498 ‘cfv 6501 Isom wiso 6502 (class class class)co 7362 Fincfn 8890 supcsup 9385 ℝcr 11059 1c1 11061 +∞cpnf 11195 < clt 11198 ≤ cle 11199 − cmin 11394 ℕcn 12162 ℕ₀cn0 12422 ℤcz 12508 ℤ_≥cuz 12772 ...cfz 13434 ♯chash 14240

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 2702 ax-sep 5261 ax-nul 5268 ax-pow 5325 ax-pr 5389 ax-un 7677 ax-cnex 11116 ax-resscn 11117 ax-1cn 11118 ax-icn 11119 ax-addcl 11120 ax-addrcl 11121 ax-mulcl 11122 ax-mulrcl 11123 ax-mulcom 11124 ax-addass 11125 ax-mulass 11126 ax-distr 11127 ax-i2m1 11128 ax-1ne0 11129 ax-1rid 11130 ax-rnegex 11131 ax-rrecex 11132 ax-cnre 11133 ax-pre-lttri 11134 ax-pre-lttrn 11135 ax-pre-ltadd 11136 ax-pre-mulgt0 11137

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 2533 df-eu 2562 df-clab 2709 df-cleq 2723 df-clel 2809 df-nfc 2884 df-ne 2940 df-nel 3046 df-ral 3061 df-rex 3070 df-rmo 3351 df-reu 3352 df-rab 3406 df-v 3448 df-sbc 3743 df-csb 3859 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3932 df-nul 4288 df-if 4492 df-pw 4567 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4871 df-int 4913 df-iun 4961 df-br 5111 df-opab 5173 df-mpt 5194 df-tr 5228 df-id 5536 df-eprel 5542 df-po 5550 df-so 5551 df-fr 5593 df-we 5595 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6258 df-ord 6325 df-on 6326 df-lim 6327 df-suc 6328 df-iota 6453 df-fun 6503 df-fn 6504 df-f 6505 df-f1 6506 df-fo 6507 df-f1o 6508 df-fv 6509 df-isom 6510 df-riota 7318 df-ov 7365 df-oprab 7366 df-mpo 7367 df-om 7808 df-1st 7926 df-2nd 7927 df-frecs 8217 df-wrecs 8248 df-recs 8322 df-rdg 8361 df-1o 8417 df-er 8655 df-en 8891 df-dom 8892 df-sdom 8893 df-fin 8894 df-sup 9387 df-card 9884 df-pnf 11200 df-mnf 11201 df-xr 11202 df-ltxr 11203 df-le 11204 df-sub 11396 df-neg 11397 df-nn 12163 df-n0 12423 df-xnn0 12495 df-z 12509 df-uz 12773 df-fz 13435 df-hash 14241

This theorem is referenced by: erdszelem11 33882

W3C validator