isercolllem2 - Metamath Proof Explorer

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

Theorem isercolllem2 15626

Description: Lemma for isercoll 15628. (Contributed by Mario Carneiro, 6-Apr-2015.)

**Hypotheses**
Ref	Expression
isercoll.z	⊢ 𝑍 = (ℤ_≥‘𝑀)
isercoll.m	⊢ (𝜑 → 𝑀 ∈ ℤ)
isercoll.g	⊢ (𝜑 → 𝐺:ℕ⟶𝑍)
isercoll.i	⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) < (𝐺‘(𝑘 + 1)))

**Assertion**
Ref	Expression
isercolllem2	⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...(♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))) = (^◡𝐺 “ (𝑀...𝑁)))

Distinct variable groups: 𝑘,𝑁 𝜑,𝑘 𝑘,𝐺 𝑘,𝑀 Allowed substitution hint: 𝑍(𝑘)

Proof of Theorem isercolllem2 Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elfznn 13505	. . . . . . . 8 ⊢ (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → 𝑥 ∈ ℕ)
2	1	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → 𝑥 ∈ ℕ))
3		cnvimass 6041	. . . . . . . . 9 ⊢ (^◡𝐺 “ (𝑀...𝑁)) ⊆ dom 𝐺
4		isercoll.g	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺:ℕ⟶𝑍)
5	4	adantr 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺:ℕ⟶𝑍)
6	3, 5	fssdm 6681	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ)
7	6	sseld 3921	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ∈ ℕ))
8		id 22	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ ℕ)
9		nnuz 12825	. . . . . . . . . . 11 ⊢ ℕ = (ℤ_≥‘1)
10	8, 9	eleqtrdi 2850	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ (ℤ_≥‘1))
11		ltso 11224	. . . . . . . . . . . . . 14 ⊢ < Or ℝ
12	11	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → < Or ℝ)
13		fzfid 13933	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑀...𝑁) ∈ Fin)
14		ffun 6665	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺:ℕ⟶𝑍 → Fun 𝐺)
15		funimacnv 6573	. . . . . . . . . . . . . . . . 17 ⊢ (Fun 𝐺 → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) = ((𝑀...𝑁) ∩ ran 𝐺))
16	5, 14, 15	3syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) = ((𝑀...𝑁) ∩ ran 𝐺))
17		inss1 4172	. . . . . . . . . . . . . . . 16 ⊢ ((𝑀...𝑁) ∩ ran 𝐺) ⊆ (𝑀...𝑁)
18	16, 17	eqsstrdi 3966	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ⊆ (𝑀...𝑁))
19	13, 18	ssfid 9176	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin)
20		ssid 3944	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ℕ ⊆ ℕ
21		isercoll.z	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑍 = (ℤ_≥‘𝑀)
22		isercoll.m	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝑀 ∈ ℤ)
23		isercoll.i	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) < (𝐺‘(𝑘 + 1)))
24	21, 22, 4, 23	isercolllem1 15625	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ ℕ ⊆ ℕ) → (𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)))
25	20, 24	mpan2 697	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)))
26		ffn 6662	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺:ℕ⟶𝑍 → 𝐺 Fn ℕ)
27		fnresdm 6611	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺 Fn ℕ → (𝐺 ↾ ℕ) = 𝐺)
28		isoeq1 7268	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺 ↾ ℕ) = 𝐺 → ((𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)) ↔ 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ))))
29	4, 26, 27, 28	4syl 19	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)) ↔ 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ))))
30	25, 29	mpbid 233	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)))
31		isof1o 7274	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)) → 𝐺:ℕ–1-1-onto→(𝐺 “ ℕ))
32		f1ocnv 6786	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺:ℕ–1-1-onto→(𝐺 “ ℕ) → ^◡𝐺:(𝐺 “ ℕ)–1-1-onto→ℕ)
33		f1ofun 6776	. . . . . . . . . . . . . . . . . . 19 ⊢ (^◡𝐺:(𝐺 “ ℕ)–1-1-onto→ℕ → Fun ^◡𝐺)
34	30, 31, 32, 33	4syl 19	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → Fun ^◡𝐺)
35		df-f1 6497	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐺:ℕ–1-1→𝑍 ↔ (𝐺:ℕ⟶𝑍 ∧ Fun ^◡𝐺))
36	4, 34, 35	sylanbrc 589	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐺:ℕ–1-1→𝑍)
37	36	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺:ℕ–1-1→𝑍)
38		nnex 12178	. . . . . . . . . . . . . . . . 17 ⊢ ℕ ∈ V
39		ssexg 5258	. . . . . . . . . . . . . . . . 17 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ ∧ ℕ ∈ V) → (^◡𝐺 “ (𝑀...𝑁)) ∈ V)
40	6, 38, 39	sylancl 592	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ V)
41		f1imaeng 8958	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺:ℕ–1-1→𝑍 ∧ (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ ∧ (^◡𝐺 “ (𝑀...𝑁)) ∈ V) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ≈ (^◡𝐺 “ (𝑀...𝑁)))
42	37, 6, 40, 41	syl3anc 1379	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ≈ (^◡𝐺 “ (𝑀...𝑁)))
43	42	ensymd 8949	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))
44		enfii 9117	. . . . . . . . . . . . . 14 ⊢ (((𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin ∧ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin)
45	19, 43, 44	syl2anc 590	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin)
46		1nn 12183	. . . . . . . . . . . . . . . 16 ⊢ 1 ∈ ℕ
47	46	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 1 ∈ ℕ)
48		ffvelcdm 7029	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐺:ℕ⟶𝑍 ∧ 1 ∈ ℕ) → (𝐺‘1) ∈ 𝑍)
49	4, 46, 48	sylancl 592	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝐺‘1) ∈ 𝑍)
50	49, 21	eleqtrdi 2850	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐺‘1) ∈ (ℤ_≥‘𝑀))
51	50	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘1) ∈ (ℤ_≥‘𝑀))
52		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝑁 ∈ (ℤ_≥‘(𝐺‘1)))
53		elfzuzb 13470	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺‘1) ∈ (𝑀...𝑁) ↔ ((𝐺‘1) ∈ (ℤ_≥‘𝑀) ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))))
54	51, 52, 53	sylanbrc 589	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘1) ∈ (𝑀...𝑁))
55	5	ffnd 6663	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺 Fn ℕ)
56		elpreima 7006	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 Fn ℕ → (1 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (1 ∈ ℕ ∧ (𝐺‘1) ∈ (𝑀...𝑁))))
57	55, 56	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (1 ∈ ℕ ∧ (𝐺‘1) ∈ (𝑀...𝑁))))
58	47, 54, 57	mpbir2and 719	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 1 ∈ (^◡𝐺 “ (𝑀...𝑁)))
59	58	ne0d 4277	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅)
60		nnssre 12176	. . . . . . . . . . . . . 14 ⊢ ℕ ⊆ ℝ
61	6, 60	sstrdi 3934	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ)
62		fisupcl 9380	. . . . . . . . . . . . 13 ⊢ (( < Or ℝ ∧ ((^◡𝐺 “ (𝑀...𝑁)) ∈ Fin ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ)) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)))
63	12, 45, 59, 61, 62	syl13anc 1380	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)))
64	6, 63	sseldd 3923	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)
65	64	nnzd 12548	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℤ)
66		elfz5 13468	. . . . . . . . . 10 ⊢ ((𝑥 ∈ (ℤ_≥‘1) ∧ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℤ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
67	10, 65, 66	syl2anr 603	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
68		elpreima 7006	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 Fn ℕ → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁))))
69	55, 68	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁))))
70	63, 69	mpbid 233	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁)))
71		elfzle2 13480	. . . . . . . . . . . . . . 15 ⊢ ((𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
72	70, 71	simpl2im 508	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
73	72	adantr 481	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
74		uzssz 12807	. . . . . . . . . . . . . . . . 17 ⊢ (ℤ_≥‘𝑀) ⊆ ℤ
75	21, 74	eqsstri 3968	. . . . . . . . . . . . . . . 16 ⊢ 𝑍 ⊆ ℤ
76		zssre 12529	. . . . . . . . . . . . . . . 16 ⊢ ℤ ⊆ ℝ
77	75, 76	sstri 3931	. . . . . . . . . . . . . . 15 ⊢ 𝑍 ⊆ ℝ
78	5	ffvelcdmda 7032	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ 𝑍)
79	77, 78	sselid 3920	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ ℝ)
80	5, 64	ffvelcdmd 7033	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ 𝑍)
81	80	adantr 481	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ 𝑍)
82	77, 81	sselid 3920	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ ℝ)
83		eluzelz 12796	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘(𝐺‘1)) → 𝑁 ∈ ℤ)
84	83	ad2antlr 733	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑁 ∈ ℤ)
85	76, 84	sselid 3920	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑁 ∈ ℝ)
86		letr 11238	. . . . . . . . . . . . . 14 ⊢ (((𝐺‘𝑥) ∈ ℝ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁) → (𝐺‘𝑥) ≤ 𝑁))
87	79, 82, 85, 86	syl3anc 1379	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁) → (𝐺‘𝑥) ≤ 𝑁))
88	73, 87	mpan2d 700	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → (𝐺‘𝑥) ≤ 𝑁))
89	30	ad2antrr 732	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)))
90	60	a1i 11	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ℕ ⊆ ℝ)
91		ressxr 11187	. . . . . . . . . . . . . 14 ⊢ ℝ ⊆ ℝ^*
92	90, 91	sstrdi 3934	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ℕ ⊆ ℝ^*)
93		imassrn 6030	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 “ ℕ) ⊆ ran 𝐺
94	4	ad2antrr 732	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝐺:ℕ⟶𝑍)
95	94	frnd 6670	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ran 𝐺 ⊆ 𝑍)
96	93, 95	sstrid 3933	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ 𝑍)
97	96, 77	sstrdi 3934	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ ℝ)
98	97, 91	sstrdi 3934	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ ℝ^*)
99		simpr 485	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑥 ∈ ℕ)
100	64	adantr 481	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)
101		leisorel 14420	. . . . . . . . . . . . 13 ⊢ ((𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)) ∧ (ℕ ⊆ ℝ^* ∧ (𝐺 “ ℕ) ⊆ ℝ^*) ∧ (𝑥 ∈ ℕ ∧ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ (𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))))
102	89, 92, 98, 99, 100, 101	syl122anc 1387	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ (𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))))
103	78, 21	eleqtrdi 2850	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ (ℤ_≥‘𝑀))
104		elfz5 13468	. . . . . . . . . . . . 13 ⊢ (((𝐺‘𝑥) ∈ (ℤ_≥‘𝑀) ∧ 𝑁 ∈ ℤ) → ((𝐺‘𝑥) ∈ (𝑀...𝑁) ↔ (𝐺‘𝑥) ≤ 𝑁))
105	103, 84, 104	syl2anc 590	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ((𝐺‘𝑥) ∈ (𝑀...𝑁) ↔ (𝐺‘𝑥) ≤ 𝑁))
106	88, 102, 105	3imtr4d 295	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) → (𝐺‘𝑥) ∈ (𝑀...𝑁)))
107		elpreima 7006	. . . . . . . . . . . . 13 ⊢ (𝐺 Fn ℕ → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝑥 ∈ ℕ ∧ (𝐺‘𝑥) ∈ (𝑀...𝑁))))
108	107	baibd 544	. . . . . . . . . . . 12 ⊢ ((𝐺 Fn ℕ ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝐺‘𝑥) ∈ (𝑀...𝑁)))
109	55, 108	sylan 586	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝐺‘𝑥) ∈ (𝑀...𝑁)))
110	106, 109	sylibrd 260	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) → 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
111		fimaxre2 12099	. . . . . . . . . . . . 13 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥)
112	61, 45, 111	syl2anc 590	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥)
113		suprub 12115	. . . . . . . . . . . . 13 ⊢ ((((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥) ∧ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
114	113	ex 413	. . . . . . . . . . . 12 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
115	61, 59, 112, 114	syl3anc 1379	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
116	115	adantr 481	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
117	110, 116	impbid 213	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
118	67, 117	bitrd 280	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
119	118	ex 413	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ ℕ → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)))))
120	2, 7, 119	pm5.21ndd 380	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
121	120	eqrdv 2738	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) = (^◡𝐺 “ (𝑀...𝑁)))
122	121	fveq2d 6838	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = (♯‘(^◡𝐺 “ (𝑀...𝑁))))
123	64	nnnn0d 12496	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ₀)
124		hashfz1 14306	. . . . 5 ⊢ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ₀ → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
125	123, 124	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
126		hashen 14307	. . . . . 6 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ∈ Fin ∧ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin) → ((♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) ↔ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
127	45, 19, 126	syl2anc 590	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → ((♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) ↔ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
128	43, 127	mpbird 258	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
129	122, 125, 128	3eqtr3d 2783	. . 3 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
130	129	oveq2d 7379	. 2 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) = (1...(♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))))
131	130, 121	eqtr3d 2777	1 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...(♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))) = (^◡𝐺 “ (𝑀...𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 207 ∧ wa 396 ∧ w3a 1092 = wceq 1547 ∈ wcel 2119 ≠ wne 2935 ∀wral 3054 ∃wrex 3064 Vcvv 3432 ∩ cin 3889 ⊆ wss 3890 ∅c0 4268 class class class wbr 5079 Or wor 5532 ^◡ccnv 5624 ran crn 5626 ↾ cres 5627 “ cima 5628 Fun wfun 6486 Fn wfn 6487 ⟶wf 6488 –1-1→wf1 6489 –1-1-onto→wf1o 6491 ‘cfv 6492 Isom wiso 6493 (class class class)co 7363 ≈ cen 8887 Fincfn 8890 supcsup 9350 ℝcr 11035 1c1 11037 + caddc 11039 ℝ^*cxr 11176 < clt 11177 ≤ cle 11178 ℕcn 12172 ℕ₀cn0 12435 ℤcz 12522 ℤ_≥cuz 12786 ...cfz 13459 ♯chash 14290

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1802 ax-4 1816 ax-5 1917 ax-6 1974 ax-7 2015 ax-8 2121 ax-9 2129 ax-10 2152 ax-11 2168 ax-12 2189 ax-ext 2712 ax-rep 5206 ax-sep 5225 ax-nul 5235 ax-pow 5301 ax-pr 5369 ax-un 7685 ax-cnex 11092 ax-resscn 11093 ax-1cn 11094 ax-icn 11095 ax-addcl 11096 ax-addrcl 11097 ax-mulcl 11098 ax-mulrcl 11099 ax-mulcom 11100 ax-addass 11101 ax-mulass 11102 ax-distr 11103 ax-i2m1 11104 ax-1ne0 11105 ax-1rid 11106 ax-rnegex 11107 ax-rrecex 11108 ax-cnre 11109 ax-pre-lttri 11110 ax-pre-lttrn 11111 ax-pre-ltadd 11112 ax-pre-mulgt0 11113 ax-pre-sup 11114

This theorem depends on definitions: df-bi 208 df-an 397 df-or 854 df-3or 1093 df-3an 1094 df-tru 1550 df-fal 1560 df-ex 1787 df-nf 1791 df-sb 2074 df-mo 2543 df-eu 2573 df-clab 2719 df-cleq 2732 df-clel 2815 df-nfc 2889 df-ne 2936 df-nel 3040 df-ral 3055 df-rex 3065 df-rmo 3345 df-reu 3346 df-rab 3393 df-v 3434 df-sbc 3731 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-pss 3910 df-nul 4269 df-if 4462 df-pw 4538 df-sn 4563 df-pr 4565 df-op 4569 df-uni 4846 df-int 4885 df-iun 4930 df-br 5080 df-opab 5142 df-mpt 5161 df-tr 5187 df-id 5520 df-eprel 5525 df-po 5533 df-so 5534 df-fr 5578 df-we 5580 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-pred 6259 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-isom 6501 df-riota 7320 df-ov 7366 df-oprab 7367 df-mpo 7368 df-om 7814 df-1st 7938 df-2nd 7939 df-frecs 8228 df-wrecs 8259 df-recs 8308 df-rdg 8346 df-1o 8402 df-er 8640 df-en 8891 df-dom 8892 df-sdom 8893 df-fin 8894 df-sup 9352 df-card 9861 df-pnf 11179 df-mnf 11180 df-xr 11181 df-ltxr 11182 df-le 11183 df-sub 11377 df-neg 11378 df-nn 12173 df-n0 12436 df-z 12523 df-uz 12787 df-fz 13460 df-hash 14291

This theorem is referenced by: isercolllem3 15627

W3C validator