Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  hoiqssbllem3 Structured version   Visualization version   GIF version

Theorem hoiqssbllem3 47136
Description: A n-dimensional ball contains a nonempty half-open interval with vertices with rational components. (Contributed by Glauco Siliprandi, 24-Dec-2020.)
Hypotheses
Ref Expression
hoiqssbllem3.x (𝜑𝑋 ∈ Fin)
hoiqssbllem3.n (𝜑𝑋 ≠ ∅)
hoiqssbllem3.y (𝜑𝑌 ∈ (ℝ ↑m 𝑋))
hoiqssbllem3.e (𝜑𝐸 ∈ ℝ+)
Assertion
Ref Expression
hoiqssbllem3 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸)))
Distinct variable groups:   𝐸,𝑐,𝑑,𝑖   𝑋,𝑐,𝑑,𝑖   𝑌,𝑐,𝑑,𝑖   𝜑,𝑐,𝑑,𝑖

Proof of Theorem hoiqssbllem3
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 hoiqssbllem3.x . . . . . . 7 (𝜑𝑋 ∈ Fin)
2 qex 12948 . . . . . . . . 9 ℚ ∈ V
32inex1 5263 . . . . . . . 8 (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∈ V
43a1i 11 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∈ V)
5 hoiqssbllem3.y . . . . . . . . . . . . 13 (𝜑𝑌 ∈ (ℝ ↑m 𝑋))
6 elmapi 8815 . . . . . . . . . . . . 13 (𝑌 ∈ (ℝ ↑m 𝑋) → 𝑌:𝑋⟶ℝ)
75, 6syl 17 . . . . . . . . . . . 12 (𝜑𝑌:𝑋⟶ℝ)
87ffvelcdmda 7050 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → (𝑌𝑖) ∈ ℝ)
9 hoiqssbllem3.e . . . . . . . . . . . . 13 (𝜑𝐸 ∈ ℝ+)
10 2rp 12984 . . . . . . . . . . . . . . 15 2 ∈ ℝ+
1110a1i 11 . . . . . . . . . . . . . 14 (𝜑 → 2 ∈ ℝ+)
12 hoiqssbllem3.n . . . . . . . . . . . . . . . . 17 (𝜑𝑋 ≠ ∅)
13 hashnncl 14365 . . . . . . . . . . . . . . . . . 18 (𝑋 ∈ Fin → ((♯‘𝑋) ∈ ℕ ↔ 𝑋 ≠ ∅))
141, 13syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → ((♯‘𝑋) ∈ ℕ ↔ 𝑋 ≠ ∅))
1512, 14mpbird 259 . . . . . . . . . . . . . . . 16 (𝜑 → (♯‘𝑋) ∈ ℕ)
16 nnrp 12991 . . . . . . . . . . . . . . . 16 ((♯‘𝑋) ∈ ℕ → (♯‘𝑋) ∈ ℝ+)
1715, 16syl 17 . . . . . . . . . . . . . . 15 (𝜑 → (♯‘𝑋) ∈ ℝ+)
1817rpsqrtcld 15411 . . . . . . . . . . . . . 14 (𝜑 → (√‘(♯‘𝑋)) ∈ ℝ+)
1911, 18rpmulcld 13039 . . . . . . . . . . . . 13 (𝜑 → (2 · (√‘(♯‘𝑋))) ∈ ℝ+)
209, 19rpdivcld 13040 . . . . . . . . . . . 12 (𝜑 → (𝐸 / (2 · (√‘(♯‘𝑋)))) ∈ ℝ+)
2120adantr 483 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → (𝐸 / (2 · (√‘(♯‘𝑋)))) ∈ ℝ+)
228, 21ltsubrpd 13055 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) < (𝑌𝑖))
2321rpred 13023 . . . . . . . . . . . 12 ((𝜑𝑖𝑋) → (𝐸 / (2 · (√‘(♯‘𝑋)))) ∈ ℝ)
248, 23resubcld 11601 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ)
2524, 8ltnled 11316 . . . . . . . . . 10 ((𝜑𝑖𝑋) → (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) < (𝑌𝑖) ↔ ¬ (𝑌𝑖) ≤ ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))))
2622, 25mpbid 234 . . . . . . . . 9 ((𝜑𝑖𝑋) → ¬ (𝑌𝑖) ≤ ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))))
2724rexrd 11218 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ*)
288rexrd 11218 . . . . . . . . . 10 ((𝜑𝑖𝑋) → (𝑌𝑖) ∈ ℝ*)
2927, 28qinioo 46049 . . . . . . . . 9 ((𝜑𝑖𝑋) → ((ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) = ∅ ↔ (𝑌𝑖) ≤ ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))))
3026, 29mtbird 327 . . . . . . . 8 ((𝜑𝑖𝑋) → ¬ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) = ∅)
3130neqned 2954 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ≠ ∅)
321, 4, 31choicefi 45715 . . . . . 6 (𝜑 → ∃𝑐(𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
33 simpl 485 . . . . . . . . . . . . 13 ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → 𝑐 Fn 𝑋)
34 nfra1 3276 . . . . . . . . . . . . . . 15 𝑖𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
35 rspa 3241 . . . . . . . . . . . . . . . . 17 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))
36 elinel1 4144 . . . . . . . . . . . . . . . . 17 ((𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → (𝑐𝑖) ∈ ℚ)
3735, 36syl 17 . . . . . . . . . . . . . . . 16 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ ℚ)
3837ex 415 . . . . . . . . . . . . . . 15 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → (𝑖𝑋 → (𝑐𝑖) ∈ ℚ))
3934, 38ralrimi 3250 . . . . . . . . . . . . . 14 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ)
4039adantl 484 . . . . . . . . . . . . 13 ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ)
4133, 40jca 518 . . . . . . . . . . . 12 ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ))
4241adantl 484 . . . . . . . . . . 11 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ))
43 ffnfv 7085 . . . . . . . . . . 11 (𝑐:𝑋⟶ℚ ↔ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ ℚ))
4442, 43sylibr 236 . . . . . . . . . 10 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → 𝑐:𝑋⟶ℚ)
452a1i 11 . . . . . . . . . . . 12 (𝜑 → ℚ ∈ V)
46 elmapg 8805 . . . . . . . . . . . 12 ((ℚ ∈ V ∧ 𝑋 ∈ Fin) → (𝑐 ∈ (ℚ ↑m 𝑋) ↔ 𝑐:𝑋⟶ℚ))
4745, 1, 46syl2anc 592 . . . . . . . . . . 11 (𝜑 → (𝑐 ∈ (ℚ ↑m 𝑋) ↔ 𝑐:𝑋⟶ℚ))
4847adantr 483 . . . . . . . . . 10 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → (𝑐 ∈ (ℚ ↑m 𝑋) ↔ 𝑐:𝑋⟶ℚ))
4944, 48mpbird 259 . . . . . . . . 9 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → 𝑐 ∈ (ℚ ↑m 𝑋))
50 simprr 780 . . . . . . . . 9 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))
5149, 50jca 518 . . . . . . . 8 ((𝜑 ∧ (𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))) → (𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
5251ex 415 . . . . . . 7 (𝜑 → ((𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → (𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))))
5352eximdv 1927 . . . . . 6 (𝜑 → (∃𝑐(𝑐 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))) → ∃𝑐(𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))))
5432, 53mpd 15 . . . . 5 (𝜑 → ∃𝑐(𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
55 df-rex 3077 . . . . 5 (∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ↔ ∃𝑐(𝑐 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))))
5654, 55sylibr 236 . . . 4 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))))
572inex1 5263 . . . . . . . 8 (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∈ V
5857a1i 11 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∈ V)
598, 21ltaddrpd 13056 . . . . . . . . . 10 ((𝜑𝑖𝑋) → (𝑌𝑖) < ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))
608, 23readdcld 11197 . . . . . . . . . . 11 ((𝜑𝑖𝑋) → ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ)
618, 60ltnled 11316 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) < ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ↔ ¬ ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ≤ (𝑌𝑖)))
6259, 61mpbid 234 . . . . . . . . 9 ((𝜑𝑖𝑋) → ¬ ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ≤ (𝑌𝑖))
6360rexrd 11218 . . . . . . . . . 10 ((𝜑𝑖𝑋) → ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ∈ ℝ*)
6428, 63qinioo 46049 . . . . . . . . 9 ((𝜑𝑖𝑋) → ((ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) = ∅ ↔ ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) ≤ (𝑌𝑖)))
6562, 64mtbird 327 . . . . . . . 8 ((𝜑𝑖𝑋) → ¬ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) = ∅)
6665neqned 2954 . . . . . . 7 ((𝜑𝑖𝑋) → (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ≠ ∅)
671, 58, 66choicefi 45715 . . . . . 6 (𝜑 → ∃𝑑(𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
68 simpl 485 . . . . . . . . . . . . 13 ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → 𝑑 Fn 𝑋)
69 nfra1 3276 . . . . . . . . . . . . . . 15 𝑖𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
70 rspa 3241 . . . . . . . . . . . . . . . . 17 ((∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
71 elinel1 4144 . . . . . . . . . . . . . . . . 17 ((𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → (𝑑𝑖) ∈ ℚ)
7270, 71syl 17 . . . . . . . . . . . . . . . 16 ((∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ℚ)
7372ex 415 . . . . . . . . . . . . . . 15 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → (𝑖𝑋 → (𝑑𝑖) ∈ ℚ))
7469, 73ralrimi 3250 . . . . . . . . . . . . . 14 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ)
7574adantl 484 . . . . . . . . . . . . 13 ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ)
7668, 75jca 518 . . . . . . . . . . . 12 ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ))
7776adantl 484 . . . . . . . . . . 11 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ))
78 ffnfv 7085 . . . . . . . . . . 11 (𝑑:𝑋⟶ℚ ↔ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ ℚ))
7977, 78sylibr 236 . . . . . . . . . 10 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑:𝑋⟶ℚ)
80 elmapg 8805 . . . . . . . . . . . 12 ((ℚ ∈ V ∧ 𝑋 ∈ Fin) → (𝑑 ∈ (ℚ ↑m 𝑋) ↔ 𝑑:𝑋⟶ℚ))
8145, 1, 80syl2anc 592 . . . . . . . . . . 11 (𝜑 → (𝑑 ∈ (ℚ ↑m 𝑋) ↔ 𝑑:𝑋⟶ℚ))
8281adantr 483 . . . . . . . . . 10 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑑 ∈ (ℚ ↑m 𝑋) ↔ 𝑑:𝑋⟶ℚ))
8379, 82mpbird 259 . . . . . . . . 9 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑 ∈ (ℚ ↑m 𝑋))
84 simprr 780 . . . . . . . . 9 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
8583, 84jca 518 . . . . . . . 8 ((𝜑 ∧ (𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
8685ex 415 . . . . . . 7 (𝜑 → ((𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))))
8786eximdv 1927 . . . . . 6 (𝜑 → (∃𝑑(𝑑 Fn 𝑋 ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∃𝑑(𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))))
8867, 87mpd 15 . . . . 5 (𝜑 → ∃𝑑(𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
89 df-rex 3077 . . . . 5 (∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ↔ ∃𝑑(𝑑 ∈ (ℚ ↑m 𝑋) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
9088, 89sylibr 236 . . . 4 (𝜑 → ∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
9156, 90jca 518 . . 3 (𝜑 → (∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
92 reeanv 3224 . . 3 (∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ↔ (∃𝑐 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∃𝑑 ∈ (ℚ ↑m 𝑋)∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
9391, 92sylibr 236 . 2 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
94 nfv 1924 . . . . . . . 8 𝑖((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋))
9534, 69nfan 1909 . . . . . . . 8 𝑖(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
9694, 95nfan 1909 . . . . . . 7 𝑖(((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
971ad3antrrr 738 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ∈ Fin)
9812ad3antrrr 738 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ≠ ∅)
995ad3antrrr 738 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑌 ∈ (ℝ ↑m 𝑋))
100 elmapi 8815 . . . . . . . . . 10 (𝑐 ∈ (ℚ ↑m 𝑋) → 𝑐:𝑋⟶ℚ)
101 qssre 12946 . . . . . . . . . . 11 ℚ ⊆ ℝ
102101a1i 11 . . . . . . . . . 10 (𝑐 ∈ (ℚ ↑m 𝑋) → ℚ ⊆ ℝ)
103100, 102fssd 6694 . . . . . . . . 9 (𝑐 ∈ (ℚ ↑m 𝑋) → 𝑐:𝑋⟶ℝ)
104103adantl 484 . . . . . . . 8 ((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) → 𝑐:𝑋⟶ℝ)
105104ad2antrr 734 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑐:𝑋⟶ℝ)
106 elmapi 8815 . . . . . . . . 9 (𝑑 ∈ (ℚ ↑m 𝑋) → 𝑑:𝑋⟶ℚ)
107101a1i 11 . . . . . . . . 9 (𝑑 ∈ (ℚ ↑m 𝑋) → ℚ ⊆ ℝ)
108106, 107fssd 6694 . . . . . . . 8 (𝑑 ∈ (ℚ ↑m 𝑋) → 𝑑:𝑋⟶ℝ)
109108ad2antlr 735 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑:𝑋⟶ℝ)
1109ad3antrrr 738 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝐸 ∈ ℝ+)
11135elin2d 4148 . . . . . . . . 9 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
112111adantlr 723 . . . . . . . 8 (((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
113112adantll 722 . . . . . . 7 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
11470elin2d 4148 . . . . . . . . 9 ((∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
115114adantll 722 . . . . . . . 8 (((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
116115adantll 722 . . . . . . 7 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
11796, 97, 98, 99, 105, 109, 110, 113, 116hoiqssbllem1 47134 . . . . . 6 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)))
118 simpl 485 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → ((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)))
119 fveq2 6852 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (𝑐𝑖) = (𝑐𝑘))
120 fveq2 6852 . . . . . . . . . . . . . . . 16 (𝑖 = 𝑘 → (𝑌𝑖) = (𝑌𝑘))
121120oveq1d 7396 . . . . . . . . . . . . . . 15 (𝑖 = 𝑘 → ((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋))))) = ((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋))))))
122121, 120oveq12d 7399 . . . . . . . . . . . . . 14 (𝑖 = 𝑘 → (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)) = (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘)))
123122ineq2d 4163 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) = (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
124119, 123eleq12d 2846 . . . . . . . . . . . 12 (𝑖 = 𝑘 → ((𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ↔ (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘)))))
125124cbvralvw 3230 . . . . . . . . . . 11 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ↔ ∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
126125biimpi 218 . . . . . . . . . 10 (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) → ∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
127126adantr 483 . . . . . . . . 9 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))))
128 fveq2 6852 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (𝑑𝑖) = (𝑑𝑘))
129120oveq1d 7396 . . . . . . . . . . . . . . 15 (𝑖 = 𝑘 → ((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))) = ((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))
130120, 129oveq12d 7399 . . . . . . . . . . . . . 14 (𝑖 = 𝑘 → ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))) = ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
131130ineq2d 4163 . . . . . . . . . . . . 13 (𝑖 = 𝑘 → (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) = (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
132128, 131eleq12d 2846 . . . . . . . . . . . 12 (𝑖 = 𝑘 → ((𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ↔ (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
133132cbvralvw 3230 . . . . . . . . . . 11 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ↔ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
134133biimpi 218 . . . . . . . . . 10 (∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) → ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
135134adantl 484 . . . . . . . . 9 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))
136127, 135jca 518 . . . . . . . 8 ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
137136adantl 484 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
138 nfv 1924 . . . . . . . 8 𝑖(((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))))
1391ad3antrrr 738 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ∈ Fin)
14012ad3antrrr 738 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑋 ≠ ∅)
1415ad3antrrr 738 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑌 ∈ (ℝ ↑m 𝑋))
142104ad2antrr 734 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑐:𝑋⟶ℝ)
143108ad2antlr 735 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝑑:𝑋⟶ℝ)
1449ad3antrrr 738 . . . . . . . 8 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → 𝐸 ∈ ℝ+)
145125, 111sylanbr 590 . . . . . . . . . 10 ((∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
146145adantlr 723 . . . . . . . . 9 (((∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
147146adantll 722 . . . . . . . 8 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑐𝑖) ∈ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖)))
148133, 114sylanbr 590 . . . . . . . . . 10 ((∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
149148adantll 722 . . . . . . . . 9 (((∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
150149adantll 722 . . . . . . . 8 (((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) ∧ 𝑖𝑋) → (𝑑𝑖) ∈ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))
151138, 139, 140, 141, 142, 143, 144, 147, 150hoiqssbllem2 47135 . . . . . . 7 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑘𝑋 (𝑐𝑘) ∈ (ℚ ∩ (((𝑌𝑘) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑘))) ∧ ∀𝑘𝑋 (𝑑𝑘) ∈ (ℚ ∩ ((𝑌𝑘)(,)((𝑌𝑘) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))
152118, 137, 151syl2anc 592 . . . . . 6 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))
153117, 152jca 518 . . . . 5 ((((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) ∧ (∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋))))))))) → (𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸)))
154153ex 415 . . . 4 (((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) ∧ 𝑑 ∈ (ℚ ↑m 𝑋)) → ((∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → (𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))))
155154reximdva 3165 . . 3 ((𝜑𝑐 ∈ (ℚ ↑m 𝑋)) → (∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))))
156155reximdva 3165 . 2 (𝜑 → (∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(∀𝑖𝑋 (𝑐𝑖) ∈ (ℚ ∩ (((𝑌𝑖) − (𝐸 / (2 · (√‘(♯‘𝑋)))))(,)(𝑌𝑖))) ∧ ∀𝑖𝑋 (𝑑𝑖) ∈ (ℚ ∩ ((𝑌𝑖)(,)((𝑌𝑖) + (𝐸 / (2 · (√‘(♯‘𝑋)))))))) → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸))))
15793, 156mpd 15 1 (𝜑 → ∃𝑐 ∈ (ℚ ↑m 𝑋)∃𝑑 ∈ (ℚ ↑m 𝑋)(𝑌X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ∧ X𝑖𝑋 ((𝑐𝑖)[,)(𝑑𝑖)) ⊆ (𝑌(ball‘(dist‘(ℝ^‘𝑋)))𝐸)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398   = wceq 1550  wex 1789  wcel 2132  wne 2947  wral 3066  wrex 3076  Vcvv 3444  cin 3894  wss 3895  c0 4276   class class class wbr 5090   Fn wfn 6501  wf 6502  cfv 6506  (class class class)co 7381  m cmap 8792  Xcixp 8864  Fincfn 8912  cr 11058   + caddc 11062   · cmul 11064   < clt 11202  cle 11203  cmin 11400   / cdiv 11830  cn 12196  2c2 12258  cq 12935  +crp 12979  (,)cioo 13335  [,)cico 13337  chash 14329  csqrt 15232  distcds 17267  ballcbl 21380  ℝ^crrx 25414
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1805  ax-4 1819  ax-5 1920  ax-6 1977  ax-7 2018  ax-8 2134  ax-9 2142  ax-10 2165  ax-11 2181  ax-12 2202  ax-ext 2724  ax-rep 5217  ax-sep 5236  ax-nul 5246  ax-pow 5312  ax-pr 5380  ax-un 7703  ax-inf2 9582  ax-cnex 11115  ax-resscn 11116  ax-1cn 11117  ax-icn 11118  ax-addcl 11119  ax-addrcl 11120  ax-mulcl 11121  ax-mulrcl 11122  ax-mulcom 11123  ax-addass 11124  ax-mulass 11125  ax-distr 11126  ax-i2m1 11127  ax-1ne0 11128  ax-1rid 11129  ax-rnegex 11130  ax-rrecex 11131  ax-cnre 11132  ax-pre-lttri 11133  ax-pre-lttrn 11134  ax-pre-ltadd 11135  ax-pre-mulgt0 11136  ax-pre-sup 11137  ax-addf 11138  ax-mulf 11139
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3or 1096  df-3an 1097  df-tru 1553  df-fal 1563  df-ex 1790  df-nf 1794  df-sb 2081  df-mo 2556  df-eu 2586  df-clab 2731  df-cleq 2744  df-clel 2827  df-nfc 2901  df-ne 2948  df-nel 3052  df-ral 3067  df-rex 3077  df-rmo 3357  df-reu 3358  df-rab 3405  df-v 3446  df-sbc 3736  df-csb 3844  df-dif 3898  df-un 3900  df-in 3902  df-ss 3912  df-pss 3915  df-nul 4277  df-if 4471  df-pw 4547  df-sn 4573  df-pr 4575  df-tp 4577  df-op 4579  df-uni 4856  df-int 4896  df-iun 4941  df-br 5091  df-opab 5153  df-mpt 5172  df-tr 5198  df-id 5531  df-eprel 5536  df-po 5544  df-so 5545  df-fr 5589  df-se 5590  df-we 5591  df-xp 5642  df-rel 5643  df-cnv 5644  df-co 5645  df-dm 5646  df-rn 5647  df-res 5648  df-ima 5649  df-pred 6273  df-ord 6334  df-on 6335  df-lim 6336  df-suc 6337  df-iota 6462  df-fun 6508  df-fn 6509  df-f 6510  df-f1 6511  df-fo 6512  df-f1o 6513  df-fv 6514  df-isom 6515  df-riota 7338  df-ov 7384  df-oprab 7385  df-mpo 7386  df-of 7645  df-om 7832  df-1st 7955  df-2nd 7956  df-supp 8125  df-tpos 8190  df-frecs 8246  df-wrecs 8277  df-recs 8326  df-rdg 8365  df-1o 8421  df-er 8662  df-map 8794  df-ixp 8865  df-en 8913  df-dom 8914  df-sdom 8915  df-fin 8916  df-fsupp 9294  df-sup 9374  df-inf 9375  df-oi 9444  df-card 9883  df-pnf 11204  df-mnf 11205  df-xr 11206  df-ltxr 11207  df-le 11208  df-sub 11402  df-neg 11403  df-div 11831  df-nn 12197  df-2 12266  df-3 12267  df-4 12268  df-5 12269  df-6 12270  df-7 12271  df-8 12272  df-9 12273  df-n0 12468  df-z 12555  df-dec 12675  df-uz 12826  df-q 12936  df-rp 12980  df-xadd 13101  df-ioo 13339  df-ico 13341  df-fz 13499  df-fzo 13646  df-seq 14001  df-exp 14061  df-hash 14330  df-cj 15098  df-re 15099  df-im 15100  df-sqrt 15234  df-abs 15235  df-clim 15487  df-sum 15686  df-struct 17155  df-sets 17172  df-slot 17190  df-ndx 17202  df-base 17218  df-ress 17239  df-plusg 17271  df-mulr 17272  df-starv 17273  df-sca 17274  df-vsca 17275  df-ip 17276  df-tset 17277  df-ple 17278  df-ds 17280  df-unif 17281  df-hom 17282  df-cco 17283  df-0g 17442  df-gsum 17443  df-prds 17448  df-pws 17450  df-mgm 18646  df-sgrp 18725  df-mnd 18741  df-mhm 18789  df-grp 18950  df-minusg 18951  df-sbg 18952  df-subg 19137  df-ghm 19226  df-cntz 19329  df-cmn 19794  df-abl 19795  df-mgp 20159  df-rng 20171  df-ur 20200  df-ring 20253  df-cring 20254  df-oppr 20354  df-dvdsr 20374  df-unit 20375  df-invr 20405  df-dvr 20418  df-rhm 20489  df-subrng 20564  df-subrg 20588  df-drng 20749  df-field 20750  df-staf 20857  df-srng 20858  df-lmod 20898  df-lss 20968  df-sra 21209  df-rgmod 21210  df-psmet 21385  df-xmet 21386  df-met 21387  df-bl 21388  df-cnfld 21394  df-refld 21626  df-dsmm 21753  df-frlm 21768  df-nm 24611  df-tng 24613  df-tcph 25200  df-rrx 25416
This theorem is referenced by:  hoiqssbl  47137
  Copyright terms: Public domain W3C validator