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 37832
Description: Bound on the distance between two points in Euclidean space given bounds on the distances in each coordinate. This theorem and rrndstprj1 37831 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 1192 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ∈ (Fin ∖ {∅}))
21eldifad 3929 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ∈ Fin)
3 simpl2 1193 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹𝑋)
4 simpl3 1194 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺𝑋)
5 rrnval.1 . . . 4 𝑋 = (ℝ ↑m 𝐼)
65rrnmval 37829 . . 3 ((𝐼 ∈ Fin ∧ 𝐹𝑋𝐺𝑋) → (𝐹(ℝn𝐼)𝐺) = (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
72, 3, 4, 6syl3anc 1373 . 2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) = (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
8 eldifsni 4757 . . . . . 6 (𝐼 ∈ (Fin ∖ {∅}) → 𝐼 ≠ ∅)
91, 8syl 17 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐼 ≠ ∅)
103, 5eleqtrdi 2839 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹 ∈ (ℝ ↑m 𝐼))
11 elmapi 8825 . . . . . . . . 9 (𝐹 ∈ (ℝ ↑m 𝐼) → 𝐹:𝐼⟶ℝ)
1210, 11syl 17 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐹:𝐼⟶ℝ)
1312ffvelcdmda 7059 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝐹𝑘) ∈ ℝ)
144, 5eleqtrdi 2839 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺 ∈ (ℝ ↑m 𝐼))
15 elmapi 8825 . . . . . . . . 9 (𝐺 ∈ (ℝ ↑m 𝐼) → 𝐺:𝐼⟶ℝ)
1614, 15syl 17 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝐺:𝐼⟶ℝ)
1716ffvelcdmda 7059 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝐺𝑘) ∈ ℝ)
1813, 17resubcld 11613 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ)
1918resqcld 14097 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
20 simprl 770 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℝ+)
2120rpred 13002 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℝ)
2221resqcld 14097 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅↑2) ∈ ℝ)
2322adantr 480 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (𝑅↑2) ∈ ℝ)
24 absresq 15275 . . . . . . 7 (((𝐹𝑘) − (𝐺𝑘)) ∈ ℝ → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) = (((𝐹𝑘) − (𝐺𝑘))↑2))
2518, 24syl 17 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) = (((𝐹𝑘) − (𝐺𝑘))↑2))
26 rrndstprj1.1 . . . . . . . . . 10 𝑀 = ((abs ∘ − ) ↾ (ℝ × ℝ))
2726remetdval 24684 . . . . . . . . 9 (((𝐹𝑘) ∈ ℝ ∧ (𝐺𝑘) ∈ ℝ) → ((𝐹𝑘)𝑀(𝐺𝑘)) = (abs‘((𝐹𝑘) − (𝐺𝑘))))
2813, 17, 27syl2anc 584 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) = (abs‘((𝐹𝑘) − (𝐺𝑘))))
29 simprr 772 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)
30 fveq2 6861 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (𝐹𝑛) = (𝐹𝑘))
31 fveq2 6861 . . . . . . . . . . . 12 (𝑛 = 𝑘 → (𝐺𝑛) = (𝐺𝑘))
3230, 31oveq12d 7408 . . . . . . . . . . 11 (𝑛 = 𝑘 → ((𝐹𝑛)𝑀(𝐺𝑛)) = ((𝐹𝑘)𝑀(𝐺𝑘)))
3332breq1d 5120 . . . . . . . . . 10 (𝑛 = 𝑘 → (((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅 ↔ ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅))
3433rspccva 3590 . . . . . . . . 9 ((∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅)
3529, 34sylan 580 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘)𝑀(𝐺𝑘)) < 𝑅)
3628, 35eqbrtrrd 5134 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (abs‘((𝐹𝑘) − (𝐺𝑘))) < 𝑅)
3718recnd 11209 . . . . . . . . 9 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((𝐹𝑘) − (𝐺𝑘)) ∈ ℂ)
3837abscld 15412 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (abs‘((𝐹𝑘) − (𝐺𝑘))) ∈ ℝ)
3921adantr 480 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 𝑅 ∈ ℝ)
4037absge0d 15420 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ (abs‘((𝐹𝑘) − (𝐺𝑘))))
4120rpge0d 13006 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ 𝑅)
4241adantr 480 . . . . . . . 8 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ 𝑅)
4338, 39, 40, 42lt2sqd 14228 . . . . . . 7 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘))) < 𝑅 ↔ ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) < (𝑅↑2)))
4436, 43mpbid 232 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → ((abs‘((𝐹𝑘) − (𝐺𝑘)))↑2) < (𝑅↑2))
4525, 44eqbrtrrd 5134 . . . . 5 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → (((𝐹𝑘) − (𝐺𝑘))↑2) < (𝑅↑2))
462, 9, 19, 23, 45fsumlt 15773 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) < Σ𝑘𝐼 (𝑅↑2))
472, 19fsumrecl 15707 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ)
4818sqge0d 14109 . . . . . 6 ((((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) ∧ 𝑘𝐼) → 0 ≤ (((𝐹𝑘) − (𝐺𝑘))↑2))
492, 19, 48fsumge0 15768 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
50 resqrtth 15228 . . . . 5 ((Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2) ∈ ℝ ∧ 0 ≤ Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
5147, 49, 50syl2anc 584 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) = Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))
52 hashnncl 14338 . . . . . . . . . . . 12 (𝐼 ∈ Fin → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
532, 52syl 17 . . . . . . . . . . 11 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((♯‘𝐼) ∈ ℕ ↔ 𝐼 ≠ ∅))
549, 53mpbird 257 . . . . . . . . . 10 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℕ)
5554nnrpd 13000 . . . . . . . . 9 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℝ+)
5655rpred 13002 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℝ)
5755rpge0d 13006 . . . . . . . 8 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (♯‘𝐼))
58 resqrtth 15228 . . . . . . . 8 (((♯‘𝐼) ∈ ℝ ∧ 0 ≤ (♯‘𝐼)) → ((√‘(♯‘𝐼))↑2) = (♯‘𝐼))
5956, 57, 58syl2anc 584 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘(♯‘𝐼))↑2) = (♯‘𝐼))
6059oveq2d 7406 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)) = ((𝑅↑2) · (♯‘𝐼)))
6122recnd 11209 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅↑2) ∈ ℂ)
6255rpcnd 13004 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (♯‘𝐼) ∈ ℂ)
6361, 62mulcomd 11202 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · (♯‘𝐼)) = ((♯‘𝐼) · (𝑅↑2)))
6460, 63eqtrd 2765 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)) = ((♯‘𝐼) · (𝑅↑2)))
6520rpcnd 13004 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 𝑅 ∈ ℂ)
6655rpsqrtcld 15385 . . . . . . 7 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘(♯‘𝐼)) ∈ ℝ+)
6766rpcnd 13004 . . . . . 6 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘(♯‘𝐼)) ∈ ℂ)
6865, 67sqmuld 14130 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅 · (√‘(♯‘𝐼)))↑2) = ((𝑅↑2) · ((√‘(♯‘𝐼))↑2)))
69 fsumconst 15763 . . . . . 6 ((𝐼 ∈ Fin ∧ (𝑅↑2) ∈ ℂ) → Σ𝑘𝐼 (𝑅↑2) = ((♯‘𝐼) · (𝑅↑2)))
702, 61, 69syl2anc 584 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → Σ𝑘𝐼 (𝑅↑2) = ((♯‘𝐼) · (𝑅↑2)))
7164, 68, 703eqtr4d 2775 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((𝑅 · (√‘(♯‘𝐼)))↑2) = Σ𝑘𝐼 (𝑅↑2))
7246, 51, 713brtr4d 5142 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) < ((𝑅 · (√‘(♯‘𝐼)))↑2))
7347, 49resqrtcld 15391 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) ∈ ℝ)
7420, 66rpmulcld 13018 . . . . 5 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅 · (√‘(♯‘𝐼))) ∈ ℝ+)
7574rpred 13002 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝑅 · (√‘(♯‘𝐼))) ∈ ℝ)
7647, 49sqrtge0d 15394 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)))
7774rpge0d 13006 . . . 4 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → 0 ≤ (𝑅 · (√‘(♯‘𝐼))))
7873, 75, 76, 77lt2sqd 14228 . . 3 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) < (𝑅 · (√‘(♯‘𝐼))) ↔ ((√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2))↑2) < ((𝑅 · (√‘(♯‘𝐼)))↑2)))
7972, 78mpbird 257 . 2 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (√‘Σ𝑘𝐼 (((𝐹𝑘) − (𝐺𝑘))↑2)) < (𝑅 · (√‘(♯‘𝐼))))
807, 79eqbrtrd 5132 1 (((𝐼 ∈ (Fin ∖ {∅}) ∧ 𝐹𝑋𝐺𝑋) ∧ (𝑅 ∈ ℝ+ ∧ ∀𝑛𝐼 ((𝐹𝑛)𝑀(𝐺𝑛)) < 𝑅)) → (𝐹(ℝn𝐼)𝐺) < (𝑅 · (√‘(♯‘𝐼))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1086   = wceq 1540  wcel 2109  wne 2926  wral 3045  cdif 3914  c0 4299  {csn 4592   class class class wbr 5110   × cxp 5639  cres 5643  ccom 5645  wf 6510  cfv 6514  (class class class)co 7390  m cmap 8802  Fincfn 8921  cc 11073  cr 11074  0cc0 11075   · cmul 11080   < clt 11215  cle 11216  cmin 11412  cn 12193  2c2 12248  +crp 12958  cexp 14033  chash 14302  csqrt 15206  abscabs 15207  Σcsu 15659  ncrrn 37826
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 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714  ax-inf2 9601  ax-cnex 11131  ax-resscn 11132  ax-1cn 11133  ax-icn 11134  ax-addcl 11135  ax-addrcl 11136  ax-mulcl 11137  ax-mulrcl 11138  ax-mulcom 11139  ax-addass 11140  ax-mulass 11141  ax-distr 11142  ax-i2m1 11143  ax-1ne0 11144  ax-1rid 11145  ax-rnegex 11146  ax-rrecex 11147  ax-cnre 11148  ax-pre-lttri 11149  ax-pre-lttrn 11150  ax-pre-ltadd 11151  ax-pre-mulgt0 11152  ax-pre-sup 11153
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 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-nel 3031  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-pss 3937  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-int 4914  df-iun 4960  df-br 5111  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5536  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5594  df-se 5595  df-we 5596  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-isom 6523  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-om 7846  df-1st 7971  df-2nd 7972  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8381  df-1o 8437  df-er 8674  df-map 8804  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-sup 9400  df-oi 9470  df-card 9899  df-pnf 11217  df-mnf 11218  df-xr 11219  df-ltxr 11220  df-le 11221  df-sub 11414  df-neg 11415  df-div 11843  df-nn 12194  df-2 12256  df-3 12257  df-n0 12450  df-z 12537  df-uz 12801  df-rp 12959  df-ico 13319  df-fz 13476  df-fzo 13623  df-seq 13974  df-exp 14034  df-hash 14303  df-cj 15072  df-re 15073  df-im 15074  df-sqrt 15208  df-abs 15209  df-clim 15461  df-sum 15660  df-rrn 37827
This theorem is referenced by:  rrncmslem  37833  rrnequiv  37836
  Copyright terms: Public domain W3C validator