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 24678

Description: Lemma for vitali 24682. (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 3005	. . . . . . . . 9 ⊢ ([𝑣] ∼ = 𝑧 → ([𝑣] ∼ ≠ ∅ ↔ 𝑧 ≠ ∅))
5		vitali.1	. . . . . . . . . . . . . 14 ⊢ ∼ = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (0[,]1) ∧ 𝑦 ∈ (0[,]1)) ∧ (𝑥 − 𝑦) ∈ ℚ)}
6	5	vitalilem1 24677	. . . . . . . . . . . . 13 ⊢ ∼ Er (0[,]1)
7		erdm 8466	. . . . . . . . . . . . 13 ⊢ ( ∼ Er (0[,]1) → dom ∼ = (0[,]1))
8	6, 7	ax-mp 5	. . . . . . . . . . . 12 ⊢ dom ∼ = (0[,]1)
9	8	eleq2i 2830	. . . . . . . . . . 11 ⊢ (𝑣 ∈ dom ∼ ↔ 𝑣 ∈ (0[,]1))
10		ecdmn0 8503	. . . . . . . . . . 11 ⊢ (𝑣 ∈ dom ∼ ↔ [𝑣] ∼ ≠ ∅)
11	9, 10	bitr3i 276	. . . . . . . . . 10 ⊢ (𝑣 ∈ (0[,]1) ↔ [𝑣] ∼ ≠ ∅)
12	11	biimpi 215	. . . . . . . . 9 ⊢ (𝑣 ∈ (0[,]1) → [𝑣] ∼ ≠ ∅)
13	3, 4, 12	ectocl 8532	. . . . . . . 8 ⊢ (𝑧 ∈ 𝑆 → 𝑧 ≠ ∅)
14	13	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → 𝑧 ≠ ∅)
15		sseq1 3942	. . . . . . . . . 10 ⊢ ([𝑤] ∼ = 𝑧 → ([𝑤] ∼ ⊆ (0[,]1) ↔ 𝑧 ⊆ (0[,]1)))
16	6	a1i 11	. . . . . . . . . . 11 ⊢ (𝑤 ∈ (0[,]1) → ∼ Er (0[,]1))
17	16	ecss 8502	. . . . . . . . . 10 ⊢ (𝑤 ∈ (0[,]1) → [𝑤] ∼ ⊆ (0[,]1))
18	3, 15, 17	ectocl 8532	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝑆 → 𝑧 ⊆ (0[,]1))
19	18	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → 𝑧 ⊆ (0[,]1))
20	19	sseld 3916	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → ((𝐹‘𝑧) ∈ 𝑧 → (𝐹‘𝑧) ∈ (0[,]1)))
21	14, 20	embantd 59	. . . . . 6 ⊢ ((𝜑 ∧ 𝑧 ∈ 𝑆) → ((𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧) → (𝐹‘𝑧) ∈ (0[,]1)))
22	21	ralimdva 3102	. . . . 5 ⊢ (𝜑 → (∀𝑧 ∈ 𝑆 (𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧) → ∀𝑧 ∈ 𝑆 (𝐹‘𝑧) ∈ (0[,]1)))
23	2, 22	mpd 15	. . . 4 ⊢ (𝜑 → ∀𝑧 ∈ 𝑆 (𝐹‘𝑧) ∈ (0[,]1))
24		ffnfv 6974	. . . 4 ⊢ (𝐹:𝑆⟶(0[,]1) ↔ (𝐹 Fn 𝑆 ∧ ∀𝑧 ∈ 𝑆 (𝐹‘𝑧) ∈ (0[,]1)))
25	1, 23, 24	sylanbrc 582	. . 3 ⊢ (𝜑 → 𝐹:𝑆⟶(0[,]1))
26	25	frnd 6592	. 2 ⊢ (𝜑 → ran 𝐹 ⊆ (0[,]1))
27		vitali.5	. . . . . . . 8 ⊢ (𝜑 → 𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)))
28	27	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)))
29		f1ocnv 6712	. . . . . . 7 ⊢ (𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)) → ^◡𝐺:(ℚ ∩ (-1[,]1))–1-1-onto→ℕ)
30		f1of 6700	. . . . . . 7 ⊢ (^◡𝐺:(ℚ ∩ (-1[,]1))–1-1-onto→ℕ → ^◡𝐺:(ℚ ∩ (-1[,]1))⟶ℕ)
31	28, 29, 30	3syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ^◡𝐺:(ℚ ∩ (-1[,]1))⟶ℕ)
32		simpr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ (0[,]1))
33	32, 11	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → [𝑣] ∼ ≠ ∅)
34		neeq1 3005	. . . . . . . . . . . 12 ⊢ (𝑧 = [𝑣] ∼ → (𝑧 ≠ ∅ ↔ [𝑣] ∼ ≠ ∅))
35		fveq2 6756	. . . . . . . . . . . . 13 ⊢ (𝑧 = [𝑣] ∼ → (𝐹‘𝑧) = (𝐹‘[𝑣] ∼ ))
36		id 22	. . . . . . . . . . . . 13 ⊢ (𝑧 = [𝑣] ∼ → 𝑧 = [𝑣] ∼ )
37	35, 36	eleq12d 2833	. . . . . . . . . . . 12 ⊢ (𝑧 = [𝑣] ∼ → ((𝐹‘𝑧) ∈ 𝑧 ↔ (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ ))
38	34, 37	imbi12d 344	. . . . . . . . . . 11 ⊢ (𝑧 = [𝑣] ∼ → ((𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧) ↔ ([𝑣] ∼ ≠ ∅ → (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ )))
39	2	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ∀𝑧 ∈ 𝑆 (𝑧 ≠ ∅ → (𝐹‘𝑧) ∈ 𝑧))
40		ovex 7288	. . . . . . . . . . . . . . 15 ⊢ (0[,]1) ∈ V
41		erex 8480	. . . . . . . . . . . . . . 15 ⊢ ( ∼ Er (0[,]1) → ((0[,]1) ∈ V → ∼ ∈ V))
42	6, 40, 41	mp2 9	. . . . . . . . . . . . . 14 ⊢ ∼ ∈ V
43	42	ecelqsi 8520	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ (0[,]1) → [𝑣] ∼ ∈ ((0[,]1) / ∼ ))
44	43	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → [𝑣] ∼ ∈ ((0[,]1) / ∼ ))
45	44, 3	eleqtrrdi 2850	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → [𝑣] ∼ ∈ 𝑆)
46	38, 39, 45	rspcdva 3554	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ([𝑣] ∼ ≠ ∅ → (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ ))
47	33, 46	mpd 15	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ )
48		fvex 6769	. . . . . . . . . . 11 ⊢ (𝐹‘[𝑣] ∼ ) ∈ V
49		vex 3426	. . . . . . . . . . 11 ⊢ 𝑣 ∈ V
50	48, 49	elec 8500	. . . . . . . . . 10 ⊢ ((𝐹‘[𝑣] ∼ ) ∈ [𝑣] ∼ ↔ 𝑣 ∼ (𝐹‘[𝑣] ∼ ))
51		oveq12 7264	. . . . . . . . . . . 12 ⊢ ((𝑥 = 𝑣 ∧ 𝑦 = (𝐹‘[𝑣] ∼ )) → (𝑥 − 𝑦) = (𝑣 − (𝐹‘[𝑣] ∼ )))
52	51	eleq1d 2823	. . . . . . . . . . 11 ⊢ ((𝑥 = 𝑣 ∧ 𝑦 = (𝐹‘[𝑣] ∼ )) → ((𝑥 − 𝑦) ∈ ℚ ↔ (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℚ))
53	52, 5	brab2a 5670	. . . . . . . . . 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 495	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℚ)
57		elicc01 13127	. . . . . . . . . . 11 ⊢ (𝑣 ∈ (0[,]1) ↔ (𝑣 ∈ ℝ ∧ 0 ≤ 𝑣 ∧ 𝑣 ≤ 1))
58	32, 57	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 ∈ ℝ ∧ 0 ≤ 𝑣 ∧ 𝑣 ≤ 1))
59	58	simp1d 1140	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ ℝ)
60	55	simpld 494	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 ∈ (0[,]1) ∧ (𝐹‘[𝑣] ∼ ) ∈ (0[,]1)))
61	60	simprd 495	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ (0[,]1))
62		elicc01 13127	. . . . . . . . . . 11 ⊢ ((𝐹‘[𝑣] ∼ ) ∈ (0[,]1) ↔ ((𝐹‘[𝑣] ∼ ) ∈ ℝ ∧ 0 ≤ (𝐹‘[𝑣] ∼ ) ∧ (𝐹‘[𝑣] ∼ ) ≤ 1))
63	61, 62	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) ∈ ℝ ∧ 0 ≤ (𝐹‘[𝑣] ∼ ) ∧ (𝐹‘[𝑣] ∼ ) ≤ 1))
64	63	simp1d 1140	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ ℝ)
65	59, 64	resubcld 11333	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℝ)
66	64, 59	resubcld 11333	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) − 𝑣) ∈ ℝ)
67		1red 10907	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 1 ∈ ℝ)
68	58	simp2d 1141	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 0 ≤ 𝑣)
69	64, 59	subge02d 11497	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (0 ≤ 𝑣 ↔ ((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ (𝐹‘[𝑣] ∼ )))
70	68, 69	mpbid 231	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ (𝐹‘[𝑣] ∼ ))
71	63	simp3d 1142	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ≤ 1)
72	66, 64, 67, 70, 71	letrd 11062	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → ((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ 1)
73	66, 67	lenegd 11484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (((𝐹‘[𝑣] ∼ ) − 𝑣) ≤ 1 ↔ -1 ≤ -((𝐹‘[𝑣] ∼ ) − 𝑣)))
74	72, 73	mpbid 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → -1 ≤ -((𝐹‘[𝑣] ∼ ) − 𝑣))
75	64	recnd 10934	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ ℂ)
76	59	recnd 10934	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ ℂ)
77	75, 76	negsubdi2d 11278	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → -((𝐹‘[𝑣] ∼ ) − 𝑣) = (𝑣 − (𝐹‘[𝑣] ∼ )))
78	74, 77	breqtrd 5096	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → -1 ≤ (𝑣 − (𝐹‘[𝑣] ∼ )))
79	63	simp2d 1141	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 0 ≤ (𝐹‘[𝑣] ∼ ))
80	59, 64	subge02d 11497	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (0 ≤ (𝐹‘[𝑣] ∼ ) ↔ (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 𝑣))
81	79, 80	mpbid 231	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 𝑣)
82	58	simp3d 1142	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ≤ 1)
83	65, 59, 67, 81, 82	letrd 11062	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 1)
84		neg1rr 12018	. . . . . . . . 9 ⊢ -1 ∈ ℝ
85		1re 10906	. . . . . . . . 9 ⊢ 1 ∈ ℝ
86	84, 85	elicc2i 13074	. . . . . . . 8 ⊢ ((𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (-1[,]1) ↔ ((𝑣 − (𝐹‘[𝑣] ∼ )) ∈ ℝ ∧ -1 ≤ (𝑣 − (𝐹‘[𝑣] ∼ )) ∧ (𝑣 − (𝐹‘[𝑣] ∼ )) ≤ 1))
87	65, 78, 83, 86	syl3anbrc 1341	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (-1[,]1))
88	56, 87	elind 4124	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (ℚ ∩ (-1[,]1)))
89	31, 88	ffvelrnd 6944	. . . . 5 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) ∈ ℕ)
90		oveq1 7262	. . . . . . . 8 ⊢ (𝑠 = 𝑣 → (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) = (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))))
91	90	eleq1d 2823	. . . . . . 7 ⊢ (𝑠 = 𝑣 → ((𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹 ↔ (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹))
92		f1ocnvfv2 7130	. . . . . . . . . . 11 ⊢ ((𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)) ∧ (𝑣 − (𝐹‘[𝑣] ∼ )) ∈ (ℚ ∩ (-1[,]1))) → (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = (𝑣 − (𝐹‘[𝑣] ∼ )))
93	27, 88, 92	syl2an2r 681	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = (𝑣 − (𝐹‘[𝑣] ∼ )))
94	93	oveq2d 7271	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) = (𝑣 − (𝑣 − (𝐹‘[𝑣] ∼ ))))
95	76, 75	nncand 11267	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝑣 − (𝐹‘[𝑣] ∼ ))) = (𝐹‘[𝑣] ∼ ))
96	94, 95	eqtrd 2778	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) = (𝐹‘[𝑣] ∼ ))
97		fnfvelrn 6940	. . . . . . . . 9 ⊢ ((𝐹 Fn 𝑆 ∧ [𝑣] ∼ ∈ 𝑆) → (𝐹‘[𝑣] ∼ ) ∈ ran 𝐹)
98	1, 45, 97	syl2an2r 681	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝐹‘[𝑣] ∼ ) ∈ ran 𝐹)
99	96, 98	eqeltrd 2839	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑣 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹)
100	91, 59, 99	elrabd 3619	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
101		fveq2 6756	. . . . . . . . . . 11 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → (𝐺‘𝑛) = (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))))
102	101	oveq2d 7271	. . . . . . . . . 10 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → (𝑠 − (𝐺‘𝑛)) = (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))))
103	102	eleq1d 2823	. . . . . . . . 9 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → ((𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹 ↔ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹))
104	103	rabbidv 3404	. . . . . . . 8 ⊢ (𝑛 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹} = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
105		vitali.6	. . . . . . . 8 ⊢ 𝑇 = (𝑛 ∈ ℕ ↦ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹})
106		reex 10893	. . . . . . . . 9 ⊢ ℝ ∈ V
107	106	rabex 5251	. . . . . . . 8 ⊢ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹} ∈ V
108	104, 105, 107	fvmpt 6857	. . . . . . 7 ⊢ ((^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) ∈ ℕ → (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
109	89, 108	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) ∈ ran 𝐹})
110	100, 109	eleqtrrd 2842	. . . . 5 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))))
111		fveq2 6756	. . . . . 6 ⊢ (𝑚 = (^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) → (𝑇‘𝑚) = (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ )))))
112	111	eliuni 4927	. . . . 5 ⊢ (((^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))) ∈ ℕ ∧ 𝑣 ∈ (𝑇‘(^◡𝐺‘(𝑣 − (𝐹‘[𝑣] ∼ ))))) → 𝑣 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚))
113	89, 110, 112	syl2anc 583	. . . 4 ⊢ ((𝜑 ∧ 𝑣 ∈ (0[,]1)) → 𝑣 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚))
114	113	ex 412	. . 3 ⊢ (𝜑 → (𝑣 ∈ (0[,]1) → 𝑣 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚)))
115	114	ssrdv 3923	. 2 ⊢ (𝜑 → (0[,]1) ⊆ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚))
116		eliun 4925	. . . 4 ⊢ (𝑥 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ↔ ∃𝑚 ∈ ℕ 𝑥 ∈ (𝑇‘𝑚))
117		fveq2 6756	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = 𝑚 → (𝐺‘𝑛) = (𝐺‘𝑚))
118	117	oveq2d 7271	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 𝑚 → (𝑠 − (𝐺‘𝑛)) = (𝑠 − (𝐺‘𝑚)))
119	118	eleq1d 2823	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑚 → ((𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹 ↔ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹))
120	119	rabbidv 3404	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑚 → {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑛)) ∈ ran 𝐹} = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
121	106	rabex 5251	. . . . . . . . . . . 12 ⊢ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹} ∈ V
122	120, 105, 121	fvmpt 6857	. . . . . . . . . . 11 ⊢ (𝑚 ∈ ℕ → (𝑇‘𝑚) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
123	122	adantl 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑇‘𝑚) = {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
124	123	eleq2d 2824	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝑥 ∈ (𝑇‘𝑚) ↔ 𝑥 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹}))
125	124	biimpa 476	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹})
126		oveq1 7262	. . . . . . . . . 10 ⊢ (𝑠 = 𝑥 → (𝑠 − (𝐺‘𝑚)) = (𝑥 − (𝐺‘𝑚)))
127	126	eleq1d 2823	. . . . . . . . 9 ⊢ (𝑠 = 𝑥 → ((𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹 ↔ (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹))
128	127	elrab 3617	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑠 ∈ ℝ ∣ (𝑠 − (𝐺‘𝑚)) ∈ ran 𝐹} ↔ (𝑥 ∈ ℝ ∧ (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹))
129	125, 128	sylib 217	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 ∈ ℝ ∧ (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹))
130	129	simpld 494	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ∈ ℝ)
131	84	a1i 11	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → -1 ∈ ℝ)
132		iccssre 13090	. . . . . . . . . 10 ⊢ ((-1 ∈ ℝ ∧ 1 ∈ ℝ) → (-1[,]1) ⊆ ℝ)
133	84, 85, 132	mp2an 688	. . . . . . . . 9 ⊢ (-1[,]1) ⊆ ℝ
134		f1of 6700	. . . . . . . . . . . 12 ⊢ (𝐺:ℕ–1-1-onto→(ℚ ∩ (-1[,]1)) → 𝐺:ℕ⟶(ℚ ∩ (-1[,]1)))
135	27, 134	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐺:ℕ⟶(ℚ ∩ (-1[,]1)))
136	135	ffvelrnda 6943	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐺‘𝑚) ∈ (ℚ ∩ (-1[,]1)))
137	136	elin2d 4129	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐺‘𝑚) ∈ (-1[,]1))
138	133, 137	sselid 3915	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ ℕ) → (𝐺‘𝑚) ∈ ℝ)
139	138	adantr 480	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ∈ ℝ)
140	137	adantr 480	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ∈ (-1[,]1))
141	84, 85	elicc2i 13074	. . . . . . . . 9 ⊢ ((𝐺‘𝑚) ∈ (-1[,]1) ↔ ((𝐺‘𝑚) ∈ ℝ ∧ -1 ≤ (𝐺‘𝑚) ∧ (𝐺‘𝑚) ≤ 1))
142	140, 141	sylib 217	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) ∈ ℝ ∧ -1 ≤ (𝐺‘𝑚) ∧ (𝐺‘𝑚) ≤ 1))
143	142	simp2d 1141	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → -1 ≤ (𝐺‘𝑚))
144	26	ad2antrr 722	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ran 𝐹 ⊆ (0[,]1))
145	129	simprd 495	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 − (𝐺‘𝑚)) ∈ ran 𝐹)
146	144, 145	sseldd 3918	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 − (𝐺‘𝑚)) ∈ (0[,]1))
147		elicc01 13127	. . . . . . . . . 10 ⊢ ((𝑥 − (𝐺‘𝑚)) ∈ (0[,]1) ↔ ((𝑥 − (𝐺‘𝑚)) ∈ ℝ ∧ 0 ≤ (𝑥 − (𝐺‘𝑚)) ∧ (𝑥 − (𝐺‘𝑚)) ≤ 1))
148	146, 147	sylib 217	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝑥 − (𝐺‘𝑚)) ∈ ℝ ∧ 0 ≤ (𝑥 − (𝐺‘𝑚)) ∧ (𝑥 − (𝐺‘𝑚)) ≤ 1))
149	148	simp2d 1141	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 0 ≤ (𝑥 − (𝐺‘𝑚)))
150	130, 139	subge0d 11495	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (0 ≤ (𝑥 − (𝐺‘𝑚)) ↔ (𝐺‘𝑚) ≤ 𝑥))
151	149, 150	mpbid 231	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ≤ 𝑥)
152	131, 139, 130, 143, 151	letrd 11062	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → -1 ≤ 𝑥)
153		peano2re 11078	. . . . . . . 8 ⊢ ((𝐺‘𝑚) ∈ ℝ → ((𝐺‘𝑚) + 1) ∈ ℝ)
154	139, 153	syl 17	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) + 1) ∈ ℝ)
155		2re 11977	. . . . . . . 8 ⊢ 2 ∈ ℝ
156	155	a1i 11	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 2 ∈ ℝ)
157	148	simp3d 1142	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝑥 − (𝐺‘𝑚)) ≤ 1)
158		1red 10907	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 1 ∈ ℝ)
159	130, 139, 158	lesubadd2d 11504	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝑥 − (𝐺‘𝑚)) ≤ 1 ↔ 𝑥 ≤ ((𝐺‘𝑚) + 1)))
160	157, 159	mpbid 231	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ≤ ((𝐺‘𝑚) + 1))
161	142	simp3d 1142	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → (𝐺‘𝑚) ≤ 1)
162	139, 158, 158, 161	leadd1dd 11519	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) + 1) ≤ (1 + 1))
163		df-2 11966	. . . . . . . 8 ⊢ 2 = (1 + 1)
164	162, 163	breqtrrdi 5112	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → ((𝐺‘𝑚) + 1) ≤ 2)
165	130, 154, 156, 160, 164	letrd 11062	. . . . . 6 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ≤ 2)
166	84, 155	elicc2i 13074	. . . . . 6 ⊢ (𝑥 ∈ (-1[,]2) ↔ (𝑥 ∈ ℝ ∧ -1 ≤ 𝑥 ∧ 𝑥 ≤ 2))
167	130, 152, 165, 166	syl3anbrc 1341	. . . . 5 ⊢ (((𝜑 ∧ 𝑚 ∈ ℕ) ∧ 𝑥 ∈ (𝑇‘𝑚)) → 𝑥 ∈ (-1[,]2))
168	167	rexlimdva2 3215	. . . 4 ⊢ (𝜑 → (∃𝑚 ∈ ℕ 𝑥 ∈ (𝑇‘𝑚) → 𝑥 ∈ (-1[,]2)))
169	116, 168	syl5bi 241	. . 3 ⊢ (𝜑 → (𝑥 ∈ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) → 𝑥 ∈ (-1[,]2)))
170	169	ssrdv 3923	. 2 ⊢ (𝜑 → ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ⊆ (-1[,]2))
171	26, 115, 170	3jca 1126	1 ⊢ (𝜑 → (ran 𝐹 ⊆ (0[,]1) ∧ (0[,]1) ⊆ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ∧ ∪ 𝑚 ∈ ℕ (𝑇‘𝑚) ⊆ (-1[,]2)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 395 ∧ w3a 1085 = wceq 1539 ∈ wcel 2108 ≠ wne 2942 ∀wral 3063 ∃wrex 3064 {crab 3067 Vcvv 3422 ∖ cdif 3880 ∩ cin 3882 ⊆ wss 3883 ∅c0 4253 𝒫 cpw 4530 ∪ ciun 4921 class class class wbr 5070 {copab 5132 ↦ cmpt 5153 ^◡ccnv 5579 dom cdm 5580 ran crn 5581 Fn wfn 6413 ⟶wf 6414 –1-1-onto→wf1o 6417 ‘cfv 6418 (class class class)co 7255 Er wer 8453 [cec 8454 / cqs 8455 ℝcr 10801 0cc0 10802 1c1 10803 + caddc 10805 ≤ cle 10941 − cmin 11135 -cneg 11136 ℕcn 11903 2c2 11958 ℚcq 12617 [,]cicc 13011 volcvol 24532

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1799 ax-4 1813 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2156 ax-12 2173 ax-ext 2709 ax-sep 5218 ax-nul 5225 ax-pow 5283 ax-pr 5347 ax-un 7566 ax-cnex 10858 ax-resscn 10859 ax-1cn 10860 ax-icn 10861 ax-addcl 10862 ax-addrcl 10863 ax-mulcl 10864 ax-mulrcl 10865 ax-mulcom 10866 ax-addass 10867 ax-mulass 10868 ax-distr 10869 ax-i2m1 10870 ax-1ne0 10871 ax-1rid 10872 ax-rnegex 10873 ax-rrecex 10874 ax-cnre 10875 ax-pre-lttri 10876 ax-pre-lttrn 10877 ax-pre-ltadd 10878 ax-pre-mulgt0 10879

This theorem depends on definitions: df-bi 206 df-an 396 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1784 df-nf 1788 df-sb 2069 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2817 df-nfc 2888 df-ne 2943 df-nel 3049 df-ral 3068 df-rex 3069 df-reu 3070 df-rmo 3071 df-rab 3072 df-v 3424 df-sbc 3712 df-csb 3829 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3902 df-nul 4254 df-if 4457 df-pw 4532 df-sn 4559 df-pr 4561 df-tp 4563 df-op 4565 df-uni 4837 df-iun 4923 df-br 5071 df-opab 5133 df-mpt 5154 df-tr 5188 df-id 5480 df-eprel 5486 df-po 5494 df-so 5495 df-fr 5535 df-we 5537 df-xp 5586 df-rel 5587 df-cnv 5588 df-co 5589 df-dm 5590 df-rn 5591 df-res 5592 df-ima 5593 df-pred 6191 df-ord 6254 df-on 6255 df-lim 6256 df-suc 6257 df-iota 6376 df-fun 6420 df-fn 6421 df-f 6422 df-f1 6423 df-fo 6424 df-f1o 6425 df-fv 6426 df-riota 7212 df-ov 7258 df-oprab 7259 df-mpo 7260 df-om 7688 df-1st 7804 df-2nd 7805 df-frecs 8068 df-wrecs 8099 df-recs 8173 df-rdg 8212 df-er 8456 df-ec 8458 df-qs 8462 df-en 8692 df-dom 8693 df-sdom 8694 df-pnf 10942 df-mnf 10943 df-xr 10944 df-ltxr 10945 df-le 10946 df-sub 11137 df-neg 11138 df-div 11563 df-nn 11904 df-2 11966 df-n0 12164 df-z 12250 df-q 12618 df-icc 13015

This theorem is referenced by: vitalilem3 24679 vitalilem4 24680 vitalilem5 24681

W3C validator