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 37626
Description: Lemma for ismblfin 37631; could also be used to shorten proof of opnmbllem 25552. (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 6875 . . . . . . . 8 (𝑧 = 𝑤 → ([,]‘𝑧) = ([,]‘𝑤))
21sseq1d 3990 . . . . . . 7 (𝑧 = 𝑤 → (([,]‘𝑧) ⊆ 𝐴 ↔ ([,]‘𝑤) ⊆ 𝐴))
32elrab 3671 . . . . . 6 (𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ↔ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴))
4 simprr 772 . . . . . . 7 ((𝐴 ∈ (topGen‘ran (,)) ∧ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴)) → ([,]‘𝑤) ⊆ 𝐴)
5 fvex 6888 . . . . . . . 8 ([,]‘𝑤) ∈ V
65elpw 4579 . . . . . . 7 (([,]‘𝑤) ∈ 𝒫 𝐴 ↔ ([,]‘𝑤) ⊆ 𝐴)
74, 6sylibr 234 . . . . . 6 ((𝐴 ∈ (topGen‘ran (,)) ∧ (𝑤 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∧ ([,]‘𝑤) ⊆ 𝐴)) → ([,]‘𝑤) ∈ 𝒫 𝐴)
83, 7sylan2b 594 . . . . 5 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) → ([,]‘𝑤) ∈ 𝒫 𝐴)
98ralrimiva 3132 . . . 4 (𝐴 ∈ (topGen‘ran (,)) → ∀𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ([,]‘𝑤) ∈ 𝒫 𝐴)
10 iccf 13463 . . . . . 6 [,]:(ℝ* × ℝ*)⟶𝒫 ℝ*
11 ffun 6708 . . . . . 6 ([,]:(ℝ* × ℝ*)⟶𝒫 ℝ* → Fun [,])
1210, 11ax-mp 5 . . . . 5 Fun [,]
13 ssrab2 4055 . . . . . . 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 4857 . . . . . . . . . . 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 4857 . . . . . . . . . . 11 (𝑦 = 𝑠 → ⟨(𝑟 / (2↑𝑦)), ((𝑟 + 1) / (2↑𝑦))⟩ = ⟨(𝑟 / (2↑𝑠)), ((𝑟 + 1) / (2↑𝑠))⟩)
2217, 21cbvmpov 7500 . . . . . . . . . 10 (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) = (𝑟 ∈ ℤ, 𝑠 ∈ ℕ0 ↦ ⟨(𝑟 / (2↑𝑠)), ((𝑟 + 1) / (2↑𝑠))⟩)
2322dyadf 25542 . . . . . . . . 9 (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩):(ℤ × ℕ0)⟶( ≤ ∩ (ℝ × ℝ))
24 frn 6712 . . . . . . . . 9 ((𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩):(ℤ × ℕ0)⟶( ≤ ∩ (ℝ × ℝ)) → ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ ( ≤ ∩ (ℝ × ℝ)))
2523, 24ax-mp 5 . . . . . . . 8 ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ ( ≤ ∩ (ℝ × ℝ))
26 inss2 4213 . . . . . . . . 9 ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ × ℝ)
27 rexpssxrxp 11278 . . . . . . . . 9 (ℝ × ℝ) ⊆ (ℝ* × ℝ*)
2826, 27sstri 3968 . . . . . . . 8 ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ* × ℝ*)
2925, 28sstri 3968 . . . . . . 7 ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ⊆ (ℝ* × ℝ*)
3013, 29sstri 3968 . . . . . 6 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ (ℝ* × ℝ*)
3110fdmi 6716 . . . . . 6 dom [,] = (ℝ* × ℝ*)
3230, 31sseqtrri 4008 . . . . 5 {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ dom [,]
33 funimass4 6942 . . . . 5 ((Fun [,] ∧ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ⊆ dom [,]) → (([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴 ↔ ∀𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ([,]‘𝑤) ∈ 𝒫 𝐴))
3412, 32, 33mp2an 692 . . . 4 (([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴 ↔ ∀𝑤 ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴} ([,]‘𝑤) ∈ 𝒫 𝐴)
359, 34sylibr 234 . . 3 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴)
36 sspwuni 5076 . . 3 (([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝒫 𝐴 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝐴)
3735, 36sylib 218 . 2 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) ⊆ 𝐴)
38 eqid 2735 . . . . 5 ((abs ∘ − ) ↾ (ℝ × ℝ)) = ((abs ∘ − ) ↾ (ℝ × ℝ))
3938rexmet 24728 . . . 4 ((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ)
40 eqid 2735 . . . . . 6 (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ))) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
4138, 40tgioo 24733 . . . . 5 (topGen‘ran (,)) = (MetOpen‘((abs ∘ − ) ↾ (ℝ × ℝ)))
4241mopni2 24430 . . . 4 ((((abs ∘ − ) ↾ (ℝ × ℝ)) ∈ (∞Met‘ℝ) ∧ 𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → ∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴)
4339, 42mp3an1 1450 . . 3 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → ∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴)
44 elssuni 4913 . . . . . . . . 9 (𝐴 ∈ (topGen‘ran (,)) → 𝐴 (topGen‘ran (,)))
45 uniretop 24699 . . . . . . . . 9 ℝ = (topGen‘ran (,))
4644, 45sseqtrrdi 4000 . . . . . . . 8 (𝐴 ∈ (topGen‘ran (,)) → 𝐴 ⊆ ℝ)
4746sselda 3958 . . . . . . 7 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → 𝑤 ∈ ℝ)
48 rpre 13015 . . . . . . 7 (𝑟 ∈ ℝ+𝑟 ∈ ℝ)
4938bl2ioo 24729 . . . . . . 7 ((𝑤 ∈ ℝ ∧ 𝑟 ∈ ℝ) → (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) = ((𝑤𝑟)(,)(𝑤 + 𝑟)))
5047, 48, 49syl2an 596 . . . . . 6 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) = ((𝑤𝑟)(,)(𝑤 + 𝑟)))
5150sseq1d 3990 . . . . 5 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ 𝑟 ∈ ℝ+) → ((𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴 ↔ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴))
52 2re 12312 . . . . . . . . 9 2 ∈ ℝ
53 1lt2 12409 . . . . . . . . 9 1 < 2
54 expnlbnd 14249 . . . . . . . . 9 ((𝑟 ∈ ℝ+ ∧ 2 ∈ ℝ ∧ 1 < 2) → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5552, 53, 54mp3an23 1455 . . . . . . . 8 (𝑟 ∈ ℝ+ → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5655ad2antrl 728 . . . . . . 7 (((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) → ∃𝑛 ∈ ℕ (1 / (2↑𝑛)) < 𝑟)
5747ad2antrr 726 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ∈ ℝ)
58 2nn 12311 . . . . . . . . . . . . . . . 16 2 ∈ ℕ
59 nnnn0 12506 . . . . . . . . . . . . . . . . 17 (𝑛 ∈ ℕ → 𝑛 ∈ ℕ0)
6059ad2antrl 728 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑛 ∈ ℕ0)
61 nnexpcl 14090 . . . . . . . . . . . . . . . 16 ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (2↑𝑛) ∈ ℕ)
6258, 60, 61sylancr 587 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℕ)
6362nnred 12253 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℝ)
6457, 63remulcld 11263 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 · (2↑𝑛)) ∈ ℝ)
65 fllelt 13812 . . . . . . . . . . . . 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 13811 . . . . . . . . . . . . 13 ((𝑤 · (2↑𝑛)) ∈ ℝ → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ)
6964, 68syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ)
7062nngt0d 12287 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 0 < (2↑𝑛))
71 ledivmul2 12119 . . . . . . . . . . . 12 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ ∧ 𝑤 ∈ ℝ ∧ ((2↑𝑛) ∈ ℝ ∧ 0 < (2↑𝑛))) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤 ↔ (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛))))
7269, 57, 63, 70, 71syl112anc 1376 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤 ↔ (⌊‘(𝑤 · (2↑𝑛))) ≤ (𝑤 · (2↑𝑛))))
7367, 72mpbird 257 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤)
74 peano2re 11406 . . . . . . . . . . . . 13 ((⌊‘(𝑤 · (2↑𝑛))) ∈ ℝ → ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ)
7569, 74syl 17 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ)
7675, 62nndivred 12292 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ∈ ℝ)
7766simprd 495 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1))
78 ltmuldiv 12113 . . . . . . . . . . . . 13 ((𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) + 1) ∈ ℝ ∧ ((2↑𝑛) ∈ ℝ ∧ 0 < (2↑𝑛))) → ((𝑤 · (2↑𝑛)) < ((⌊‘(𝑤 · (2↑𝑛))) + 1) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))))
7957, 75, 63, 70, 78syl112anc 1376 . . . . . . . . . . . 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 11381 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))
8269, 62nndivred 12292 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ∈ ℝ)
83 elicc2 13426 . . . . . . . . . . 11 ((((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ∈ ℝ ∧ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ∈ ℝ) → (𝑤 ∈ (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛))[,](((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))) ↔ (𝑤 ∈ ℝ ∧ ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ≤ 𝑤𝑤 ≤ (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)))))
8482, 76, 83syl2anc 584 . . . . . . . . . 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 13813 . . . . . . . . . . . 12 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ)
8722dyadval 25543 . . . . . . . . . . . 12 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) = ⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
8886, 60, 87syl2anc 584 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) = ⟨((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)), (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛))⟩)
8988fveq2d 6879 . . . . . . . . . 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 2788 . . . . . . . . 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 6705 . . . . . . . . . . . . 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 7580 . . . . . . . . . . . 12 (((𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) Fn (ℤ × ℕ0) ∧ (⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
9694, 95mp3an1 1450 . . . . . . . . . . 11 (((⌊‘(𝑤 · (2↑𝑛))) ∈ ℤ ∧ 𝑛 ∈ ℕ0) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
9786, 60, 96syl2anc 584 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩))
98 simplrl 776 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑟 ∈ ℝ+)
9998rpred 13049 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑟 ∈ ℝ)
10057, 99resubcld 11663 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) ∈ ℝ)
101100rexrd 11283 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) ∈ ℝ*)
10257, 99readdcld 11262 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + 𝑟) ∈ ℝ)
103102rexrd 11283 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + 𝑟) ∈ ℝ*)
10482, 99readdcld 11262 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟) ∈ ℝ)
10569recnd 11261 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (⌊‘(𝑤 · (2↑𝑛))) ∈ ℂ)
106 1cnd 11228 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 1 ∈ ℂ)
10763recnd 11261 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ∈ ℂ)
10862nnne0d 12288 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (2↑𝑛) ≠ 0)
109105, 106, 107, 108divdird 12053 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) = (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))))
11062nnrecred 12289 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (1 / (2↑𝑛)) ∈ ℝ)
111 simprr 772 . . . . . . . . . . . . . . . . 17 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (1 / (2↑𝑛)) < 𝑟)
112110, 99, 82, 111ltadd2dd 11392 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))) < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
113109, 112eqbrtrd 5141 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
11457, 76, 104, 80, 113lttrd 11394 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟))
11557, 99, 82ltsubaddd 11831 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤𝑟) < ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) ↔ 𝑤 < (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + 𝑟)))
116114, 115mpbird 257 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤𝑟) < ((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)))
11757, 110readdcld 11262 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + (1 / (2↑𝑛))) ∈ ℝ)
11882, 57, 110, 73leadd1dd 11849 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) / (2↑𝑛)) + (1 / (2↑𝑛))) ≤ (𝑤 + (1 / (2↑𝑛))))
119109, 118eqbrtrd 5141 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) ≤ (𝑤 + (1 / (2↑𝑛))))
120110, 99, 57, 111ltadd2dd 11392 . . . . . . . . . . . . . 14 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (𝑤 + (1 / (2↑𝑛))) < (𝑤 + 𝑟))
12176, 117, 102, 119, 120lelttrd 11391 . . . . . . . . . . . . 13 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → (((⌊‘(𝑤 · (2↑𝑛))) + 1) / (2↑𝑛)) < (𝑤 + 𝑟))
122 iccssioo 13430 . . . . . . . . . . . . 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 3993 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ ((𝑤𝑟)(,)(𝑤 + 𝑟)))
125 simplrr 777 . . . . . . . . . . 11 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)
126124, 125sstrd 3969 . . . . . . . . . 10 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ 𝐴)
127 fveq2 6875 . . . . . . . . . . . 12 (𝑧 = ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) → ([,]‘𝑧) = ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)))
128127sseq1d 3990 . . . . . . . . . . 11 (𝑧 = ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) → (([,]‘𝑧) ⊆ 𝐴 ↔ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ⊆ 𝐴))
129128elrab 3671 . . . . . . . . . 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 583 . . . . . . . . 9 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → ((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛) ∈ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})
131 funfvima2 7222 . . . . . . . . . 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 692 . . . . . . . . 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 4888 . . . . . . . 8 ((𝑤 ∈ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∧ ([,]‘((⌊‘(𝑤 · (2↑𝑛)))(𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)𝑛)) ∈ ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
13592, 133, 134syl2anc 584 . . . . . . 7 ((((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) ∧ (𝑟 ∈ ℝ+ ∧ ((𝑤𝑟)(,)(𝑤 + 𝑟)) ⊆ 𝐴)) ∧ (𝑛 ∈ ℕ ∧ (1 / (2↑𝑛)) < 𝑟)) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
13656, 135rexlimddv 3147 . . . . . 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 3141 . . 3 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → (∃𝑟 ∈ ℝ+ (𝑤(ball‘((abs ∘ − ) ↾ (ℝ × ℝ)))𝑟) ⊆ 𝐴𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴})))
14043, 139mpd 15 . 2 ((𝐴 ∈ (topGen‘ran (,)) ∧ 𝑤𝐴) → 𝑤 ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}))
14137, 140eqelssd 3980 1 (𝐴 ∈ (topGen‘ran (,)) → ([,] “ {𝑧 ∈ ran (𝑥 ∈ ℤ, 𝑦 ∈ ℕ0 ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩) ∣ ([,]‘𝑧) ⊆ 𝐴}) = 𝐴)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wcel 2108  wral 3051  wrex 3060  {crab 3415  cin 3925  wss 3926  𝒫 cpw 4575  cop 4607   cuni 4883   class class class wbr 5119   × cxp 5652  dom cdm 5654  ran crn 5655  cres 5656  cima 5657  ccom 5658  Fun wfun 6524   Fn wfn 6525  wf 6526  cfv 6530  (class class class)co 7403  cmpo 7405  cr 11126  0cc0 11127  1c1 11128   + caddc 11130   · cmul 11132  *cxr 11266   < clt 11267  cle 11268  cmin 11464   / cdiv 11892  cn 12238  2c2 12293  0cn0 12499  cz 12586  +crp 13006  (,)cioo 13360  [,]cicc 13363  cfl 13805  cexp 14077  abscabs 15251  topGenctg 17449  ∞Metcxmet 21298  ballcbl 21300  MetOpencmopn 21303
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 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7727  ax-cnex 11183  ax-resscn 11184  ax-1cn 11185  ax-icn 11186  ax-addcl 11187  ax-addrcl 11188  ax-mulcl 11189  ax-mulrcl 11190  ax-mulcom 11191  ax-addass 11192  ax-mulass 11193  ax-distr 11194  ax-i2m1 11195  ax-1ne0 11196  ax-1rid 11197  ax-rnegex 11198  ax-rrecex 11199  ax-cnre 11200  ax-pre-lttri 11201  ax-pre-lttrn 11202  ax-pre-ltadd 11203  ax-pre-mulgt0 11204  ax-pre-sup 11205
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 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-iun 4969  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6483  df-fun 6532  df-fn 6533  df-f 6534  df-f1 6535  df-fo 6536  df-f1o 6537  df-fv 6538  df-riota 7360  df-ov 7406  df-oprab 7407  df-mpo 7408  df-om 7860  df-1st 7986  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8383  df-rdg 8422  df-er 8717  df-map 8840  df-en 8958  df-dom 8959  df-sdom 8960  df-sup 9452  df-inf 9453  df-pnf 11269  df-mnf 11270  df-xr 11271  df-ltxr 11272  df-le 11273  df-sub 11466  df-neg 11467  df-div 11893  df-nn 12239  df-2 12301  df-3 12302  df-n0 12500  df-z 12587  df-uz 12851  df-q 12963  df-rp 13007  df-xneg 13126  df-xadd 13127  df-xmul 13128  df-ioo 13364  df-icc 13367  df-fl 13807  df-seq 14018  df-exp 14078  df-cj 15116  df-re 15117  df-im 15118  df-sqrt 15252  df-abs 15253  df-topgen 17455  df-psmet 21305  df-xmet 21306  df-met 21307  df-bl 21308  df-mopn 21309  df-top 22830  df-topon 22847  df-bases 22882
This theorem is referenced by:  mblfinlem1  37627  mblfinlem2  37628
  Copyright terms: Public domain W3C validator