vitalilem2 - Metamath Proof Explorer

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

Theorem vitalilem2 24973

Description: Lemma for vitali 24977. (Contributed by Mario Carneiro, 16-Jun-2014.)

**Hypotheses**
Ref	Expression
vitali.1	⊢ ∼ = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) ∧ (𝑥 − 𝑦) ∈ ℚ)}
vitali.2	⊢ 𝑆 = ((0[,]1) / ∼ )
vitali.3	⊢ (𝜑 → 𝐹 Fn 𝑆)
vitali.4	⊢ (𝜑 → ∀𝑧 ∈ 𝑆 (𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧))
vitali.5	⊢ (𝜑 → 𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)))
vitali.6	⊢ 𝑇 = (𝑛 ∈ ℕ ↦ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹})
vitali.7	⊢ (𝜑 → ¬ ran 𝐹 ∈ (𝒫 ℝ ∖ dom vol))

**Assertion**
Ref	Expression
vitalilem2	⊢ (𝜑 → (ran 𝐹 ⊆ (0[,]1) ∧ (0[,]1) ⊆ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ∧ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ⊆ (-1[,]2)))

Distinct variable groups: 𝑚,𝑛,𝑠,𝑥,𝑦,𝑧,𝐺 𝜑,𝑚,𝑛,𝑥,𝑧 𝑧,𝑆 𝑇,𝑚,𝑥 𝑚,𝐹,𝑛,𝑠,𝑥,𝑦,𝑧 ∼ ,𝑚,𝑛,𝑠,𝑥,𝑦,𝑧 Allowed substitution hints: 𝜑(𝑦,𝑠) 𝑆(𝑥,𝑦,𝑚,𝑛,𝑠) 𝑇(𝑦,𝑧,𝑛,𝑠)

Proof of Theorem vitalilem2 Dummy variables 𝑣 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		vitali.3	. . . 4 ⊢ (𝜑 → 𝐹 Fn 𝑆)
2		vitali.4	. . . . 5 ⊢ (𝜑 → ∀𝑧 ∈ 𝑆 (𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧))
3		vitali.2	. . . . . . . . 9 ⊢ 𝑆 = ((0[,]1) / ∼ )
4		neeq1 3006	. . . . . . . . 9 ⊢ ([𝑣] ∼ = 𝑧 → ([𝑣] ∼ ≠ ∅ ↔ 𝑧 ≠ ∅))
5		vitali.1	. . . . . . . . . . . . . 14 ⊢ ∼ = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) ∧ (𝑥 − 𝑦) ∈ ℚ)}
6	5	vitalilem1 24972	. . . . . . . . . . . . 13 ⊢ ∼ Er (0[,]1)
7		erdm 8658	. . . . . . . . . . . . 13 ⊢ ( ∼ Er (0[,]1) → dom ∼ = (0[,]1))
8	6, 7	ax-mp 5	. . . . . . . . . . . 12 ⊢ dom ∼ = (0[,]1)
9	8	eleq2i 2829	. . . . . . . . . . 11 ⊢ (𝑣 ∈ dom ∼ ↔ 𝑣 ∈ (0[,]1))
10		ecdmn0 8695	. . . . . . . . . . 11 ⊢ (𝑣 ∈ dom ∼ ↔ [𝑣] ∼ ≠ ∅)
11	9, 10	bitr3i 276	. . . . . . . . . 10 ⊢ (𝑣 ∈ (0[,]1) ↔ [𝑣] ∼ ≠ ∅)
12	11	biimpi 215	. . . . . . . . 9 ⊢ (𝑣 ∈ (0[,]1) → [𝑣] ∼ ≠ ∅)
13	3, 4, 12	ectocl 8724	. . . . . . . 8 ⊢ (𝑧 ∈ 𝑆 → 𝑧 ≠ ∅)
14	13	adantl 482	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → 𝑧 ≠ ∅)
15		sseq1 3969	. . . . . . . . . 10 ⊢ ([𝑤] ∼ = 𝑧 → ([𝑤] ∼ ⊆ (0[,]1) ↔ 𝑧 ⊆ (0[,]1)))
16	6	a1i 11	. . . . . . . . . . 11 ⊢ (𝑤 ∈ (0[,]1) → ∼ Er (0[,]1))
17	16	ecss 8694	. . . . . . . . . 10 ⊢ (𝑤 ∈ (0[,]1) → [𝑤] ∼ ⊆ (0[,]1))
18	3, 15, 17	ectocl 8724	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝑆 → 𝑧 ⊆ (0[,]1))
19	18	adantl 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → 𝑧 ⊆ (0[,]1))
20	19	sseld 3943	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → ((𝐹‘𝑧) ∈ 𝑧 → (𝐹‘𝑧) ∈ (0[,]1)))
21	14, 20	embantd 59	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → ((𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧) → (𝐹‘𝑧) ∈ (0[,]1)))
22	21	ralimdva 3164	. . . . 5 ⊢ (𝜑 → (∀𝑧 ∈ 𝑆 (𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧) → ∀𝑧 ∈ 𝑆 (𝐹‘𝑧) ∈ (0[,]1)))
23	2, 22	mpd 15	. . . 4 ⊢ (𝜑 → ∀𝑧 ∈ 𝑆 (𝐹‘𝑧) ∈ (0[,]1))
24		ffnfv 7066	. . . 4 ⊢ (𝐹:𝑆⟶(0[,]1) ↔ (𝐹 Fn 𝑆 ∧ ∀𝑧 ∈ 𝑆 (𝐹‘𝑧) ∈ (0[,]1)))
25	1, 23, 24	sylanbrc 583	. . 3 ⊢ (𝜑 → 𝐹:𝑆⟶(0[,]1))
26	25	frnd 6676	. 2 ⊢ (𝜑 → ran 𝐹 ⊆ (0[,]1))
27		vitali.5	. . . . . . . 8 ⊢ (𝜑 → 𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)))
28	27	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)))
29		f1ocnv 6796	. . . . . . 7 ⊢ (𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)) → ^◡𝐺:(ℚ ∩ (-1[,]1))–1-1-onto→ℕ)
30		f1of 6784	. . . . . . 7 ⊢ (^◡𝐺:(ℚ ∩ (-1[,]1))–1-1-onto→ℕ → ^◡𝐺:(ℚ ∩ (-1[,]1))⟶ℕ)
31	28, 29, 30	3syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ^◡𝐺:(ℚ ∩ (-1[,]1))⟶ℕ)
32		simpr 485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ (0[,]1))
33	32, 11	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → [𝑣] ∼ ≠ ∅)
34		neeq1 3006	. . . . . . . . . . . 12 ⊢ (𝑧 = [𝑣] ∼ → (𝑧 ≠ ∅ ↔ [𝑣] ∼ ≠ ∅))
35		fveq2 6842	. . . . . . . . . . . . 13 ⊢ (𝑧 = [𝑣] ∼ → (𝐹‘𝑧) = (𝐹‘[𝑣] ∼ ))
36		id 22	. . . . . . . . . . . . 13 ⊢ (𝑧 = [𝑣] ∼ → 𝑧 = [𝑣] ∼ )
37	35, 36	eleq12d 2832	. . . . . . . . . . . 12 ⊢ (𝑧 = [𝑣] ∼ → ((𝐹‘𝑧) ∈ 𝑧 ↔ (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ ))
38	34, 37	imbi12d 344	. . . . . . . . . . 11 ⊢ (𝑧 = [𝑣] ∼ → ((𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧) ↔ ([𝑣] ∼ ≠ ∅ → (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ )))
39	2	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ∀𝑧 ∈ 𝑆 (𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧))
40		ovex 7390	. . . . . . . . . . . . . . 15 ⊢ (0[,]1) ∈ V
41		erex 8672	. . . . . . . . . . . . . . 15 ⊢ ( ∼ Er (0[,]1) → ((0[,]1) ∈ V → ∼ ∈ V))
42	6, 40, 41	mp2 9	. . . . . . . . . . . . . 14 ⊢ ∼ ∈ V
43	42	ecelqsi 8712	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ (0[,]1) → [𝑣] ∼ ∈ ((0[,]1) / ∼ ))
44	43	adantl 482	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → [𝑣] ∼ ∈ ((0[,]1) / ∼ ))
45	44, 3	eleqtrrdi 2849	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → [𝑣] ∼ ∈ 𝑆)
46	38, 39, 45	rspcdva 3582	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ([𝑣] ∼ ≠ ∅ → (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ ))
47	33, 46	mpd 15	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ )
48		fvex 6855	. . . . . . . . . . 11 ⊢ (𝐹‘[𝑣] ∼ ) ∈ V
49		vex 3449	. . . . . . . . . . 11 ⊢ 𝑣 ∈ V
50	48, 49	elec 8692	. . . . . . . . . 10 ⊢ ((𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ ↔ 𝑣 ∼ (𝐹‘[𝑣] ∼ ))
51		oveq12 7366	. . . . . . . . . . . 12 ⊢ ((𝑥 = 𝑣 ∧ 𝑦 = (𝐹‘[𝑣] ∼ )) → (𝑥 − 𝑦) = (𝑣 − (𝐹‘[𝑣] ∼ )))
52	51	eleq1d 2822	. . . . . . . . . . 11 ⊢ ((𝑥 = 𝑣 ∧ 𝑦 = (𝐹‘[𝑣] ∼ )) → ((𝑥 − 𝑦) ∈ ℚ ↔ (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℚ))
53	52, 5	brab2a 5725	. . . . . . . . . 10 ⊢ (𝑣 ∼ (𝐹‘[𝑣] ∼ ) ↔ ((𝑣 ∈ (0[,]1) ∧ (𝐹‘[𝑣] ∼ ) ∈ (0[,]1)) ∧ (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℚ))
54	50, 53	bitri 274	. . . . . . . . 9 ⊢ ((𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ ↔ ((𝑣 ∈ (0[,]1) ∧ (𝐹‘[𝑣] ∼ ) ∈ (0[,]1)) ∧ (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℚ))
55	47, 54	sylib 217	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝑣 ∈ (0[,]1) ∧ (𝐹‘[𝑣] ∼ ) ∈ (0[,]1)) ∧ (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℚ))
56	55	simprd 496	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℚ)
57		elicc01 13383	. . . . . . . . . . 11 ⊢ (𝑣 ∈ (0[,]1) ↔ (𝑣 ∈ ℝ ∧ 0 ≤ 𝑣 ∧ 𝑣 ≤ 1))
58	32, 57	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 ∈ ℝ ∧ 0 ≤ 𝑣 ∧ 𝑣 ≤ 1))
59	58	simp1d 1142	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ ℝ)
60	55	simpld 495	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 ∈ (0[,]1) ∧ (𝐹‘[𝑣] ∼ ) ∈ (0[,]1)))
61	60	simprd 496	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ (0[,]1))
62		elicc01 13383	. . . . . . . . . . 11 ⊢ ((𝐹‘[𝑣] ∼ ) ∈ (0[,]1) ↔ ((𝐹‘[𝑣] ∼ ) ∈ ℝ ∧ 0 ≤ (𝐹‘[𝑣] ∼ ) ∧ (𝐹‘[𝑣] ∼ ) ≤ 1))
63	61, 62	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) ∈ ℝ ∧ 0 ≤ (𝐹‘[𝑣] ∼ ) ∧ (𝐹‘[𝑣] ∼ ) ≤ 1))
64	63	simp1d 1142	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ ℝ)
65	59, 64	resubcld 11583	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℝ)
66	64, 59	resubcld 11583	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) − 𝑣) ∈ ℝ)
67		1red 11156	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 1 ∈ ℝ)
68	58	simp2d 1143	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 0 ≤ 𝑣)
69	64, 59	subge02d 11747	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (0 ≤ 𝑣 ↔ ((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ (𝐹‘[𝑣] ∼ )))
70	68, 69	mpbid 231	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ (𝐹‘[𝑣] ∼ ))
71	63	simp3d 1144	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ≤ 1)
72	66, 64, 67, 70, 71	letrd 11312	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ 1)
73	66, 67	lenegd 11734	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ 1 ↔ -1 ≤ -((𝐹‘[𝑣] ∼ ) − 𝑣)))
74	72, 73	mpbid 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → -1 ≤ -((𝐹‘[𝑣] ∼ ) − 𝑣))
75	64	recnd 11183	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ ℂ)
76	59	recnd 11183	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ ℂ)
77	75, 76	negsubdi2d 11528	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → -((𝐹‘[𝑣] ∼ ) − 𝑣) = (𝑣 − (𝐹‘[𝑣] ∼ )))
78	74, 77	breqtrd 5131	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → -1 ≤ (𝑣 − (𝐹‘[𝑣] ∼ )))
79	63	simp2d 1143	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 0 ≤ (𝐹‘[𝑣] ∼ ))
80	59, 64	subge02d 11747	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (0 ≤ (𝐹‘[𝑣] ∼ ) ↔ (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 𝑣))
81	79, 80	mpbid 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 𝑣)
82	58	simp3d 1144	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ≤ 1)
83	65, 59, 67, 81, 82	letrd 11312	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 1)
84		neg1rr 12268	. . . . . . . . 9 ⊢ -1 ∈ ℝ
85		1re 11155	. . . . . . . . 9 ⊢ 1 ∈ ℝ
86	84, 85	elicc2i 13330	. . . . . . . 8 ⊢ ((𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (-1[,]1) ↔ ((𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℝ ∧ -1 ≤ (𝑣 − (𝐹‘[𝑣] ∼ )) ∧ (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 1))
87	65, 78, 83, 86	syl3anbrc 1343	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (-1[,]1))
88	56, 87	elind 4154	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (ℚ ∩ (-1[,]1)))
89	31, 88	ffvelcdmd 7036	. . . . 5 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) ∈ ℕ)
90		oveq1 7364	. . . . . . . 8 ⊢ (𝑠 = 𝑣 → (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) = (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))))
91	90	eleq1d 2822	. . . . . . 7 ⊢ (𝑠 = 𝑣 → ((𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹 ↔ (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹))
92		f1ocnvfv2 7223	. . . . . . . . . . 11 ⊢ ((𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)) ∧ (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (ℚ ∩ (-1[,]1))) → (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = (𝑣 − (𝐹‘[𝑣] ∼ )))
93	27, 88, 92	syl2an2r 683	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = (𝑣 − (𝐹‘[𝑣] ∼ )))
94	93	oveq2d 7373	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) = (𝑣 − (𝑣 − (𝐹‘[𝑣] ∼ ))))
95	76, 75	nncand 11517	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝑣 − (𝐹‘[𝑣] ∼ ))) = (𝐹‘[𝑣] ∼ ))
96	94, 95	eqtrd 2776	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) = (𝐹‘[𝑣] ∼ ))
97		fnfvelrn 7031	. . . . . . . . 9 ⊢ ((𝐹 Fn 𝑆 ∧ [𝑣] ∼ ∈ 𝑆) → (𝐹‘[𝑣] ∼ ) ∈ ran 𝐹)
98	1, 45, 97	syl2an2r 683	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ ran 𝐹)
99	96, 98	eqeltrd 2838	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹)
100	91, 59, 99	elrabd 3647	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
101		fveq2 6842	. . . . . . . . . . 11 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → (𝐺‘𝑛) = (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))))
102	101	oveq2d 7373	. . . . . . . . . 10 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → (𝑠 − (𝐺‘𝑛)) = (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))))
103	102	eleq1d 2822	. . . . . . . . 9 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → ((𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹 ↔ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹))
104	103	rabbidv 3415	. . . . . . . 8 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹} = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
105		vitali.6	. . . . . . . 8 ⊢ 𝑇 = (𝑛 ∈ ℕ ↦ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹})
106		reex 11142	. . . . . . . . 9 ⊢ ℝ ∈ V
107	106	rabex 5289	. . . . . . . 8 ⊢ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹} ∈ V
108	104, 105, 107	fvmpt 6948	. . . . . . 7 ⊢ ((^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) ∈ ℕ → (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
109	89, 108	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
110	100, 109	eleqtrrd 2841	. . . . 5 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))))
111		fveq2 6842	. . . . . 6 ⊢ (𝑚 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → (𝑇‘𝑚) = (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))))
112	111	eliuni 4960	. . . . 5 ⊢ (((^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) ∈ ℕ ∧ 𝑣 ∈ (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) → 𝑣 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚))
113	89, 110, 112	syl2anc 584	. . . 4 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚))
114	113	ex 413	. . 3 ⊢ (𝜑 → (𝑣 ∈ (0[,]1) → 𝑣 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚)))
115	114	ssrdv 3950	. 2 ⊢ (𝜑 → (0[,]1) ⊆ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚))
116		eliun 4958	. . . 4 ⊢ (𝑥 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ↔ ∃𝑚 ∈ ℕ 𝑥 ∈ (𝑇‘𝑚))
117		fveq2 6842	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑚 → (𝐺‘𝑛) = (𝐺‘𝑚))
118	117	oveq2d 7373	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 𝑚 → (𝑠 − (𝐺‘𝑛)) = (𝑠 − (𝐺‘𝑚)))
119	118	eleq1d 2822	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑚 → ((𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹 ↔ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹))
120	119	rabbidv 3415	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑚 → {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹} = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
121	106	rabex 5289	. . . . . . . . . . . 12 ⊢ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹} ∈ V
122	120, 105, 121	fvmpt 6948	. . . . . . . . . . 11 ⊢ (𝑚 ∈ ℕ → (𝑇‘𝑚) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
123	122	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑇‘𝑚) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
124	123	eleq2d 2823	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ (𝑇‘𝑚) ↔ 𝑥 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹}))
125	124	biimpa 477	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
126		oveq1 7364	. . . . . . . . . 10 ⊢ (𝑠 = 𝑥 → (𝑠 − (𝐺‘𝑚)) = (𝑥 − (𝐺‘𝑚)))
127	126	eleq1d 2822	. . . . . . . . 9 ⊢ (𝑠 = 𝑥 → ((𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹 ↔ (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹))
128	127	elrab 3645	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹} ↔ (𝑥 ∈ ℝ ∧ (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹))
129	125, 128	sylib 217	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 ∈ ℝ ∧ (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹))
130	129	simpld 495	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ∈ ℝ)
131	84	a1i 11	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → -1 ∈ ℝ)
132		iccssre 13346	. . . . . . . . . 10 ⊢ ((-1 ∈ ℝ ∧ 1 ∈ ℝ) → (-1[,]1) ⊆ ℝ)
133	84, 85, 132	mp2an 690	. . . . . . . . 9 ⊢ (-1[,]1) ⊆ ℝ
134		f1of 6784	. . . . . . . . . . . 12 ⊢ (𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)) → 𝐺:ℕ⟶(ℚ ∩ (-1[,]1)))
135	27, 134	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺:ℕ⟶(ℚ ∩ (-1[,]1)))
136	135	ffvelcdmda 7035	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐺‘𝑚) ∈ (ℚ ∩ (-1[,]1)))
137	136	elin2d 4159	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐺‘𝑚) ∈ (-1[,]1))
138	133, 137	sselid 3942	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐺‘𝑚) ∈ ℝ)
139	138	adantr 481	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ∈ ℝ)
140	137	adantr 481	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ∈ (-1[,]1))
141	84, 85	elicc2i 13330	. . . . . . . . 9 ⊢ ((𝐺‘𝑚) ∈ (-1[,]1) ↔ ((𝐺‘𝑚) ∈ ℝ ∧ -1 ≤ (𝐺‘𝑚) ∧ (𝐺‘𝑚) ≤ 1))
142	140, 141	sylib 217	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) ∈ ℝ ∧ -1 ≤ (𝐺‘𝑚) ∧ (𝐺‘𝑚) ≤ 1))
143	142	simp2d 1143	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → -1 ≤ (𝐺‘𝑚))
144	26	ad2antrr 724	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ran 𝐹 ⊆ (0[,]1))
145	129	simprd 496	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹)
146	144, 145	sseldd 3945	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 − (𝐺‘𝑚)) ∈ (0[,]1))
147		elicc01 13383	. . . . . . . . . 10 ⊢ ((𝑥 − (𝐺‘𝑚)) ∈ (0[,]1) ↔ ((𝑥 − (𝐺‘𝑚)) ∈ ℝ ∧ 0 ≤ (𝑥 − (𝐺‘𝑚)) ∧ (𝑥 − (𝐺‘𝑚)) ≤ 1))
148	146, 147	sylib 217	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝑥 − (𝐺‘𝑚)) ∈ ℝ ∧ 0 ≤ (𝑥 − (𝐺‘𝑚)) ∧ (𝑥 − (𝐺‘𝑚)) ≤ 1))
149	148	simp2d 1143	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 0 ≤ (𝑥 − (𝐺‘𝑚)))
150	130, 139	subge0d 11745	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (0 ≤ (𝑥 − (𝐺‘𝑚)) ↔ (𝐺‘𝑚) ≤ 𝑥))
151	149, 150	mpbid 231	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ≤ 𝑥)
152	131, 139, 130, 143, 151	letrd 11312	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → -1 ≤ 𝑥)
153		peano2re 11328	. . . . . . . 8 ⊢ ((𝐺‘𝑚) ∈ ℝ → ((𝐺‘𝑚) + 1) ∈ ℝ)
154	139, 153	syl 17	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) + 1) ∈ ℝ)
155		2re 12227	. . . . . . . 8 ⊢ 2 ∈ ℝ
156	155	a1i 11	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 2 ∈ ℝ)
157	148	simp3d 1144	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 − (𝐺‘𝑚)) ≤ 1)
158		1red 11156	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 1 ∈ ℝ)
159	130, 139, 158	lesubadd2d 11754	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝑥 − (𝐺‘𝑚)) ≤ 1 ↔ 𝑥 ≤ ((𝐺‘𝑚) + 1)))
160	157, 159	mpbid 231	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ≤ ((𝐺‘𝑚) + 1))
161	142	simp3d 1144	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ≤ 1)
162	139, 158, 158, 161	leadd1dd 11769	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) + 1) ≤ (1 + 1))
163		df-2 12216	. . . . . . . 8 ⊢ 2 = (1 + 1)
164	162, 163	breqtrrdi 5147	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) + 1) ≤ 2)
165	130, 154, 156, 160, 164	letrd 11312	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ≤ 2)
166	84, 155	elicc2i 13330	. . . . . 6 ⊢ (𝑥 ∈ (-1[,]2) ↔ (𝑥 ∈ ℝ ∧ -1 ≤ 𝑥 ∧ 𝑥 ≤ 2))
167	130, 152, 165, 166	syl3anbrc 1343	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ∈ (-1[,]2))
168	167	rexlimdva2 3154	. . . 4 ⊢ (𝜑 → (∃𝑚 ∈ ℕ 𝑥 ∈ (𝑇‘𝑚) → 𝑥 ∈ (-1[,]2)))
169	116, 168	biimtrid 241	. . 3 ⊢ (𝜑 → (𝑥 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) → 𝑥 ∈ (-1[,]2)))
170	169	ssrdv 3950	. 2 ⊢ (𝜑 → ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ⊆ (-1[,]2))
171	26, 115, 170	3jca 1128	1 ⊢ (𝜑 → (ran 𝐹 ⊆ (0[,]1) ∧ (0[,]1) ⊆ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ∧ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ⊆ (-1[,]2)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 ∧ w3a 1087 = wceq 1541 ∈ wcel 2106 ≠ wne 2943 ∀wral 3064 ∃wrex 3073 {crab 3407 Vcvv 3445 ∖ cdif 3907 ∩ cin 3909 ⊆ wss 3910 ∅c0 4282 𝒫 cpw 4560 ∪ ciun 4954 class class class wbr 5105 {copab 5167 ↦ cmpt 5188 ^◡ccnv 5632 dom cdm 5633 ran crn 5634 Fn wfn 6491 ⟶wf 6492 –1-1-onto→wf1o 6495 ‘cfv 6496 (class class class)co 7357 Er wer 8645 [cec 8646 / cqs 8647 ℝcr 11050 0cc0 11051 1c1 11052 + caddc 11054 ≤ cle 11190 − cmin 11385 -cneg 11386 ℕcn 12153 2c2 12208 ℚcq 12873 [,]cicc 13267 volcvol 24827

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 2707 ax-sep 5256 ax-nul 5263 ax-pow 5320 ax-pr 5384 ax-un 7672 ax-cnex 11107 ax-resscn 11108 ax-1cn 11109 ax-icn 11110 ax-addcl 11111 ax-addrcl 11112 ax-mulcl 11113 ax-mulrcl 11114 ax-mulcom 11115 ax-addass 11116 ax-mulass 11117 ax-distr 11118 ax-i2m1 11119 ax-1ne0 11120 ax-1rid 11121 ax-rnegex 11122 ax-rrecex 11123 ax-cnre 11124 ax-pre-lttri 11125 ax-pre-lttrn 11126 ax-pre-ltadd 11127 ax-pre-mulgt0 11128

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 2538 df-eu 2567 df-clab 2714 df-cleq 2728 df-clel 2814 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3065 df-rex 3074 df-rmo 3353 df-reu 3354 df-rab 3408 df-v 3447 df-sbc 3740 df-csb 3856 df-dif 3913 df-un 3915 df-in 3917 df-ss 3927 df-pss 3929 df-nul 4283 df-if 4487 df-pw 4562 df-sn 4587 df-pr 4589 df-op 4593 df-uni 4866 df-iun 4956 df-br 5106 df-opab 5168 df-mpt 5189 df-tr 5223 df-id 5531 df-eprel 5537 df-po 5545 df-so 5546 df-fr 5588 df-we 5590 df-xp 5639 df-rel 5640 df-cnv 5641 df-co 5642 df-dm 5643 df-rn 5644 df-res 5645 df-ima 5646 df-pred 6253 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6498 df-fn 6499 df-f 6500 df-f1 6501 df-fo 6502 df-f1o 6503 df-fv 6504 df-riota 7313 df-ov 7360 df-oprab 7361 df-mpo 7362 df-om 7803 df-1st 7921 df-2nd 7922 df-frecs 8212 df-wrecs 8243 df-recs 8317 df-rdg 8356 df-er 8648 df-ec 8650 df-qs 8654 df-en 8884 df-dom 8885 df-sdom 8886 df-pnf 11191 df-mnf 11192 df-xr 11193 df-ltxr 11194 df-le 11195 df-sub 11387 df-neg 11388 df-div 11813 df-nn 12154 df-2 12216 df-n0 12414 df-z 12500 df-q 12874 df-icc 13271

This theorem is referenced by: vitalilem3 24974 vitalilem4 24975 vitalilem5 24976

W3C validator