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 36461
Description: Lemma for ismblfin 36466; could also be used to shorten proof of opnmbllem 25099. (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 6887 . . . . . . . 8 (𝑧 = 𝑤 → ([,]‘𝑧) = ([,]‘𝑤))
21sseq1d 4011 . . . . . . 7 (𝑧 = 𝑤 → (([,]‘𝑧) ⊆ 𝐴 ↔ ([,]‘𝑤) ⊆ 𝐴))
32elrab 3681 . . . . . 6 (𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ↔ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴))
4 simprr 772 . . . . . . 7 ((𝐴 ∈ (topGen‘ran (,)) ∧ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴)) → ([,]‘𝑤) ⊆ 𝐴)
5 fvex 6900 . . . . . . . 8 ([,]‘𝑤) ∈ V
65elpw 4604 . . . . . . 7 (([,]‘𝑤) ∈ 𝒫 𝐴 ↔ ([,]‘𝑤) ⊆ 𝐴)
74, 6sylibr 233 . . . . . 6 ((𝐴 ∈ (topGen‘ran (,)) ∧ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴)) → ([,]‘𝑤) ∈ 𝒫 𝐴)
83, 7sylan2b 595 . . . . 5 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) → ([,]‘𝑤) ∈ 𝒫 𝐴)
98ralrimiva 3147 . . . 4 (𝐴 ∈ (topGen‘ran (,)) → ∀𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ([,]‘𝑤) ∈ 𝒫 𝐴)
10 iccf 13420 . . . . . 6 [,]:(ℝ* × ℝ*)⟶𝒫 ℝ*
11 ffun 6716 . . . . . 6 ([,]:(ℝ* × ℝ*)⟶𝒫 ℝ* → Fun [,])
1210, 11ax-mp 5 . . . . 5 Fun [,]
13 ssrab2 4075 . . . . . . 7 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)
14 oveq1 7410 . . . . . . . . . . . 12 (𝑥 = 𝑟 → (𝑥 / (2↑𝑦)) = (𝑟 / (2↑𝑦)))
15 oveq1 7410 . . . . . . . . . . . . 13 (𝑥 = 𝑟 → (𝑥 + 1) = (𝑟 + 1))
1615oveq1d 7418 . . . . . . . . . . . 12 (𝑥 = 𝑟 → ((𝑥 + 1) / (2↑𝑦)) = ((𝑟 + 1) / (2↑𝑦)))
1714, 16opeq12d 4879 . . . . . . . . . . 11 (𝑥 = 𝑟 → ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩ = ⟨(𝑟 / (2↑𝑦)), ((𝑟 + 1) / (2↑𝑦))⟩)
18 oveq2 7411 . . . . . . . . . . . . 13 (𝑦 = 𝑠 → (2↑𝑦) = (2↑𝑠))
1918oveq2d 7419 . . . . . . . . . . . 12 (𝑦 = 𝑠 → (𝑟 / (2↑𝑦)) = (𝑟 / (2↑𝑠)))
2018oveq2d 7419 . . . . . . . . . . . 12 (𝑦 = 𝑠 → ((𝑟 + 1) / (2↑𝑦)) = ((𝑟 + 1) / (2↑𝑠)))
2119, 20opeq12d 4879 . . . . . . . . . . 11 (𝑦 = 𝑠 → ⟨(𝑟 / (2↑𝑦)), ((𝑟 + 1) / (2↑𝑦))⟩ = ⟨(𝑟 / (2↑𝑠)), ((𝑟 + 1) / (2↑𝑠))⟩)
2217, 21cbvmpov 7498 . . . . . . . . . 10 (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) = (𝑟 ∈ ℤ, 𝑠 ∈ ℕ0 ↦ ⟨(𝑟 / (2↑𝑠)), ((𝑟 + 1) / (2↑𝑠))⟩)
2322dyadf 25089 . . . . . . . . 9 (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩):(ℤ × ℕ0)⟶( ≤ ∩ (ℝ × ℝ))
24 frn 6720 . . . . . . . . 9 ((𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩):(ℤ × ℕ0)⟶( ≤ ∩ (ℝ × ℝ)) → ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ ( ≤ ∩ (ℝ × ℝ)))
2523, 24ax-mp 5 . . . . . . . 8 ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ ( ≤ ∩ (ℝ × ℝ))
26 inss2 4227 . . . . . . . . 9 ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ × ℝ)
27 rexpssxrxp 11254 . . . . . . . . 9 (ℝ × ℝ) ⊆ (ℝ* × ℝ*)
2826, 27sstri 3989 . . . . . . . 8 ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ* × ℝ*)
2925, 28sstri 3989 . . . . . . 7 ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ (ℝ* × ℝ*)
3013, 29sstri 3989 . . . . . 6 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ (ℝ* × ℝ*)
3110fdmi 6725 . . . . . 6 dom [,] = (ℝ* × ℝ*)
3230, 31sseqtrri 4017 . . . . 5 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ dom [,]
33 funimass4 6952 . . . . 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 233 . . 3 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴)
36 sspwuni 5101 . . 3 (([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝐴)
3735, 36sylib 217 . 2 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝐴)
38 eqid 2733 . . . . 5 ((abs ∘ − ) ↾ (ℝ × ℝ)) = ((abs ∘ − ) ↾ (ℝ × ℝ))
3938rexmet 24288 . . . 4 ((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ)
40 eqid 2733 . . . . . 6 (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ))) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
4138, 40tgioo 24293 . . . . 5 (topGen‘ran (,)) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
4241mopni2 23983 . . . 4 ((((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ) ∧ 𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → ∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴)
4339, 42mp3an1 1449 . . 3 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → ∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴)
44 elssuni 4939 . . . . . . . . 9 (𝐴 ∈ (topGen‘ran (,)) → 𝐴 (topGen‘ran (,)))
45 uniretop 24260 . . . . . . . . 9 ℝ = (topGen‘ran (,))
4644, 45sseqtrrdi 4031 . . . . . . . 8 (𝐴 ∈ (topGen‘ran (,)) → 𝐴 ⊆ ℝ)
4746sselda 3980 . . . . . . 7 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → 𝑤 ∈ ℝ)
48 rpre 12977 . . . . . . 7 (𝑟 ∈ ℝ+𝑟 ∈ ℝ)
4938bl2ioo 24289 . . . . . . 7 ((𝑤 ∈ ℝ ∧ 𝑟 ∈ ℝ) → (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) = ((𝑤𝑟)(,)(𝑤 + 𝑟)))
5047, 48, 49syl2an 597 . . . . . 6 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) = ((𝑤𝑟)(,)(𝑤 + 𝑟)))
5150sseq1d 4011 . . . . 5 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → ((𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴 ↔ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴))
52 2re 12281 . . . . . . . . 9 2 ∈ ℝ
53 1lt2 12378 . . . . . . . . 9 1 < 2
54 expnlbnd 14191 . . . . . . . . 9 ((𝑟 ∈ ℝ+ ∧ 2 ∈ ℝ ∧ 1 < 2) → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5552, 53, 54mp3an23 1454 . . . . . . . 8 (𝑟 ∈ ℝ+ → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5655ad2antrl 727 . . . . . . 7 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5747ad2antrr 725 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ∈ ℝ)
58 2nn 12280 . . . . . . . . . . . . . . . 16 2 ∈ ℕ
59 nnnn0 12474 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
6059ad2antrl 727 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑛 ∈ ℕ0)
61 nnexpcl 14035 . . . . . . . . . . . . . . . 16 ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
6258, 60, 61sylancr 588 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℕ)
6362nnred 12222 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℝ)
6457, 63remulcld 11239 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 · (2↑𝑛)) ∈ ℝ)
65 fllelt 13757 . . . . . . . . . . . . 13 ((𝑤 · (2↑𝑛)) ∈ ℝ → ((⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛)) ∧ (𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1)))
6664, 65syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛)) ∧ (𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1)))
6766simpld 496 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛)))
68 reflcl 13756 . . . . . . . . . . . . 13 ((𝑤 · (2↑𝑛)) ∈ ℝ → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ)
6964, 68syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ)
7062nngt0d 12256 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 0 < (2↑𝑛))
71 ledivmul2 12088 . . . . . . . . . . . 12 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ ∧ 𝑤 ∈ ℝ ∧ ((2↑𝑛) ∈ ℝ ∧ 0 < (2↑𝑛))) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤 ↔ (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛))))
7269, 57, 63, 70, 71syl112anc 1375 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤 ↔ (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛))))
7367, 72mpbird 257 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤)
74 peano2re 11382 . . . . . . . . . . . . 13 ((⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ → ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ)
7569, 74syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ)
7675, 62nndivred 12261 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ∈ ℝ)
7766simprd 497 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1))
78 ltmuldiv 12082 . . . . . . . . . . . . 13 ((𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ ∧ ((2↑𝑛) ∈ ℝ ∧ 0 < (2↑𝑛))) → ((𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
7957, 75, 63, 70, 78syl112anc 1375 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
8077, 79mpbid 231 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))
8157, 76, 80ltled 11357 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))
8269, 62nndivred 12261 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ∈ ℝ)
83 elicc2 13384 . . . . . . . . . . 11 ((((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ∈ ℝ ∧ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ∈ ℝ) → (𝑤 ∈ (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) ↔ (𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))))
8482, 76, 83syl2anc 585 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 ∈ (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) ↔ (𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))))
8557, 73, 81, 84mpbir3and 1343 . . . . . . . . 9 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ∈ (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
8664flcld 13758 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ)
8722dyadval 25090 . . . . . . . . . . . 12 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) = ⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
8886, 60, 87syl2anc 585 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) = ⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
8988fveq2d 6891 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) = ([,]‘⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩))
90 df-ov 7406 . . . . . . . . . 10 (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) = ([,]‘⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
9189, 90eqtr4di 2791 . . . . . . . . 9 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) = (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
9285, 91eleqtrrd 2837 . . . . . . . 8 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ∈ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)))
93 ffn 6713 . . . . . . . . . . . . 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 7576 . . . . . . . . . . . 12 (((𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) Fn (ℤ × ℕ0) ∧ (⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
9694, 95mp3an1 1449 . . . . . . . . . . 11 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
9786, 60, 96syl2anc 585 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
98 simplrl 776 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑟 ∈ ℝ+)
9998rpred 13011 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑟 ∈ ℝ)
10057, 99resubcld 11637 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) ∈ ℝ)
101100rexrd 11259 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) ∈ ℝ*)
10257, 99readdcld 11238 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + 𝑟) ∈ ℝ)
103102rexrd 11259 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + 𝑟) ∈ ℝ*)
10482, 99readdcld 11238 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟) ∈ ℝ)
10569recnd 11237 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℂ)
106 1cnd 11204 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 1 ∈ ℂ)
10763recnd 11237 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℂ)
10862nnne0d 12257 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ≠ 0)
109105, 106, 107, 108divdird 12023 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) = (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))))
11062nnrecred 12258 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (1 / (2↑𝑛)) ∈ ℝ)
111 simprr 772 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (1 / (2↑𝑛)) < 𝑟)
112110, 99, 82, 111ltadd2dd 11368 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))) < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
113109, 112eqbrtrd 5168 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
11457, 76, 104, 80, 113lttrd 11370 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
11557, 99, 82ltsubaddd 11805 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤𝑟) < ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟)))
116114, 115mpbird 257 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) < ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)))
11757, 110readdcld 11238 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + (1 / (2↑𝑛))) ∈ ℝ)
11882, 57, 110, 73leadd1dd 11823 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))) ≤ (𝑤 + (1 / (2↑𝑛))))
119109, 118eqbrtrd 5168 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ≤ (𝑤 + (1 / (2↑𝑛))))
120110, 99, 57, 111ltadd2dd 11368 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + (1 / (2↑𝑛))) < (𝑤 + 𝑟))
12176, 117, 102, 119, 120lelttrd 11367 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) < (𝑤 + 𝑟))
122 iccssioo 13388 . . . . . . . . . . . . 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 4018 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ ((𝑤𝑟)(,)(𝑤 + 𝑟)))
125 simplrr 777 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)
126124, 125sstrd 3990 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ 𝐴)
127 fveq2 6887 . . . . . . . . . . . 12 (𝑧 = ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) → ([,]‘𝑧) = ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)))
128127sseq1d 4011 . . . . . . . . . . 11 (𝑧 = ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) → (([,]‘𝑧) ⊆ 𝐴 ↔ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ 𝐴))
129128elrab 3681 . . . . . . . . . 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 584 . . . . . . . . 9 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})
131 funfvima2 7227 . . . . . . . . . 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 4911 . . . . . . . 8 ((𝑤 ∈ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∧ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∈ ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
13592, 133, 134syl2anc 585 . . . . . . 7 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
13656, 135rexlimddv 3162 . . . . . 6 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
137136expr 458 . . . . 5 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → (((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
13851, 137sylbid 239 . . . 4 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → ((𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
139138rexlimdva 3156 . . 3 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → (∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
14043, 139mpd 15 . 2 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
14137, 140eqelssd 4001 1 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) = 𝐴)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 397  w3a 1088   = wceq 1542  wcel 2107  wral 3062  wrex 3071  {crab 3433  cin 3945  wss 3946  𝒫 cpw 4600  cop 4632   cuni 4906   class class class wbr 5146   × cxp 5672  dom cdm 5674  ran crn 5675  cres 5676  cima 5677  ccom 5678  Fun wfun 6533   Fn wfn 6534  wf 6535  cfv 6539  (class class class)co 7403  cmpo 7405  cr 11104  0cc0 11105  1c1 11106   + caddc 11108   · cmul 11110  *cxr 11242   < clt 11243  cle 11244  cmin 11439   / cdiv 11866  cn 12207  2c2 12262  0cn0 12467  cz 12553  +crp 12969  (,)cioo 13319  [,]cicc 13322  cfl 13750  cexp 14022  abscabs 15176  topGenctg 17378  ∞Metcxmet 20913  ballcbl 20915  MetOpencmopn 20918
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-sep 5297  ax-nul 5304  ax-pow 5361  ax-pr 5425  ax-un 7719  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182  ax-pre-sup 11183
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3776  df-csb 3892  df-dif 3949  df-un 3951  df-in 3953  df-ss 3963  df-pss 3965  df-nul 4321  df-if 4527  df-pw 4602  df-sn 4627  df-pr 4629  df-op 4633  df-uni 4907  df-iun 4997  df-br 5147  df-opab 5209  df-mpt 5230  df-tr 5264  df-id 5572  df-eprel 5578  df-po 5586  df-so 5587  df-fr 5629  df-we 5631  df-xp 5680  df-rel 5681  df-cnv 5682  df-co 5683  df-dm 5684  df-rn 5685  df-res 5686  df-ima 5687  df-pred 6296  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6491  df-fun 6541  df-fn 6542  df-f 6543  df-f1 6544  df-fo 6545  df-f1o 6546  df-fv 6547  df-riota 7359  df-ov 7406  df-oprab 7407  df-mpo 7408  df-om 7850  df-1st 7969  df-2nd 7970  df-frecs 8260  df-wrecs 8291  df-recs 8365  df-rdg 8404  df-er 8698  df-map 8817  df-en 8935  df-dom 8936  df-sdom 8937  df-sup 9432  df-inf 9433  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11441  df-neg 11442  df-div 11867  df-nn 12208  df-2 12270  df-3 12271  df-n0 12468  df-z 12554  df-uz 12818  df-q 12928  df-rp 12970  df-xneg 13087  df-xadd 13088  df-xmul 13089  df-ioo 13323  df-icc 13326  df-fl 13752  df-seq 13962  df-exp 14023  df-cj 15041  df-re 15042  df-im 15043  df-sqrt 15177  df-abs 15178  df-topgen 17384  df-psmet 20920  df-xmet 20921  df-met 20922  df-bl 20923  df-mopn 20924  df-top 22377  df-topon 22394  df-bases 22430
This theorem is referenced by:  mblfinlem1  36462  mblfinlem2  36463
  Copyright terms: Public domain W3C validator