Metamath Proof Explorer


Theorem rrnequiv

Description: The supremum metric on RR ^ I is equivalent to the Rn metric. (Contributed by Jeff Madsen, 15-Sep-2015)

Ref Expression
Hypotheses rrnequiv.y ⊢ Y = ℂ fld ↾ 𝑠 ℝ ↑ 𝑠 I
rrnequiv.d ⊢ D = dist ⁡ Y
rrnequiv.1 ⊢ X = ℝ I
rrnequiv.i ⊢ φ → I ∈ Fin
Assertion rrnequiv ⊢ φ ∧ F ∈ X ∧ G ∈ X → F D G ≤ F ℝ n ⁡ I G ∧ F ℝ n ⁡ I G ≤ I ⁢ F D G

Proof

Step Hyp Ref Expression
1 rrnequiv.y ⊢ Y = ℂ fld ↾ 𝑠 ℝ ↑ 𝑠 I
2 rrnequiv.d ⊢ D = dist ⁡ Y
3 rrnequiv.1 ⊢ X = ℝ I
4 rrnequiv.i ⊢ φ → I ∈ Fin
5 ovex ⊢ ℂ fld ↾ 𝑠 ℝ ∈ V
6 4 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X → I ∈ Fin
7 reex ⊢ ℝ ∈ V
8 eqid ⊢ ℂ fld ↾ 𝑠 ℝ = ℂ fld ↾ 𝑠 ℝ
9 eqid ⊢ Scalar ⁡ ℂ fld = Scalar ⁡ ℂ fld
10 8 9 resssca ⊢ ℝ ∈ V → Scalar ⁡ ℂ fld = Scalar ⁡ ℂ fld ↾ 𝑠 ℝ
11 7 10 ax-mp ⊢ Scalar ⁡ ℂ fld = Scalar ⁡ ℂ fld ↾ 𝑠 ℝ
12 1 11 pwsval ⊢ ℂ fld ↾ 𝑠 ℝ ∈ V ∧ I ∈ Fin → Y = Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
13 5 6 12 sylancr ⊢ φ ∧ F ∈ X ∧ G ∈ X → Y = Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
14 13 fveq2d ⊢ φ ∧ F ∈ X ∧ G ∈ X → dist ⁡ Y = dist ⁡ Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
15 2 14 eqtrid ⊢ φ ∧ F ∈ X ∧ G ∈ X → D = dist ⁡ Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
16 15 oveqd ⊢ φ ∧ F ∈ X ∧ G ∈ X → F D G = F dist ⁡ Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ G
17 fconstmpt ⊢ I × ℂ fld ↾ 𝑠 ℝ = k ∈ I ⟼ ℂ fld ↾ 𝑠 ℝ
18 17 oveq2i ⊢ Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ = Scalar ⁡ ℂ fld ⨉ 𝑠 k ∈ I ⟼ ℂ fld ↾ 𝑠 ℝ
19 eqid ⊢ Base Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ = Base Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
20 fvexd ⊢ φ ∧ F ∈ X ∧ G ∈ X → Scalar ⁡ ℂ fld ∈ V
21 5 a1i ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ k ∈ I → ℂ fld ↾ 𝑠 ℝ ∈ V
22 21 ralrimiva ⊢ φ ∧ F ∈ X ∧ G ∈ X → ∀ k ∈ I ℂ fld ↾ 𝑠 ℝ ∈ V
23 simprl ⊢ φ ∧ F ∈ X ∧ G ∈ X → F ∈ X
24 ax-resscn ⊢ ℝ ⊆ ℂ
25 cnfldbas ⊢ ℂ = Base ℂ fld
26 8 25 ressbas2 ⊢ ℝ ⊆ ℂ → ℝ = Base ℂ fld ↾ 𝑠 ℝ
27 24 26 ax-mp ⊢ ℝ = Base ℂ fld ↾ 𝑠 ℝ
28 1 27 pwsbas ⊢ ℂ fld ↾ 𝑠 ℝ ∈ V ∧ I ∈ Fin → ℝ I = Base Y
29 5 6 28 sylancr ⊢ φ ∧ F ∈ X ∧ G ∈ X → ℝ I = Base Y
30 13 fveq2d ⊢ φ ∧ F ∈ X ∧ G ∈ X → Base Y = Base Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
31 29 30 eqtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X → ℝ I = Base Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
32 3 31 eqtrid ⊢ φ ∧ F ∈ X ∧ G ∈ X → X = Base Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
33 23 32 eleqtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X → F ∈ Base Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
34 simprr ⊢ φ ∧ F ∈ X ∧ G ∈ X → G ∈ X
35 34 32 eleqtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X → G ∈ Base Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
36 cnfldds ⊢ abs ∘ − = dist ⁡ ℂ fld
37 8 36 ressds ⊢ ℝ ∈ V → abs ∘ − = dist ⁡ ℂ fld ↾ 𝑠 ℝ
38 7 37 ax-mp ⊢ abs ∘ − = dist ⁡ ℂ fld ↾ 𝑠 ℝ
39 38 reseq1i ⊢ abs ∘ − ↾ ℝ 2 = dist ⁡ ℂ fld ↾ 𝑠 ℝ ↾ ℝ 2
40 eqid ⊢ dist ⁡ Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ = dist ⁡ Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ
41 18 19 20 6 22 33 35 27 39 40 prdsdsval3 ⊢ φ ∧ F ∈ X ∧ G ∈ X → F dist ⁡ Scalar ⁡ ℂ fld ⨉ 𝑠 I × ℂ fld ↾ 𝑠 ℝ G = sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * <
42 16 41 eqtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X → F D G = sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * <
43 eqid ⊢ abs ∘ − ↾ ℝ 2 = abs ∘ − ↾ ℝ 2
44 3 43 rrndstprj1 ⊢ I ∈ Fin ∧ k ∈ I ∧ F ∈ X ∧ G ∈ X → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F ℝ n ⁡ I G
45 44 an32s ⊢ I ∈ Fin ∧ F ∈ X ∧ G ∈ X ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F ℝ n ⁡ I G
46 4 45 sylanl1 ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F ℝ n ⁡ I G
47 46 ralrimiva ⊢ φ ∧ F ∈ X ∧ G ∈ X → ∀ k ∈ I F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F ℝ n ⁡ I G
48 ovex ⊢ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ V
49 48 rgenw ⊢ ∀ k ∈ I F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ V
50 eqid ⊢ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k = k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k
51 breq1 ⊢ z = F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k → z ≤ F ℝ n ⁡ I G ↔ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F ℝ n ⁡ I G
52 50 51 ralrnmptw ⊢ ∀ k ∈ I F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ V → ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k z ≤ F ℝ n ⁡ I G ↔ ∀ k ∈ I F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F ℝ n ⁡ I G
53 49 52 ax-mp ⊢ ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k z ≤ F ℝ n ⁡ I G ↔ ∀ k ∈ I F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F ℝ n ⁡ I G
54 47 53 sylibr ⊢ φ ∧ F ∈ X ∧ G ∈ X → ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k z ≤ F ℝ n ⁡ I G
55 3 rrnmet ⊢ I ∈ Fin → ℝ n ⁡ I ∈ Met ⁡ X
56 6 55 syl ⊢ φ ∧ F ∈ X ∧ G ∈ X → ℝ n ⁡ I ∈ Met ⁡ X
57 metge0 ⊢ ℝ n ⁡ I ∈ Met ⁡ X ∧ F ∈ X ∧ G ∈ X → 0 ≤ F ℝ n ⁡ I G
58 56 23 34 57 syl3anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → 0 ≤ F ℝ n ⁡ I G
59 elsni ⊢ z ∈ 0 → z = 0
60 59 breq1d ⊢ z ∈ 0 → z ≤ F ℝ n ⁡ I G ↔ 0 ≤ F ℝ n ⁡ I G
61 58 60 syl5ibrcom ⊢ φ ∧ F ∈ X ∧ G ∈ X → z ∈ 0 → z ≤ F ℝ n ⁡ I G
62 61 ralrimiv ⊢ φ ∧ F ∈ X ∧ G ∈ X → ∀ z ∈ 0 z ≤ F ℝ n ⁡ I G
63 ralunb ⊢ ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 z ≤ F ℝ n ⁡ I G ↔ ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k z ≤ F ℝ n ⁡ I G ∧ ∀ z ∈ 0 z ≤ F ℝ n ⁡ I G
64 54 62 63 sylanbrc ⊢ φ ∧ F ∈ X ∧ G ∈ X → ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 z ≤ F ℝ n ⁡ I G
65 18 19 20 6 22 27 33 prdsbascl ⊢ φ ∧ F ∈ X ∧ G ∈ X → ∀ k ∈ I F ⁡ k ∈ ℝ
66 65 r19.21bi ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ k ∈ I → F ⁡ k ∈ ℝ
67 18 19 20 6 22 27 35 prdsbascl ⊢ φ ∧ F ∈ X ∧ G ∈ X → ∀ k ∈ I G ⁡ k ∈ ℝ
68 67 r19.21bi ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ k ∈ I → G ⁡ k ∈ ℝ
69 43 remet ⊢ abs ∘ − ↾ ℝ 2 ∈ Met ⁡ ℝ
70 metcl ⊢ abs ∘ − ↾ ℝ 2 ∈ Met ⁡ ℝ ∧ F ⁡ k ∈ ℝ ∧ G ⁡ k ∈ ℝ → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ℝ
71 69 70 mp3an1 ⊢ F ⁡ k ∈ ℝ ∧ G ⁡ k ∈ ℝ → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ℝ
72 66 68 71 syl2anc ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ℝ
73 72 fmpttd ⊢ φ ∧ F ∈ X ∧ G ∈ X → k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k : I ⟶ ℝ
74 73 frnd ⊢ φ ∧ F ∈ X ∧ G ∈ X → ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ⊆ ℝ
75 ressxr ⊢ ℝ ⊆ ℝ *
76 74 75 sstrdi ⊢ φ ∧ F ∈ X ∧ G ∈ X → ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ⊆ ℝ *
77 0xr ⊢ 0 ∈ ℝ *
78 77 a1i ⊢ φ ∧ F ∈ X ∧ G ∈ X → 0 ∈ ℝ *
79 78 snssd ⊢ φ ∧ F ∈ X ∧ G ∈ X → 0 ⊆ ℝ *
80 76 79 unssd ⊢ φ ∧ F ∈ X ∧ G ∈ X → ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ⊆ ℝ *
81 metcl ⊢ ℝ n ⁡ I ∈ Met ⁡ X ∧ F ∈ X ∧ G ∈ X → F ℝ n ⁡ I G ∈ ℝ
82 56 23 34 81 syl3anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → F ℝ n ⁡ I G ∈ ℝ
83 75 82 sselid ⊢ φ ∧ F ∈ X ∧ G ∈ X → F ℝ n ⁡ I G ∈ ℝ *
84 supxrleub ⊢ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ⊆ ℝ * ∧ F ℝ n ⁡ I G ∈ ℝ * → sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * < ≤ F ℝ n ⁡ I G ↔ ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 z ≤ F ℝ n ⁡ I G
85 80 83 84 syl2anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * < ≤ F ℝ n ⁡ I G ↔ ∀ z ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 z ≤ F ℝ n ⁡ I G
86 64 85 mpbird ⊢ φ ∧ F ∈ X ∧ G ∈ X → sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * < ≤ F ℝ n ⁡ I G
87 42 86 eqbrtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X → F D G ≤ F ℝ n ⁡ I G
88 rzal ⊢ I = ∅ → ∀ k ∈ I F ⁡ k = G ⁡ k
89 23 3 eleqtrdi ⊢ φ ∧ F ∈ X ∧ G ∈ X → F ∈ ℝ I
90 elmapi ⊢ F ∈ ℝ I → F : I ⟶ ℝ
91 ffn ⊢ F : I ⟶ ℝ → F Fn I
92 89 90 91 3syl ⊢ φ ∧ F ∈ X ∧ G ∈ X → F Fn I
93 34 3 eleqtrdi ⊢ φ ∧ F ∈ X ∧ G ∈ X → G ∈ ℝ I
94 elmapi ⊢ G ∈ ℝ I → G : I ⟶ ℝ
95 ffn ⊢ G : I ⟶ ℝ → G Fn I
96 93 94 95 3syl ⊢ φ ∧ F ∈ X ∧ G ∈ X → G Fn I
97 eqfnfv ⊢ F Fn I ∧ G Fn I → F = G ↔ ∀ k ∈ I F ⁡ k = G ⁡ k
98 92 96 97 syl2anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → F = G ↔ ∀ k ∈ I F ⁡ k = G ⁡ k
99 88 98 imbitrrid ⊢ φ ∧ F ∈ X ∧ G ∈ X → I = ∅ → F = G
100 99 imp ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I = ∅ → F = G
101 100 oveq1d ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I = ∅ → F ℝ n ⁡ I G = G ℝ n ⁡ I G
102 met0 ⊢ ℝ n ⁡ I ∈ Met ⁡ X ∧ G ∈ X → G ℝ n ⁡ I G = 0
103 56 34 102 syl2anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → G ℝ n ⁡ I G = 0
104 hashcl ⊢ I ∈ Fin → I ∈ ℕ 0
105 6 104 syl ⊢ φ ∧ F ∈ X ∧ G ∈ X → I ∈ ℕ 0
106 105 nn0red ⊢ φ ∧ F ∈ X ∧ G ∈ X → I ∈ ℝ
107 105 nn0ge0d ⊢ φ ∧ F ∈ X ∧ G ∈ X → 0 ≤ I
108 106 107 resqrtcld ⊢ φ ∧ F ∈ X ∧ G ∈ X → I ∈ ℝ
109 1 2 3 repwsmet ⊢ I ∈ Fin → D ∈ Met ⁡ X
110 6 109 syl ⊢ φ ∧ F ∈ X ∧ G ∈ X → D ∈ Met ⁡ X
111 metcl ⊢ D ∈ Met ⁡ X ∧ F ∈ X ∧ G ∈ X → F D G ∈ ℝ
112 110 23 34 111 syl3anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → F D G ∈ ℝ
113 106 107 sqrtge0d ⊢ φ ∧ F ∈ X ∧ G ∈ X → 0 ≤ I
114 metge0 ⊢ D ∈ Met ⁡ X ∧ F ∈ X ∧ G ∈ X → 0 ≤ F D G
115 110 23 34 114 syl3anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → 0 ≤ F D G
116 108 112 113 115 mulge0d ⊢ φ ∧ F ∈ X ∧ G ∈ X → 0 ≤ I ⁢ F D G
117 103 116 eqbrtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X → G ℝ n ⁡ I G ≤ I ⁢ F D G
118 117 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I = ∅ → G ℝ n ⁡ I G ≤ I ⁢ F D G
119 101 118 eqbrtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I = ∅ → F ℝ n ⁡ I G ≤ I ⁢ F D G
120 82 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F ℝ n ⁡ I G ∈ ℝ
121 108 112 remulcld ⊢ φ ∧ F ∈ X ∧ G ∈ X → I ⁢ F D G ∈ ℝ
122 121 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ⁢ F D G ∈ ℝ
123 rpre ⊢ r ∈ ℝ + → r ∈ ℝ
124 123 ad2antll ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → r ∈ ℝ
125 122 124 readdcld ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ⁢ F D G + r ∈ ℝ
126 6 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ Fin
127 simprl ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ≠ ∅
128 eldifsn ⊢ I ∈ Fin ∖ ∅ ↔ I ∈ Fin ∧ I ≠ ∅
129 126 127 128 sylanbrc ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ Fin ∖ ∅
130 23 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F ∈ X
131 34 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → G ∈ X
132 112 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G ∈ ℝ
133 simprr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → r ∈ ℝ +
134 hashnncl ⊢ I ∈ Fin → I ∈ ℕ ↔ I ≠ ∅
135 126 134 syl ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ ℕ ↔ I ≠ ∅
136 127 135 mpbird ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ ℕ
137 136 nnrpd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ ℝ +
138 137 rpsqrtcld ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ ℝ +
139 133 138 rpdivcld ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → r I ∈ ℝ +
140 139 rpred ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → r I ∈ ℝ
141 132 140 readdcld ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G + r I ∈ ℝ
142 0red ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → 0 ∈ ℝ
143 115 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → 0 ≤ F D G
144 132 139 ltaddrpd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G < F D G + r I
145 142 132 141 143 144 lelttrd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → 0 < F D G + r I
146 141 145 elrpd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G + r I ∈ ℝ +
147 72 adantlr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ℝ
148 132 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F D G ∈ ℝ
149 141 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F D G + r I ∈ ℝ
150 80 ad2antrr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ⊆ ℝ *
151 ssun1 ⊢ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ⊆ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0
152 simpr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → k ∈ I
153 50 elrnmpt1 ⊢ k ∈ I ∧ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ V → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k
154 152 48 153 sylancl ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k
155 151 154 sselid ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0
156 supxrub ⊢ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ⊆ ℝ * ∧ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∈ ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * <
157 150 155 156 syl2anc ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * <
158 42 ad2antrr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F D G = sup ran ⁡ k ∈ I ⟼ F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ∪ 0 ℝ * <
159 157 158 breqtrrd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k ≤ F D G
160 144 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F D G < F D G + r I
161 147 148 149 159 160 lelttrd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + ∧ k ∈ I → F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k < F D G + r I
162 161 ralrimiva ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → ∀ k ∈ I F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k < F D G + r I
163 3 43 rrndstprj2 ⊢ I ∈ Fin ∖ ∅ ∧ F ∈ X ∧ G ∈ X ∧ F D G + r I ∈ ℝ + ∧ ∀ k ∈ I F ⁡ k abs ∘ − ↾ ℝ 2 G ⁡ k < F D G + r I → F ℝ n ⁡ I G < F D G + r I ⁢ I
164 129 130 131 146 162 163 syl32anc ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F ℝ n ⁡ I G < F D G + r I ⁢ I
165 132 recnd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G ∈ ℂ
166 140 recnd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → r I ∈ ℂ
167 108 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ ℝ
168 167 recnd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ∈ ℂ
169 165 166 168 adddird ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G + r I ⁢ I = F D G ⁢ I + r I ⁢ I
170 165 168 mulcomd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G ⁢ I = I ⁢ F D G
171 124 recnd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → r ∈ ℂ
172 138 rpne0d ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → I ≠ 0
173 171 168 172 divcan1d ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → r I ⁢ I = r
174 170 173 oveq12d ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G ⁢ I + r I ⁢ I = I ⁢ F D G + r
175 169 174 eqtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F D G + r I ⁢ I = I ⁢ F D G + r
176 164 175 breqtrd ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F ℝ n ⁡ I G < I ⁢ F D G + r
177 120 125 176 ltled ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F ℝ n ⁡ I G ≤ I ⁢ F D G + r
178 177 anassrs ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ ∧ r ∈ ℝ + → F ℝ n ⁡ I G ≤ I ⁢ F D G + r
179 178 ralrimiva ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ → ∀ r ∈ ℝ + F ℝ n ⁡ I G ≤ I ⁢ F D G + r
180 alrple ⊢ F ℝ n ⁡ I G ∈ ℝ ∧ I ⁢ F D G ∈ ℝ → F ℝ n ⁡ I G ≤ I ⁢ F D G ↔ ∀ r ∈ ℝ + F ℝ n ⁡ I G ≤ I ⁢ F D G + r
181 82 121 180 syl2anc ⊢ φ ∧ F ∈ X ∧ G ∈ X → F ℝ n ⁡ I G ≤ I ⁢ F D G ↔ ∀ r ∈ ℝ + F ℝ n ⁡ I G ≤ I ⁢ F D G + r
182 181 adantr ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ → F ℝ n ⁡ I G ≤ I ⁢ F D G ↔ ∀ r ∈ ℝ + F ℝ n ⁡ I G ≤ I ⁢ F D G + r
183 179 182 mpbird ⊢ φ ∧ F ∈ X ∧ G ∈ X ∧ I ≠ ∅ → F ℝ n ⁡ I G ≤ I ⁢ F D G
184 119 183 pm2.61dane ⊢ φ ∧ F ∈ X ∧ G ∈ X → F ℝ n ⁡ I G ≤ I ⁢ F D G
185 87 184 jca ⊢ φ ∧ F ∈ X ∧ G ∈ X → F D G ≤ F ℝ n ⁡ I G ∧ F ℝ n ⁡ I G ≤ I ⁢ F D G