Users' Mathboxes Mathbox for Jeff Madsen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  rrndstprj2 Structured version   Visualization version   GIF version

Theorem rrndstprj2 37791
Description: Bound on the distance between two points in Euclidean space given bounds on the distances in each coordinate. This theorem and rrndstprj1 37790 can be used to show that the supremum norm and Euclidean norm are equivalent. (Contributed by Jeff Madsen, 2-Sep-2009.) (Revised by Mario Carneiro, 13-Sep-2015.)
Hypotheses
Ref Expression
rrnval.1 𝑋 = (ℝ ↑m 𝐼)
rrndstprj1.1 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
Assertion
Ref Expression
rrndstprj2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) < (𝑅 · (√‘(♯‘𝐼))))
Distinct variable groups:   𝑛,𝐺   𝑛,𝐼   𝑛,𝑀   𝑅,𝑛   𝑛,𝐹
Allowed substitution hint:   𝑋(𝑛)

Proof of Theorem rrndstprj2
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 simpl1 1191 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ∈ (Fin ∖ {∅}))
21eldifad 3988 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ∈ Fin)
3 simpl2 1192 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹𝑋)
4 simpl3 1193 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺𝑋)
5 rrnval.1 . . . 4 𝑋 = (ℝ ↑m 𝐼)
65rrnmval 37788 . . 3 ((𝐼 ∈ Fin ∧ 𝐹𝑋𝐺𝑋) → (𝐹(ℝn𝐼)𝐺) = (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
72, 3, 4, 6syl3anc 1371 . 2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) = (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
8 eldifsni 4815 . . . . . 6 (𝐼 ∈ (Fin ∖ {∅}) → 𝐼 ≠ ∅)
91, 8syl 17 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ≠ ∅)
103, 5eleqtrdi 2854 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹 ∈ (ℝ ↑m 𝐼))
11 elmapi 8907 . . . . . . . . 9 (𝐹 ∈ (ℝ ↑m 𝐼) → 𝐹:𝐼⟶ℝ)
1210, 11syl 17 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹:𝐼⟶ℝ)
1312ffvelcdmda 7118 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝐹𝑘) ∈ ℝ)
144, 5eleqtrdi 2854 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺 ∈ (ℝ ↑m 𝐼))
15 elmapi 8907 . . . . . . . . 9 (𝐺 ∈ (ℝ ↑m 𝐼) → 𝐺:𝐼⟶ℝ)
1614, 15syl 17 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺:𝐼⟶ℝ)
1716ffvelcdmda 7118 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝐺𝑘) ∈ ℝ)
1813, 17resubcld 11718 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ)
1918resqcld 14175 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
20 simprl 770 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℝ+)
2120rpred 13099 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℝ)
2221resqcld 14175 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅↑2) ∈ ℝ)
2322adantr 480 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝑅↑2) ∈ ℝ)
24 absresq 15351 . . . . . . 7 (((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) = (((𝐹𝑘) − (𝐺𝑘))↑2))
2518, 24syl 17 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) = (((𝐹𝑘) − (𝐺𝑘))↑2))
26 rrndstprj1.1 . . . . . . . . . 10 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
2726remetdval 24830 . . . . . . . . 9 (((𝐹𝑘) ∈ ℝ ∧ (𝐺𝑘) ∈ ℝ) → ((𝐹𝑘)𝑀(𝐺𝑘)) = (abs‘((𝐹𝑘) − (𝐺𝑘))))
2813, 17, 27syl2anc 583 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) = (abs‘((𝐹𝑘) − (𝐺𝑘))))
29 simprr 772 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)
30 fveq2 6920 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
31 fveq2 6920 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (𝐺𝑛) = (𝐺𝑘))
3230, 31oveq12d 7466 . . . . . . . . . . 11 (𝑛 = 𝑘 → ((𝐹𝑛)𝑀(𝐺𝑛)) = ((𝐹𝑘)𝑀(𝐺𝑘)))
3332breq1d 5176 . . . . . . . . . 10 (𝑛 = 𝑘 → (((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅 ↔ ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅))
3433rspccva 3634 . . . . . . . . 9 ((∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅)
3529, 34sylan 579 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅)
3628, 35eqbrtrrd 5190 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (abs‘((𝐹𝑘) − (𝐺𝑘))) < 𝑅)
3718recnd 11318 . . . . . . . . 9 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℂ)
3837abscld 15485 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (abs‘((𝐹𝑘) − (𝐺𝑘))) ∈ ℝ)
3921adantr 480 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 𝑅 ∈ ℝ)
4037absge0d 15493 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ (abs‘((𝐹𝑘) − (𝐺𝑘))))
4120rpge0d 13103 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ 𝑅)
4241adantr 480 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ 𝑅)
4338, 39, 40, 42lt2sqd 14305 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘))) < 𝑅 ↔ ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) < (𝑅↑2)))
4436, 43mpbid 232 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) < (𝑅↑2))
4525, 44eqbrtrrd 5190 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) < (𝑅↑2))
462, 9, 19, 23, 45fsumlt 15848 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) < Σ𝑘𝐼 (𝑅↑2))
472, 19fsumrecl 15782 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
4818sqge0d 14187 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ (((𝐹𝑘) − (𝐺𝑘))↑2))
492, 19, 48fsumge0 15843 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
50 resqrtth 15304 . . . . 5 ((Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ ∧ 0 ≤ Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
5147, 49, 50syl2anc 583 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
52 hashnncl 14415 . . . . . . . . . . . 12 (𝐼 ∈ Fin → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
532, 52syl 17 . . . . . . . . . . 11 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
549, 53mpbird 257 . . . . . . . . . 10 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℕ)
5554nnrpd 13097 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℝ+)
5655rpred 13099 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℝ)
5755rpge0d 13103 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (♯‘𝐼))
58 resqrtth 15304 . . . . . . . 8 (((♯‘𝐼) ∈ ℝ ∧ 0 ≤ (♯‘𝐼)) → ((√‘(♯‘𝐼))↑2) = (♯‘𝐼))
5956, 57, 58syl2anc 583 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘(♯‘𝐼))↑2) = (♯‘𝐼))
6059oveq2d 7464 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)) = ((𝑅↑2) · (♯‘𝐼)))
6122recnd 11318 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅↑2) ∈ ℂ)
6255rpcnd 13101 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℂ)
6361, 62mulcomd 11311 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · (♯‘𝐼)) = ((♯‘𝐼) · (𝑅↑2)))
6460, 63eqtrd 2780 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)) = ((♯‘𝐼) · (𝑅↑2)))
6520rpcnd 13101 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℂ)
6655rpsqrtcld 15460 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘(♯‘𝐼)) ∈ ℝ+)
6766rpcnd 13101 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘(♯‘𝐼)) ∈ ℂ)
6865, 67sqmuld 14208 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅 · (√‘(♯‘𝐼)))↑2) = ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)))
69 fsumconst 15838 . . . . . 6 ((𝐼 ∈ Fin ∧ (𝑅↑2) ∈ ℂ) → Σ𝑘𝐼 (𝑅↑2) = ((♯‘𝐼) · (𝑅↑2)))
702, 61, 69syl2anc 583 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (𝑅↑2) = ((♯‘𝐼) · (𝑅↑2)))
7164, 68, 703eqtr4d 2790 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅 · (√‘(♯‘𝐼)))↑2) = Σ𝑘𝐼 (𝑅↑2))
7246, 51, 713brtr4d 5198 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) < ((𝑅 · (√‘(♯‘𝐼)))↑2))
7347, 49resqrtcld 15466 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) ∈ ℝ)
7420, 66rpmulcld 13115 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅 · (√‘(♯‘𝐼))) ∈ ℝ+)
7574rpred 13099 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅 · (√‘(♯‘𝐼))) ∈ ℝ)
7647, 49sqrtge0d 15469 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
7774rpge0d 13103 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (𝑅 · (√‘(♯‘𝐼))))
7873, 75, 76, 77lt2sqd 14305 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) < (𝑅 · (√‘(♯‘𝐼))) ↔ ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) < ((𝑅 · (√‘(♯‘𝐼)))↑2)))
7972, 78mpbird 257 . 2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) < (𝑅 · (√‘(♯‘𝐼))))
807, 79eqbrtrd 5188 1 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) < (𝑅 · (√‘(♯‘𝐼))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1537  wcel 2108  wne 2946  wral 3067  cdif 3973  c0 4352  {csn 4648   class class class wbr 5166   × cxp 5698  cres 5702  ccom 5704  wf 6569  cfv 6573  (class class class)co 7448  m cmap 8884  Fincfn 9003  cc 11182  cr 11183  0cc0 11184   · cmul 11189   < clt 11324  cle 11325  cmin 11520  cn 12293  2c2 12348  +crp 13057  cexp 14112  chash 14379  csqrt 15282  abscabs 15283  Σcsu 15734  ncrrn 37785
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-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-inf2 9710  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-int 4971  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-se 5653  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-isom 6582  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-1o 8522  df-er 8763  df-map 8886  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007  df-sup 9511  df-oi 9579  df-card 10008  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-rp 13058  df-ico 13413  df-fz 13568  df-fzo 13712  df-seq 14053  df-exp 14113  df-hash 14380  df-cj 15148  df-re 15149  df-im 15150  df-sqrt 15284  df-abs 15285  df-clim 15534  df-sum 15735  df-rrn 37786
This theorem is referenced by:  rrncmslem  37792  rrnequiv  37795
  Copyright terms: Public domain W3C validator