Users' Mathboxes Mathbox for Brendan Leahy < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  opnmbllem0 Structured version   Visualization version   GIF version

Theorem opnmbllem0 37616
Description: Lemma for ismblfin 37621; could also be used to shorten proof of opnmbllem 25655. (Contributed by Brendan Leahy, 13-Jul-2018.)
Assertion
Ref Expression
opnmbllem0 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) = 𝐴)
Distinct variable group:   𝑥,𝑦,𝑧,𝐴

Proof of Theorem opnmbllem0
Dummy variables 𝑛 𝑟 𝑠 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6920 . . . . . . . 8 (𝑧 = 𝑤 → ([,]‘𝑧) = ([,]‘𝑤))
21sseq1d 4040 . . . . . . 7 (𝑧 = 𝑤 → (([,]‘𝑧) ⊆ 𝐴 ↔ ([,]‘𝑤) ⊆ 𝐴))
32elrab 3708 . . . . . 6 (𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ↔ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴))
4 simprr 772 . . . . . . 7 ((𝐴 ∈ (topGen‘ran (,)) ∧ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴)) → ([,]‘𝑤) ⊆ 𝐴)
5 fvex 6933 . . . . . . . 8 ([,]‘𝑤) ∈ V
65elpw 4626 . . . . . . 7 (([,]‘𝑤) ∈ 𝒫 𝐴 ↔ ([,]‘𝑤) ⊆ 𝐴)
74, 6sylibr 234 . . . . . 6 ((𝐴 ∈ (topGen‘ran (,)) ∧ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴)) → ([,]‘𝑤) ∈ 𝒫 𝐴)
83, 7sylan2b 593 . . . . 5 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) → ([,]‘𝑤) ∈ 𝒫 𝐴)
98ralrimiva 3152 . . . 4 (𝐴 ∈ (topGen‘ran (,)) → ∀𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ([,]‘𝑤) ∈ 𝒫 𝐴)
10 iccf 13508 . . . . . 6 [,]:(ℝ* × ℝ*)⟶𝒫 ℝ*
11 ffun 6750 . . . . . 6 ([,]:(ℝ* × ℝ*)⟶𝒫 ℝ* → Fun [,])
1210, 11ax-mp 5 . . . . 5 Fun [,]
13 ssrab2 4103 . . . . . . 7 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)
14 oveq1 7455 . . . . . . . . . . . 12 (𝑥 = 𝑟 → (𝑥 / (2↑𝑦)) = (𝑟 / (2↑𝑦)))
15 oveq1 7455 . . . . . . . . . . . . 13 (𝑥 = 𝑟 → (𝑥 + 1) = (𝑟 + 1))
1615oveq1d 7463 . . . . . . . . . . . 12 (𝑥 = 𝑟 → ((𝑥 + 1) / (2↑𝑦)) = ((𝑟 + 1) / (2↑𝑦)))
1714, 16opeq12d 4905 . . . . . . . . . . 11 (𝑥 = 𝑟 → ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩ = ⟨(𝑟 / (2↑𝑦)), ((𝑟 + 1) / (2↑𝑦))⟩)
18 oveq2 7456 . . . . . . . . . . . . 13 (𝑦 = 𝑠 → (2↑𝑦) = (2↑𝑠))
1918oveq2d 7464 . . . . . . . . . . . 12 (𝑦 = 𝑠 → (𝑟 / (2↑𝑦)) = (𝑟 / (2↑𝑠)))
2018oveq2d 7464 . . . . . . . . . . . 12 (𝑦 = 𝑠 → ((𝑟 + 1) / (2↑𝑦)) = ((𝑟 + 1) / (2↑𝑠)))
2119, 20opeq12d 4905 . . . . . . . . . . 11 (𝑦 = 𝑠 → ⟨(𝑟 / (2↑𝑦)), ((𝑟 + 1) / (2↑𝑦))⟩ = ⟨(𝑟 / (2↑𝑠)), ((𝑟 + 1) / (2↑𝑠))⟩)
2217, 21cbvmpov 7545 . . . . . . . . . 10 (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) = (𝑟 ∈ ℤ, 𝑠 ∈ ℕ0 ↦ ⟨(𝑟 / (2↑𝑠)), ((𝑟 + 1) / (2↑𝑠))⟩)
2322dyadf 25645 . . . . . . . . 9 (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩):(ℤ × ℕ0)⟶( ≤ ∩ (ℝ × ℝ))
24 frn 6754 . . . . . . . . 9 ((𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩):(ℤ × ℕ0)⟶( ≤ ∩ (ℝ × ℝ)) → ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ ( ≤ ∩ (ℝ × ℝ)))
2523, 24ax-mp 5 . . . . . . . 8 ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ ( ≤ ∩ (ℝ × ℝ))
26 inss2 4259 . . . . . . . . 9 ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ × ℝ)
27 rexpssxrxp 11335 . . . . . . . . 9 (ℝ × ℝ) ⊆ (ℝ* × ℝ*)
2826, 27sstri 4018 . . . . . . . 8 ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ* × ℝ*)
2925, 28sstri 4018 . . . . . . 7 ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ (ℝ* × ℝ*)
3013, 29sstri 4018 . . . . . 6 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ (ℝ* × ℝ*)
3110fdmi 6758 . . . . . 6 dom [,] = (ℝ* × ℝ*)
3230, 31sseqtrri 4046 . . . . 5 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ dom [,]
33 funimass4 6986 . . . . 5 ((Fun [,] ∧ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ dom [,]) → (([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴 ↔ ∀𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ([,]‘𝑤) ∈ 𝒫 𝐴))
3412, 32, 33mp2an 691 . . . 4 (([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴 ↔ ∀𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ([,]‘𝑤) ∈ 𝒫 𝐴)
359, 34sylibr 234 . . 3 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴)
36 sspwuni 5123 . . 3 (([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝐴)
3735, 36sylib 218 . 2 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝐴)
38 eqid 2740 . . . . 5 ((abs ∘ − ) ↾ (ℝ × ℝ)) = ((abs ∘ − ) ↾ (ℝ × ℝ))
3938rexmet 24832 . . . 4 ((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ)
40 eqid 2740 . . . . . 6 (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ))) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
4138, 40tgioo 24837 . . . . 5 (topGen‘ran (,)) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
4241mopni2 24527 . . . 4 ((((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ) ∧ 𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → ∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴)
4339, 42mp3an1 1448 . . 3 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → ∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴)
44 elssuni 4961 . . . . . . . . 9 (𝐴 ∈ (topGen‘ran (,)) → 𝐴 (topGen‘ran (,)))
45 uniretop 24804 . . . . . . . . 9 ℝ = (topGen‘ran (,))
4644, 45sseqtrrdi 4060 . . . . . . . 8 (𝐴 ∈ (topGen‘ran (,)) → 𝐴 ⊆ ℝ)
4746sselda 4008 . . . . . . 7 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → 𝑤 ∈ ℝ)
48 rpre 13065 . . . . . . 7 (𝑟 ∈ ℝ+𝑟 ∈ ℝ)
4938bl2ioo 24833 . . . . . . 7 ((𝑤 ∈ ℝ ∧ 𝑟 ∈ ℝ) → (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) = ((𝑤𝑟)(,)(𝑤 + 𝑟)))
5047, 48, 49syl2an 595 . . . . . 6 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) = ((𝑤𝑟)(,)(𝑤 + 𝑟)))
5150sseq1d 4040 . . . . 5 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → ((𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴 ↔ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴))
52 2re 12367 . . . . . . . . 9 2 ∈ ℝ
53 1lt2 12464 . . . . . . . . 9 1 < 2
54 expnlbnd 14282 . . . . . . . . 9 ((𝑟 ∈ ℝ+ ∧ 2 ∈ ℝ ∧ 1 < 2) → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5552, 53, 54mp3an23 1453 . . . . . . . 8 (𝑟 ∈ ℝ+ → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5655ad2antrl 727 . . . . . . 7 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5747ad2antrr 725 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ∈ ℝ)
58 2nn 12366 . . . . . . . . . . . . . . . 16 2 ∈ ℕ
59 nnnn0 12560 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
6059ad2antrl 727 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑛 ∈ ℕ0)
61 nnexpcl 14125 . . . . . . . . . . . . . . . 16 ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
6258, 60, 61sylancr 586 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℕ)
6362nnred 12308 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℝ)
6457, 63remulcld 11320 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 · (2↑𝑛)) ∈ ℝ)
65 fllelt 13848 . . . . . . . . . . . . 13 ((𝑤 · (2↑𝑛)) ∈ ℝ → ((⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛)) ∧ (𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1)))
6664, 65syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛)) ∧ (𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1)))
6766simpld 494 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛)))
68 reflcl 13847 . . . . . . . . . . . . 13 ((𝑤 · (2↑𝑛)) ∈ ℝ → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ)
6964, 68syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ)
7062nngt0d 12342 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 0 < (2↑𝑛))
71 ledivmul2 12174 . . . . . . . . . . . 12 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ ∧ 𝑤 ∈ ℝ ∧ ((2↑𝑛) ∈ ℝ ∧ 0 < (2↑𝑛))) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤 ↔ (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛))))
7269, 57, 63, 70, 71syl112anc 1374 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤 ↔ (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛))))
7367, 72mpbird 257 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤)
74 peano2re 11463 . . . . . . . . . . . . 13 ((⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ → ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ)
7569, 74syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ)
7675, 62nndivred 12347 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ∈ ℝ)
7766simprd 495 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1))
78 ltmuldiv 12168 . . . . . . . . . . . . 13 ((𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ ∧ ((2↑𝑛) ∈ ℝ ∧ 0 < (2↑𝑛))) → ((𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
7957, 75, 63, 70, 78syl112anc 1374 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
8077, 79mpbid 232 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))
8157, 76, 80ltled 11438 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))
8269, 62nndivred 12347 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ∈ ℝ)
83 elicc2 13472 . . . . . . . . . . 11 ((((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ∈ ℝ ∧ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ∈ ℝ) → (𝑤 ∈ (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) ↔ (𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))))
8482, 76, 83syl2anc 583 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 ∈ (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) ↔ (𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))))
8557, 73, 81, 84mpbir3and 1342 . . . . . . . . 9 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ∈ (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
8664flcld 13849 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ)
8722dyadval 25646 . . . . . . . . . . . 12 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) = ⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
8886, 60, 87syl2anc 583 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) = ⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
8988fveq2d 6924 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) = ([,]‘⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩))
90 df-ov 7451 . . . . . . . . . 10 (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) = ([,]‘⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
9189, 90eqtr4di 2798 . . . . . . . . 9 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) = (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
9285, 91eleqtrrd 2847 . . . . . . . 8 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ∈ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)))
93 ffn 6747 . . . . . . . . . . . . 13 ((𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩):(ℤ × ℕ0)⟶( ≤ ∩ (ℝ × ℝ)) → (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) Fn (ℤ × ℕ0))
9423, 93ax-mp 5 . . . . . . . . . . . 12 (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) Fn (ℤ × ℕ0)
95 fnovrn 7625 . . . . . . . . . . . 12 (((𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) Fn (ℤ × ℕ0) ∧ (⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
9694, 95mp3an1 1448 . . . . . . . . . . 11 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
9786, 60, 96syl2anc 583 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
98 simplrl 776 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑟 ∈ ℝ+)
9998rpred 13099 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑟 ∈ ℝ)
10057, 99resubcld 11718 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) ∈ ℝ)
101100rexrd 11340 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) ∈ ℝ*)
10257, 99readdcld 11319 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + 𝑟) ∈ ℝ)
103102rexrd 11340 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + 𝑟) ∈ ℝ*)
10482, 99readdcld 11319 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟) ∈ ℝ)
10569recnd 11318 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℂ)
106 1cnd 11285 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 1 ∈ ℂ)
10763recnd 11318 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℂ)
10862nnne0d 12343 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ≠ 0)
109105, 106, 107, 108divdird 12108 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) = (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))))
11062nnrecred 12344 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (1 / (2↑𝑛)) ∈ ℝ)
111 simprr 772 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (1 / (2↑𝑛)) < 𝑟)
112110, 99, 82, 111ltadd2dd 11449 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))) < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
113109, 112eqbrtrd 5188 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
11457, 76, 104, 80, 113lttrd 11451 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
11557, 99, 82ltsubaddd 11886 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤𝑟) < ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟)))
116114, 115mpbird 257 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) < ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)))
11757, 110readdcld 11319 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + (1 / (2↑𝑛))) ∈ ℝ)
11882, 57, 110, 73leadd1dd 11904 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))) ≤ (𝑤 + (1 / (2↑𝑛))))
119109, 118eqbrtrd 5188 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ≤ (𝑤 + (1 / (2↑𝑛))))
120110, 99, 57, 111ltadd2dd 11449 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + (1 / (2↑𝑛))) < (𝑤 + 𝑟))
12176, 117, 102, 119, 120lelttrd 11448 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) < (𝑤 + 𝑟))
122 iccssioo 13476 . . . . . . . . . . . . 13 ((((𝑤𝑟) ∈ ℝ* ∧ (𝑤 + 𝑟) ∈ ℝ*) ∧ ((𝑤𝑟) < ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ∧ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) < (𝑤 + 𝑟))) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) ⊆ ((𝑤𝑟)(,)(𝑤 + 𝑟)))
123101, 103, 116, 121, 122syl22anc 838 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) ⊆ ((𝑤𝑟)(,)(𝑤 + 𝑟)))
12491, 123eqsstrd 4047 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ ((𝑤𝑟)(,)(𝑤 + 𝑟)))
125 simplrr 777 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)
126124, 125sstrd 4019 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ 𝐴)
127 fveq2 6920 . . . . . . . . . . . 12 (𝑧 = ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) → ([,]‘𝑧) = ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)))
128127sseq1d 4040 . . . . . . . . . . 11 (𝑧 = ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) → (([,]‘𝑧) ⊆ 𝐴 ↔ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ 𝐴))
129128elrab 3708 . . . . . . . . . 10 (((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ↔ (((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ 𝐴))
13097, 126, 129sylanbrc 582 . . . . . . . . 9 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})
131 funfvima2 7268 . . . . . . . . . 10 ((Fun [,] ∧ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ dom [,]) → (((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∈ ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
13212, 32, 131mp2an 691 . . . . . . . . 9 (((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∈ ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
133130, 132syl 17 . . . . . . . 8 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∈ ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
134 elunii 4936 . . . . . . . 8 ((𝑤 ∈ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∧ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∈ ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
13592, 133, 134syl2anc 583 . . . . . . 7 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
13656, 135rexlimddv 3167 . . . . . 6 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
137136expr 456 . . . . 5 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → (((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
13851, 137sylbid 240 . . . 4 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → ((𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
139138rexlimdva 3161 . . 3 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → (∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
14043, 139mpd 15 . 2 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
14137, 140eqelssd 4030 1 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) = 𝐴)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1537  wcel 2108  wral 3067  wrex 3076  {crab 3443  cin 3975  wss 3976  𝒫 cpw 4622  cop 4654   cuni 4931   class class class wbr 5166   × cxp 5698  dom cdm 5700  ran crn 5701  cres 5702  cima 5703  ccom 5704  Fun wfun 6567   Fn wfn 6568  wf 6569  cfv 6573  (class class class)co 7448  cmpo 7450  cr 11183  0cc0 11184  1c1 11185   + caddc 11187   · cmul 11189  *cxr 11323   < clt 11324  cle 11325  cmin 11520   / cdiv 11947  cn 12293  2c2 12348  0cn0 12553  cz 12639  +crp 13057  (,)cioo 13407  [,]cicc 13410  cfl 13841  cexp 14112  abscabs 15283  topGenctg 17497  ∞Metcxmet 21372  ballcbl 21374  MetOpencmopn 21377
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-cnex 11240  ax-resscn 11241  ax-1cn 11242  ax-icn 11243  ax-addcl 11244  ax-addrcl 11245  ax-mulcl 11246  ax-mulrcl 11247  ax-mulcom 11248  ax-addass 11249  ax-mulass 11250  ax-distr 11251  ax-i2m1 11252  ax-1ne0 11253  ax-1rid 11254  ax-rnegex 11255  ax-rrecex 11256  ax-cnre 11257  ax-pre-lttri 11258  ax-pre-lttrn 11259  ax-pre-ltadd 11260  ax-pre-mulgt0 11261  ax-pre-sup 11262
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-iun 5017  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-om 7904  df-1st 8030  df-2nd 8031  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-er 8763  df-map 8886  df-en 9004  df-dom 9005  df-sdom 9006  df-sup 9511  df-inf 9512  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11522  df-neg 11523  df-div 11948  df-nn 12294  df-2 12356  df-3 12357  df-n0 12554  df-z 12640  df-uz 12904  df-q 13014  df-rp 13058  df-xneg 13175  df-xadd 13176  df-xmul 13177  df-ioo 13411  df-icc 13414  df-fl 13843  df-seq 14053  df-exp 14113  df-cj 15148  df-re 15149  df-im 15150  df-sqrt 15284  df-abs 15285  df-topgen 17503  df-psmet 21379  df-xmet 21380  df-met 21381  df-bl 21382  df-mopn 21383  df-top 22921  df-topon 22938  df-bases 22974
This theorem is referenced by:  mblfinlem1  37617  mblfinlem2  37618
  Copyright terms: Public domain W3C validator