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 15639

Description: Lemma for isercoll 15641. (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 13521	. . . . . . . 8 ⊢ (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → 𝑥 ∈ ℕ)
2	1	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → 𝑥 ∈ ℕ))
3		cnvimass 6056	. . . . . . . . 9 ⊢ (^◡𝐺 “ (𝑀...𝑁)) ⊆ dom 𝐺
4		isercoll.g	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺:ℕ⟶𝑍)
5	4	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺:ℕ⟶𝑍)
6	3, 5	fssdm 6710	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ)
7	6	sseld 3948	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ∈ ℕ))
8		id 22	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ ℕ)
9		nnuz 12843	. . . . . . . . . . 11 ⊢ ℕ = (ℤ_≥‘1)
10	8, 9	eleqtrdi 2839	. . . . . . . . . 10 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ (ℤ_≥‘1))
11		ltso 11261	. . . . . . . . . . . . . 14 ⊢ < Or ℝ
12	11	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → < Or ℝ)
13		fzfid 13945	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑀...𝑁) ∈ Fin)
14		ffun 6694	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺:ℕ⟶𝑍 → Fun 𝐺)
15		funimacnv 6600	. . . . . . . . . . . . . . . . 17 ⊢ (Fun 𝐺 → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) = ((𝑀...𝑁) ∩ ran 𝐺))
16	5, 14, 15	3syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) = ((𝑀...𝑁) ∩ ran 𝐺))
17		inss1 4203	. . . . . . . . . . . . . . . 16 ⊢ ((𝑀...𝑁) ∩ ran 𝐺) ⊆ (𝑀...𝑁)
18	16, 17	eqsstrdi 3994	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ⊆ (𝑀...𝑁))
19	13, 18	ssfid 9219	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin)
20		ssid 3972	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ℕ ⊆ ℕ
21		isercoll.z	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ 𝑍 = (ℤ_≥‘𝑀)
22		isercoll.m	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → 𝑀 ∈ ℤ)
23		isercoll.i	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) < (𝐺‘(𝑘 + 1)))
24	21, 22, 4, 23	isercolllem1 15638	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ ℕ ⊆ ℕ) → (𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)))
25	20, 24	mpan2 691	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)))
26		ffn 6691	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺:ℕ⟶𝑍 → 𝐺 Fn ℕ)
27		fnresdm 6640	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝐺 Fn ℕ → (𝐺 ↾ ℕ) = 𝐺)
28		isoeq1 7295	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐺 ↾ ℕ) = 𝐺 → ((𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)) ↔ 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ))))
29	4, 26, 27, 28	4syl 19	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝐺 ↾ ℕ) Isom < , < (ℕ, (𝐺 “ ℕ)) ↔ 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ))))
30	25, 29	mpbid 232	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)))
31		isof1o 7301	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)) → 𝐺:ℕ–1-1-onto→(𝐺 “ ℕ))
32		f1ocnv 6815	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐺:ℕ–1-1-onto→(𝐺 “ ℕ) → ^◡𝐺:(𝐺 “ ℕ)–1-1-onto→ℕ)
33		f1ofun 6805	. . . . . . . . . . . . . . . . . . 19 ⊢ (^◡𝐺:(𝐺 “ ℕ)–1-1-onto→ℕ → Fun ^◡𝐺)
34	30, 31, 32, 33	4syl 19	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → Fun ^◡𝐺)
35		df-f1 6519	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐺:ℕ–1-1→𝑍 ↔ (𝐺:ℕ⟶𝑍 ∧ Fun ^◡𝐺))
36	4, 34, 35	sylanbrc 583	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐺:ℕ–1-1→𝑍)
37	36	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺:ℕ–1-1→𝑍)
38		nnex 12199	. . . . . . . . . . . . . . . . 17 ⊢ ℕ ∈ V
39		ssexg 5281	. . . . . . . . . . . . . . . . 17 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ ∧ ℕ ∈ V) → (^◡𝐺 “ (𝑀...𝑁)) ∈ V)
40	6, 38, 39	sylancl 586	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ V)
41		f1imaeng 8988	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺:ℕ–1-1→𝑍 ∧ (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℕ ∧ (^◡𝐺 “ (𝑀...𝑁)) ∈ V) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ≈ (^◡𝐺 “ (𝑀...𝑁)))
42	37, 6, 40, 41	syl3anc 1373	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ≈ (^◡𝐺 “ (𝑀...𝑁)))
43	42	ensymd 8979	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))
44		enfii 9156	. . . . . . . . . . . . . 14 ⊢ (((𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin ∧ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin)
45	19, 43, 44	syl2anc 584	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin)
46		1nn 12204	. . . . . . . . . . . . . . . 16 ⊢ 1 ∈ ℕ
47	46	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 1 ∈ ℕ)
48		ffvelcdm 7056	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐺:ℕ⟶𝑍 ∧ 1 ∈ ℕ) → (𝐺‘1) ∈ 𝑍)
49	4, 46, 48	sylancl 586	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝐺‘1) ∈ 𝑍)
50	49, 21	eleqtrdi 2839	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐺‘1) ∈ (ℤ_≥‘𝑀))
51	50	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘1) ∈ (ℤ_≥‘𝑀))
52		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝑁 ∈ (ℤ_≥‘(𝐺‘1)))
53		elfzuzb 13486	. . . . . . . . . . . . . . . 16 ⊢ ((𝐺‘1) ∈ (𝑀...𝑁) ↔ ((𝐺‘1) ∈ (ℤ_≥‘𝑀) ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))))
54	51, 52, 53	sylanbrc 583	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘1) ∈ (𝑀...𝑁))
55	5	ffnd 6692	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 𝐺 Fn ℕ)
56		elpreima 7033	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 Fn ℕ → (1 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (1 ∈ ℕ ∧ (𝐺‘1) ∈ (𝑀...𝑁))))
57	55, 56	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (1 ∈ ℕ ∧ (𝐺‘1) ∈ (𝑀...𝑁))))
58	47, 54, 57	mpbir2and 713	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → 1 ∈ (^◡𝐺 “ (𝑀...𝑁)))
59	58	ne0d 4308	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅)
60		nnssre 12197	. . . . . . . . . . . . . 14 ⊢ ℕ ⊆ ℝ
61	6, 60	sstrdi 3962	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ)
62		fisupcl 9428	. . . . . . . . . . . . 13 ⊢ (( < Or ℝ ∧ ((^◡𝐺 “ (𝑀...𝑁)) ∈ Fin ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ (^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ)) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)))
63	12, 45, 59, 61, 62	syl13anc 1374	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)))
64	6, 63	sseldd 3950	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)
65	64	nnzd 12563	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℤ)
66		elfz5 13484	. . . . . . . . . 10 ⊢ ((𝑥 ∈ (ℤ_≥‘1) ∧ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℤ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
67	10, 65, 66	syl2anr 597	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
68		elpreima 7033	. . . . . . . . . . . . . . . . 17 ⊢ (𝐺 Fn ℕ → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁))))
69	55, 68	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁))))
70	63, 69	mpbid 232	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁)))
71		elfzle2 13496	. . . . . . . . . . . . . . 15 ⊢ ((𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ (𝑀...𝑁) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
72	70, 71	simpl2im 503	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
73	72	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁)
74		uzssz 12821	. . . . . . . . . . . . . . . . 17 ⊢ (ℤ_≥‘𝑀) ⊆ ℤ
75	21, 74	eqsstri 3996	. . . . . . . . . . . . . . . 16 ⊢ 𝑍 ⊆ ℤ
76		zssre 12543	. . . . . . . . . . . . . . . 16 ⊢ ℤ ⊆ ℝ
77	75, 76	sstri 3959	. . . . . . . . . . . . . . 15 ⊢ 𝑍 ⊆ ℝ
78	5	ffvelcdmda 7059	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ 𝑍)
79	77, 78	sselid 3947	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ ℝ)
80	5, 64	ffvelcdmd 7060	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ 𝑍)
81	80	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ 𝑍)
82	77, 81	sselid 3947	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ ℝ)
83		eluzelz 12810	. . . . . . . . . . . . . . . 16 ⊢ (𝑁 ∈ (ℤ_≥‘(𝐺‘1)) → 𝑁 ∈ ℤ)
84	83	ad2antlr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑁 ∈ ℤ)
85	76, 84	sselid 3947	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑁 ∈ ℝ)
86		letr 11275	. . . . . . . . . . . . . 14 ⊢ (((𝐺‘𝑥) ∈ ℝ ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁) → (𝐺‘𝑥) ≤ 𝑁))
87	79, 82, 85, 86	syl3anc 1373	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ∧ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ≤ 𝑁) → (𝐺‘𝑥) ≤ 𝑁))
88	73, 87	mpan2d 694	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ((𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) → (𝐺‘𝑥) ≤ 𝑁))
89	30	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)))
90	60	a1i 11	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ℕ ⊆ ℝ)
91		ressxr 11225	. . . . . . . . . . . . . 14 ⊢ ℝ ⊆ ℝ^*
92	90, 91	sstrdi 3962	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ℕ ⊆ ℝ^*)
93		imassrn 6045	. . . . . . . . . . . . . . . 16 ⊢ (𝐺 “ ℕ) ⊆ ran 𝐺
94	4	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝐺:ℕ⟶𝑍)
95	94	frnd 6699	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ran 𝐺 ⊆ 𝑍)
96	93, 95	sstrid 3961	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ 𝑍)
97	96, 77	sstrdi 3962	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ ℝ)
98	97, 91	sstrdi 3962	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺 “ ℕ) ⊆ ℝ^*)
99		simpr 484	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → 𝑥 ∈ ℕ)
100	64	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)
101		leisorel 14432	. . . . . . . . . . . . 13 ⊢ ((𝐺 Isom < , < (ℕ, (𝐺 “ ℕ)) ∧ (ℕ ⊆ ℝ^* ∧ (𝐺 “ ℕ) ⊆ ℝ^*) ∧ (𝑥 ∈ ℕ ∧ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ)) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ (𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))))
102	89, 92, 98, 99, 100, 101	syl122anc 1381	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ (𝐺‘𝑥) ≤ (𝐺‘sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))))
103	78, 21	eleqtrdi 2839	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝐺‘𝑥) ∈ (ℤ_≥‘𝑀))
104		elfz5 13484	. . . . . . . . . . . . 13 ⊢ (((𝐺‘𝑥) ∈ (ℤ_≥‘𝑀) ∧ 𝑁 ∈ ℤ) → ((𝐺‘𝑥) ∈ (𝑀...𝑁) ↔ (𝐺‘𝑥) ≤ 𝑁))
105	103, 84, 104	syl2anc 584	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → ((𝐺‘𝑥) ∈ (𝑀...𝑁) ↔ (𝐺‘𝑥) ≤ 𝑁))
106	88, 102, 105	3imtr4d 294	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) → (𝐺‘𝑥) ∈ (𝑀...𝑁)))
107		elpreima 7033	. . . . . . . . . . . . 13 ⊢ (𝐺 Fn ℕ → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝑥 ∈ ℕ ∧ (𝐺‘𝑥) ∈ (𝑀...𝑁))))
108	107	baibd 539	. . . . . . . . . . . 12 ⊢ ((𝐺 Fn ℕ ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝐺‘𝑥) ∈ (𝑀...𝑁)))
109	55, 108	sylan 580	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) ↔ (𝐺‘𝑥) ∈ (𝑀...𝑁)))
110	106, 109	sylibrd 259	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) → 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
111		fimaxre2 12135	. . . . . . . . . . . . 13 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ∈ Fin) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥)
112	61, 45, 111	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥)
113		suprub 12151	. . . . . . . . . . . . 13 ⊢ ((((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥) ∧ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
114	113	ex 412	. . . . . . . . . . . 12 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ⊆ ℝ ∧ (^◡𝐺 “ (𝑀...𝑁)) ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ (^◡𝐺 “ (𝑀...𝑁))𝑦 ≤ 𝑥) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
115	61, 59, 112, 114	syl3anc 1373	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
116	115	adantr 480	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)) → 𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )))
117	110, 116	impbid 212	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ≤ sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
118	67, 117	bitrd 279	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) ∧ 𝑥 ∈ ℕ) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
119	118	ex 412	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ ℕ → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁)))))
120	2, 7, 119	pm5.21ndd 379	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (𝑥 ∈ (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) ↔ 𝑥 ∈ (^◡𝐺 “ (𝑀...𝑁))))
121	120	eqrdv 2728	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) = (^◡𝐺 “ (𝑀...𝑁)))
122	121	fveq2d 6865	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = (♯‘(^◡𝐺 “ (𝑀...𝑁))))
123	64	nnnn0d 12510	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ₀)
124		hashfz1 14318	. . . . 5 ⊢ (sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) ∈ ℕ₀ → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
125	123, 124	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))) = sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ))
126		hashen 14319	. . . . . 6 ⊢ (((^◡𝐺 “ (𝑀...𝑁)) ∈ Fin ∧ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁))) ∈ Fin) → ((♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) ↔ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
127	45, 19, 126	syl2anc 584	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → ((♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))) ↔ (^◡𝐺 “ (𝑀...𝑁)) ≈ (𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
128	43, 127	mpbird 257	. . . 4 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (♯‘(^◡𝐺 “ (𝑀...𝑁))) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
129	122, 125, 128	3eqtr3d 2773	. . 3 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < ) = (♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁)))))
130	129	oveq2d 7406	. 2 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...sup((^◡𝐺 “ (𝑀...𝑁)), ℝ, < )) = (1...(♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))))
131	130, 121	eqtr3d 2767	1 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ_≥‘(𝐺‘1))) → (1...(♯‘(𝐺 “ (^◡𝐺 “ (𝑀...𝑁))))) = (^◡𝐺 “ (𝑀...𝑁)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ≠ wne 2926 ∀wral 3045 ∃wrex 3054 Vcvv 3450 ∩ cin 3916 ⊆ wss 3917 ∅c0 4299 class class class wbr 5110 Or wor 5548 ^◡ccnv 5640 ran crn 5642 ↾ cres 5643 “ cima 5644 Fun wfun 6508 Fn wfn 6509 ⟶wf 6510 –1-1→wf1 6511 –1-1-onto→wf1o 6513 ‘cfv 6514 Isom wiso 6515 (class class class)co 7390 ≈ cen 8918 Fincfn 8921 supcsup 9398 ℝcr 11074 1c1 11076 + caddc 11078 ℝ^*cxr 11214 < clt 11215 ≤ cle 11216 ℕcn 12193 ℕ₀cn0 12449 ℤcz 12536 ℤ_≥cuz 12800 ...cfz 13475 ♯chash 14302

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 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2702 ax-rep 5237 ax-sep 5254 ax-nul 5264 ax-pow 5323 ax-pr 5390 ax-un 7714 ax-cnex 11131 ax-resscn 11132 ax-1cn 11133 ax-icn 11134 ax-addcl 11135 ax-addrcl 11136 ax-mulcl 11137 ax-mulrcl 11138 ax-mulcom 11139 ax-addass 11140 ax-mulass 11141 ax-distr 11142 ax-i2m1 11143 ax-1ne0 11144 ax-1rid 11145 ax-rnegex 11146 ax-rrecex 11147 ax-cnre 11148 ax-pre-lttri 11149 ax-pre-lttrn 11150 ax-pre-ltadd 11151 ax-pre-mulgt0 11152 ax-pre-sup 11153

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3356 df-reu 3357 df-rab 3409 df-v 3452 df-sbc 3757 df-csb 3866 df-dif 3920 df-un 3922 df-in 3924 df-ss 3934 df-pss 3937 df-nul 4300 df-if 4492 df-pw 4568 df-sn 4593 df-pr 4595 df-op 4599 df-uni 4875 df-int 4914 df-iun 4960 df-br 5111 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5536 df-eprel 5541 df-po 5549 df-so 5550 df-fr 5594 df-we 5596 df-xp 5647 df-rel 5648 df-cnv 5649 df-co 5650 df-dm 5651 df-rn 5652 df-res 5653 df-ima 5654 df-pred 6277 df-ord 6338 df-on 6339 df-lim 6340 df-suc 6341 df-iota 6467 df-fun 6516 df-fn 6517 df-f 6518 df-f1 6519 df-fo 6520 df-f1o 6521 df-fv 6522 df-isom 6523 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-om 7846 df-1st 7971 df-2nd 7972 df-frecs 8263 df-wrecs 8294 df-recs 8343 df-rdg 8381 df-1o 8437 df-er 8674 df-en 8922 df-dom 8923 df-sdom 8924 df-fin 8925 df-sup 9400 df-card 9899 df-pnf 11217 df-mnf 11218 df-xr 11219 df-ltxr 11220 df-le 11221 df-sub 11414 df-neg 11415 df-nn 12194 df-n0 12450 df-z 12537 df-uz 12801 df-fz 13476 df-hash 14303

This theorem is referenced by: isercolllem3 15640

W3C validator