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 15024

Description: Lemma for isercoll 15026. (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 12939	. . . . . . . 8 ⊢ (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → 𝑥 ∈ ℕ)
2	1	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → 𝑥 ∈ ℕ))
3		cnvimass 5951	. . . . . . . . 9 ⊢ (^◡𝐺 “ (𝑀...𝑁)) ⊆ dom 𝐺
4		isercoll.g	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺:ℕ⟶𝑍)
5	4	adantr 483	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺:ℕ⟶𝑍)
6	3, 5	fssdm 6532	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ)
7	6	sseld 3968	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ∈ ℕ))
8		id 22	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ ℕ)
9		nnuz 12284	. . . . . . . . . . 11 ⊢ ℕ = (ℤ_≥‘1)
10	8, 9	eleqtrdi 2925	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ (ℤ_≥‘1))
11		ltso 10723	. . . . . . . . . . . . . 14 ⊢ < Or ℝ
12	11	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → < Or ℝ)
13		fzfid 13344	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑀...𝑁) ∈ Fin)
14		ffun 6519	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺:ℕ⟶𝑍 → Fun 𝐺)
15		funimacnv 6437	. . . . . . . . . . . . . . . . 17 ⊢ (Fun 𝐺 → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) = ((𝑀...𝑁) ∩ ran 𝐺))
16	5, 14, 15	3syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) = ((𝑀...𝑁) ∩ ran 𝐺))
17		inss1 4207	. . . . . . . . . . . . . . . 16 ⊢ ((𝑀...𝑁) ∩ ran 𝐺) ⊆ (𝑀...𝑁)
18	16, 17	eqsstrdi 4023	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ⊆ (𝑀...𝑁))
19	13, 18	ssfid 8743	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin)
20		ssid 3991	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ℕ ⊆ ℕ
21		isercoll.z	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑍 = (ℤ_≥‘𝑀)
22		isercoll.m	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝑀 ∈ ℤ)
23		isercoll.i	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) < (𝐺‘(𝑘 + 1)))
24	21, 22, 4, 23	isercolllem1 15023	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ ℕ ⊆ ℕ) → (𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)))
25	20, 24	mpan2 689	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)))
26		ffn 6516	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺:ℕ⟶𝑍 → 𝐺 Fn ℕ)
27		fnresdm 6468	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺 Fn ℕ → (𝐺 ↾ ℕ) = 𝐺)
28		isoeq1 7072	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺 ↾ ℕ) = 𝐺 → ((𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)) ↔ 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ))))
29	4, 26, 27, 28	4syl 19	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)) ↔ 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ))))
30	25, 29	mpbid 234	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)))
31		isof1o 7078	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)) → 𝐺:ℕ–1-1-onto→(𝐺 “ ℕ))
32		f1ocnv 6629	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺:ℕ–1-1-onto→(𝐺 “ ℕ) → ^◡𝐺:(𝐺 “ ℕ)–1-1-onto→ℕ)
33		f1ofun 6619	. . . . . . . . . . . . . . . . . . 19 ⊢ (^◡𝐺:(𝐺 “ ℕ)–1-1-onto→ℕ → Fun ^◡𝐺)
34	30, 31, 32, 33	4syl 19	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → Fun ^◡𝐺)
35		df-f1 6362	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐺:ℕ–1-1→𝑍 ↔ (𝐺:ℕ⟶𝑍 ∧ Fun ^◡𝐺))
36	4, 34, 35	sylanbrc 585	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐺:ℕ–1-1→𝑍)
37	36	adantr 483	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺:ℕ–1-1→𝑍)
38		nnex 11646	. . . . . . . . . . . . . . . . 17 ⊢ ℕ ∈ V
39		ssexg 5229	. . . . . . . . . . . . . . . . 17 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ ∧ ℕ ∈ V) → (^◡𝐺 “ (𝑀...𝑁)) ∈ V)
40	6, 38, 39	sylancl 588	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ V)
41		f1imaeng 8571	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺:ℕ–1-1→𝑍 ∧ (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ ∧ (^◡𝐺 “ (𝑀...𝑁)) ∈ V) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ≈ (^◡𝐺 “ (𝑀...𝑁)))
42	37, 6, 40, 41	syl3anc 1367	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ≈ (^◡𝐺 “ (𝑀...𝑁)))
43	42	ensymd 8562	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))
44		enfii 8737	. . . . . . . . . . . . . 14 ⊢ (((𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin ∧ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin)
45	19, 43, 44	syl2anc 586	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin)
46		1nn 11651	. . . . . . . . . . . . . . . 16 ⊢ 1 ∈ ℕ
47	46	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 1 ∈ ℕ)
48		ffvelrn 6851	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐺:ℕ⟶𝑍 ∧ 1 ∈ ℕ) → (𝐺‘1) ∈ 𝑍)
49	4, 46, 48	sylancl 588	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝐺‘1) ∈ 𝑍)
50	49, 21	eleqtrdi 2925	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐺‘1) ∈ (ℤ_≥‘𝑀))
51	50	adantr 483	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘1) ∈ (ℤ_≥‘𝑀))
52		simpr 487	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝑁 ∈ (ℤ_≥‘(𝐺‘1)))
53		elfzuzb 12905	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺‘1) ∈ (𝑀...𝑁) ↔ ((𝐺‘1) ∈ (ℤ_≥‘𝑀) ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))))
54	51, 52, 53	sylanbrc 585	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘1) ∈ (𝑀...𝑁))
55	5	ffnd 6517	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺 Fn ℕ)
56		elpreima 6830	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 Fn ℕ → (1 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (1 ∈ ℕ ∧ (𝐺‘1) ∈ (𝑀...𝑁))))
57	55, 56	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (1 ∈ ℕ ∧ (𝐺‘1) ∈ (𝑀...𝑁))))
58	47, 54, 57	mpbir2and 711	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 1 ∈ (^◡𝐺 “ (𝑀...𝑁)))
59	58	ne0d 4303	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅)
60		nnssre 11644	. . . . . . . . . . . . . 14 ⊢ ℕ ⊆ ℝ
61	6, 60	sstrdi 3981	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ)
62		fisupcl 8935	. . . . . . . . . . . . 13 ⊢ (( < Or ℝ ∧ ((^◡𝐺 “ (𝑀...𝑁)) ∈ Fin ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ)) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)))
63	12, 45, 59, 61, 62	syl13anc 1368	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)))
64	6, 63	sseldd 3970	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)
65	64	nnzd 12089	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℤ)
66		elfz5 12903	. . . . . . . . . 10 ⊢ ((𝑥 ∈ (ℤ_≥‘1) ∧ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℤ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
67	10, 65, 66	syl2anr 598	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
68		elpreima 6830	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 Fn ℕ → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁))))
69	55, 68	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁))))
70	63, 69	mpbid 234	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁)))
71		elfzle2 12914	. . . . . . . . . . . . . . 15 ⊢ ((𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
72	70, 71	simpl2im 506	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
73	72	adantr 483	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
74		uzssz 12267	. . . . . . . . . . . . . . . . 17 ⊢ (ℤ_≥‘𝑀) ⊆ ℤ
75	21, 74	eqsstri 4003	. . . . . . . . . . . . . . . 16 ⊢ 𝑍 ⊆ ℤ
76		zssre 11991	. . . . . . . . . . . . . . . 16 ⊢ ℤ ⊆ ℝ
77	75, 76	sstri 3978	. . . . . . . . . . . . . . 15 ⊢ 𝑍 ⊆ ℝ
78	5	ffvelrnda 6853	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ 𝑍)
79	77, 78	sseldi 3967	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ ℝ)
80	5, 64	ffvelrnd 6854	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ 𝑍)
81	80	adantr 483	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ 𝑍)
82	77, 81	sseldi 3967	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ ℝ)
83		eluzelz 12256	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘(𝐺‘1)) → 𝑁 ∈ ℤ)
84	83	ad2antlr 725	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑁 ∈ ℤ)
85	76, 84	sseldi 3967	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑁 ∈ ℝ)
86		letr 10736	. . . . . . . . . . . . . 14 ⊢ (((𝐺‘𝑥) ∈ ℝ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁) → (𝐺‘𝑥) ≤ 𝑁))
87	79, 82, 85, 86	syl3anc 1367	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁) → (𝐺‘𝑥) ≤ 𝑁))
88	73, 87	mpan2d 692	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → (𝐺‘𝑥) ≤ 𝑁))
89	30	ad2antrr 724	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)))
90	60	a1i 11	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ℕ ⊆ ℝ)
91		ressxr 10687	. . . . . . . . . . . . . 14 ⊢ ℝ ⊆ ℝ^*
92	90, 91	sstrdi 3981	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ℕ ⊆ ℝ^*)
93		imassrn 5942	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 “ ℕ) ⊆ ran 𝐺
94	4	ad2antrr 724	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝐺:ℕ⟶𝑍)
95	94	frnd 6523	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ran 𝐺 ⊆ 𝑍)
96	93, 95	sstrid 3980	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ 𝑍)
97	96, 77	sstrdi 3981	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ ℝ)
98	97, 91	sstrdi 3981	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ ℝ^*)
99		simpr 487	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑥 ∈ ℕ)
100	64	adantr 483	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)
101		leisorel 13821	. . . . . . . . . . . . 13 ⊢ ((𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)) ∧ (ℕ ⊆ ℝ^* ∧ (𝐺 “ ℕ) ⊆ ℝ^*) ∧ (𝑥 ∈ ℕ ∧ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ (𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))))
102	89, 92, 98, 99, 100, 101	syl122anc 1375	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ (𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))))
103	78, 21	eleqtrdi 2925	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ (ℤ_≥‘𝑀))
104		elfz5 12903	. . . . . . . . . . . . 13 ⊢ (((𝐺‘𝑥) ∈ (ℤ_≥‘𝑀) ∧ 𝑁 ∈ ℤ) → ((𝐺‘𝑥) ∈ (𝑀...𝑁) ↔ (𝐺‘𝑥) ≤ 𝑁))
105	103, 84, 104	syl2anc 586	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ((𝐺‘𝑥) ∈ (𝑀...𝑁) ↔ (𝐺‘𝑥) ≤ 𝑁))
106	88, 102, 105	3imtr4d 296	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) → (𝐺‘𝑥) ∈ (𝑀...𝑁)))
107		elpreima 6830	. . . . . . . . . . . . 13 ⊢ (𝐺 Fn ℕ → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝑥 ∈ ℕ ∧ (𝐺‘𝑥) ∈ (𝑀...𝑁))))
108	107	baibd 542	. . . . . . . . . . . 12 ⊢ ((𝐺 Fn ℕ ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝐺‘𝑥) ∈ (𝑀...𝑁)))
109	55, 108	sylan 582	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝐺‘𝑥) ∈ (𝑀...𝑁)))
110	106, 109	sylibrd 261	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) → 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
111		fimaxre2 11588	. . . . . . . . . . . . 13 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥)
112	61, 45, 111	syl2anc 586	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥)
113		suprub 11604	. . . . . . . . . . . . 13 ⊢ ((((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥) ∧ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
114	113	ex 415	. . . . . . . . . . . 12 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
115	61, 59, 112, 114	syl3anc 1367	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
116	115	adantr 483	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
117	110, 116	impbid 214	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
118	67, 117	bitrd 281	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
119	118	ex 415	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ ℕ → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)))))
120	2, 7, 119	pm5.21ndd 383	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
121	120	eqrdv 2821	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) = (^◡𝐺 “ (𝑀...𝑁)))
122	121	fveq2d 6676	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = (♯‘(^◡𝐺 “ (𝑀...𝑁))))
123	64	nnnn0d 11958	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ₀)
124		hashfz1 13709	. . . . 5 ⊢ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ₀ → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
125	123, 124	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
126		hashen 13710	. . . . . 6 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ∈ Fin ∧ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin) → ((♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) ↔ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
127	45, 19, 126	syl2anc 586	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → ((♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) ↔ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
128	43, 127	mpbird 259	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
129	122, 125, 128	3eqtr3d 2866	. . 3 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
130	129	oveq2d 7174	. 2 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) = (1...(♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))))
131	130, 121	eqtr3d 2860	1 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...(♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))) = (^◡𝐺 “ (𝑀...𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1537 ∈ wcel 2114 ≠ wne 3018 ∀wral 3140 ∃wrex 3141 Vcvv 3496 ∩ cin 3937 ⊆ wss 3938 ∅c0 4293 class class class wbr 5068 Or wor 5475 ^◡ccnv 5556 ran crn 5558 ↾ cres 5559 “ cima 5560 Fun wfun 6351 Fn wfn 6352 ⟶wf 6353 –1-1→wf1 6354 –1-1-onto→wf1o 6356 ‘cfv 6357 Isom wiso 6358 (class class class)co 7158 ≈ cen 8508 Fincfn 8511 supcsup 8906 ℝcr 10538 1c1 10540 + caddc 10542 ℝ^*cxr 10676 < clt 10677 ≤ cle 10678 ℕcn 11640 ℕ₀cn0 11900 ℤcz 11984 ℤ_≥cuz 12246 ...cfz 12895 ♯chash 13693

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 ax-rep 5192 ax-sep 5205 ax-nul 5212 ax-pow 5268 ax-pr 5332 ax-un 7463 ax-cnex 10595 ax-resscn 10596 ax-1cn 10597 ax-icn 10598 ax-addcl 10599 ax-addrcl 10600 ax-mulcl 10601 ax-mulrcl 10602 ax-mulcom 10603 ax-addass 10604 ax-mulass 10605 ax-distr 10606 ax-i2m1 10607 ax-1ne0 10608 ax-1rid 10609 ax-rnegex 10610 ax-rrecex 10611 ax-cnre 10612 ax-pre-lttri 10613 ax-pre-lttrn 10614 ax-pre-ltadd 10615 ax-pre-mulgt0 10616 ax-pre-sup 10617

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-ne 3019 df-nel 3126 df-ral 3145 df-rex 3146 df-reu 3147 df-rmo 3148 df-rab 3149 df-v 3498 df-sbc 3775 df-csb 3886 df-dif 3941 df-un 3943 df-in 3945 df-ss 3954 df-pss 3956 df-nul 4294 df-if 4470 df-pw 4543 df-sn 4570 df-pr 4572 df-tp 4574 df-op 4576 df-uni 4841 df-int 4879 df-iun 4923 df-br 5069 df-opab 5131 df-mpt 5149 df-tr 5175 df-id 5462 df-eprel 5467 df-po 5476 df-so 5477 df-fr 5516 df-we 5518 df-xp 5563 df-rel 5564 df-cnv 5565 df-co 5566 df-dm 5567 df-rn 5568 df-res 5569 df-ima 5570 df-pred 6150 df-ord 6196 df-on 6197 df-lim 6198 df-suc 6199 df-iota 6316 df-fun 6359 df-fn 6360 df-f 6361 df-f1 6362 df-fo 6363 df-f1o 6364 df-fv 6365 df-isom 6366 df-riota 7116 df-ov 7161 df-oprab 7162 df-mpo 7163 df-om 7583 df-1st 7691 df-2nd 7692 df-wrecs 7949 df-recs 8010 df-rdg 8048 df-1o 8104 df-er 8291 df-en 8512 df-dom 8513 df-sdom 8514 df-fin 8515 df-sup 8908 df-card 9370 df-pnf 10679 df-mnf 10680 df-xr 10681 df-ltxr 10682 df-le 10683 df-sub 10874 df-neg 10875 df-nn 11641 df-n0 11901 df-z 11985 df-uz 12247 df-fz 12896 df-hash 13694

This theorem is referenced by: isercolllem3 15025

W3C validator