MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  minveclem2 Structured version   Visualization version   GIF version

Theorem minveclem2 24790
Description: Lemma for minvec 24800. Any two points 𝐾 and 𝐿 in 𝑌 are close to each other if they are close to the infimum of distance to 𝐴. (Contributed by Mario Carneiro, 9-May-2014.) (Revised by Mario Carneiro, 15-Oct-2015.) (Revised by AV, 3-Oct-2020.)
Hypotheses
Ref Expression
minvec.x 𝑋 = (Base‘𝑈)
minvec.m = (-g𝑈)
minvec.n 𝑁 = (norm‘𝑈)
minvec.u (𝜑𝑈 ∈ ℂPreHil)
minvec.y (𝜑𝑌 ∈ (LSubSp‘𝑈))
minvec.w (𝜑 → (𝑈s 𝑌) ∈ CMetSp)
minvec.a (𝜑𝐴𝑋)
minvec.j 𝐽 = (TopOpen‘𝑈)
minvec.r 𝑅 = ran (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦)))
minvec.s 𝑆 = inf(𝑅, ℝ, < )
minvec.d 𝐷 = ((dist‘𝑈) ↾ (𝑋 × 𝑋))
minveclem2.1 (𝜑𝐵 ∈ ℝ)
minveclem2.2 (𝜑 → 0 ≤ 𝐵)
minveclem2.3 (𝜑𝐾𝑌)
minveclem2.4 (𝜑𝐿𝑌)
minveclem2.5 (𝜑 → ((𝐴𝐷𝐾)↑2) ≤ ((𝑆↑2) + 𝐵))
minveclem2.6 (𝜑 → ((𝐴𝐷𝐿)↑2) ≤ ((𝑆↑2) + 𝐵))
Assertion
Ref Expression
minveclem2 (𝜑 → ((𝐾𝐷𝐿)↑2) ≤ (4 · 𝐵))
Distinct variable groups:   𝑦,   𝑦,𝐴   𝑦,𝐽   𝑦,𝐾   𝑦,𝑁   𝜑,𝑦   𝑦,𝑅   𝑦,𝑈   𝑦,𝑋   𝑦,𝑌   𝑦,𝐷   𝑦,𝑆   𝑦,𝐿
Allowed substitution hint:   𝐵(𝑦)

Proof of Theorem minveclem2
Dummy variables 𝑤 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 4re 12237 . . . . . 6 4 ∈ ℝ
2 minvec.x . . . . . . . 8 𝑋 = (Base‘𝑈)
3 minvec.m . . . . . . . 8 = (-g𝑈)
4 minvec.n . . . . . . . 8 𝑁 = (norm‘𝑈)
5 minvec.u . . . . . . . 8 (𝜑𝑈 ∈ ℂPreHil)
6 minvec.y . . . . . . . 8 (𝜑𝑌 ∈ (LSubSp‘𝑈))
7 minvec.w . . . . . . . 8 (𝜑 → (𝑈s 𝑌) ∈ CMetSp)
8 minvec.a . . . . . . . 8 (𝜑𝐴𝑋)
9 minvec.j . . . . . . . 8 𝐽 = (TopOpen‘𝑈)
10 minvec.r . . . . . . . 8 𝑅 = ran (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦)))
11 minvec.s . . . . . . . 8 𝑆 = inf(𝑅, ℝ, < )
122, 3, 4, 5, 6, 7, 8, 9, 10, 11minveclem4c 24789 . . . . . . 7 (𝜑𝑆 ∈ ℝ)
1312resqcld 14030 . . . . . 6 (𝜑 → (𝑆↑2) ∈ ℝ)
14 remulcl 11136 . . . . . 6 ((4 ∈ ℝ ∧ (𝑆↑2) ∈ ℝ) → (4 · (𝑆↑2)) ∈ ℝ)
151, 13, 14sylancr 587 . . . . 5 (𝜑 → (4 · (𝑆↑2)) ∈ ℝ)
16 cphngp 24537 . . . . . . . . . 10 (𝑈 ∈ ℂPreHil → 𝑈 ∈ NrmGrp)
175, 16syl 17 . . . . . . . . 9 (𝜑𝑈 ∈ NrmGrp)
18 ngpms 23956 . . . . . . . . 9 (𝑈 ∈ NrmGrp → 𝑈 ∈ MetSp)
1917, 18syl 17 . . . . . . . 8 (𝜑𝑈 ∈ MetSp)
20 minvec.d . . . . . . . . 9 𝐷 = ((dist‘𝑈) ↾ (𝑋 × 𝑋))
212, 20msmet 23810 . . . . . . . 8 (𝑈 ∈ MetSp → 𝐷 ∈ (Met‘𝑋))
2219, 21syl 17 . . . . . . 7 (𝜑𝐷 ∈ (Met‘𝑋))
23 eqid 2736 . . . . . . . . . 10 (LSubSp‘𝑈) = (LSubSp‘𝑈)
242, 23lssss 20397 . . . . . . . . 9 (𝑌 ∈ (LSubSp‘𝑈) → 𝑌𝑋)
256, 24syl 17 . . . . . . . 8 (𝜑𝑌𝑋)
26 minveclem2.3 . . . . . . . 8 (𝜑𝐾𝑌)
2725, 26sseldd 3945 . . . . . . 7 (𝜑𝐾𝑋)
28 minveclem2.4 . . . . . . . 8 (𝜑𝐿𝑌)
2925, 28sseldd 3945 . . . . . . 7 (𝜑𝐿𝑋)
30 metcl 23685 . . . . . . 7 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐾𝑋𝐿𝑋) → (𝐾𝐷𝐿) ∈ ℝ)
3122, 27, 29, 30syl3anc 1371 . . . . . 6 (𝜑 → (𝐾𝐷𝐿) ∈ ℝ)
3231resqcld 14030 . . . . 5 (𝜑 → ((𝐾𝐷𝐿)↑2) ∈ ℝ)
3315, 32readdcld 11184 . . . 4 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ∈ ℝ)
34 cphlmod 24538 . . . . . . . . . 10 (𝑈 ∈ ℂPreHil → 𝑈 ∈ LMod)
355, 34syl 17 . . . . . . . . 9 (𝜑𝑈 ∈ LMod)
36 cphclm 24553 . . . . . . . . . . . . . . 15 (𝑈 ∈ ℂPreHil → 𝑈 ∈ ℂMod)
375, 36syl 17 . . . . . . . . . . . . . 14 (𝜑𝑈 ∈ ℂMod)
38 eqid 2736 . . . . . . . . . . . . . . 15 (Scalar‘𝑈) = (Scalar‘𝑈)
39 eqid 2736 . . . . . . . . . . . . . . 15 (Base‘(Scalar‘𝑈)) = (Base‘(Scalar‘𝑈))
4038, 39clmzss 24441 . . . . . . . . . . . . . 14 (𝑈 ∈ ℂMod → ℤ ⊆ (Base‘(Scalar‘𝑈)))
4137, 40syl 17 . . . . . . . . . . . . 13 (𝜑 → ℤ ⊆ (Base‘(Scalar‘𝑈)))
42 2z 12535 . . . . . . . . . . . . . 14 2 ∈ ℤ
4342a1i 11 . . . . . . . . . . . . 13 (𝜑 → 2 ∈ ℤ)
4441, 43sseldd 3945 . . . . . . . . . . . 12 (𝜑 → 2 ∈ (Base‘(Scalar‘𝑈)))
45 2ne0 12257 . . . . . . . . . . . . 13 2 ≠ 0
4645a1i 11 . . . . . . . . . . . 12 (𝜑 → 2 ≠ 0)
4738, 39cphreccl 24545 . . . . . . . . . . . 12 ((𝑈 ∈ ℂPreHil ∧ 2 ∈ (Base‘(Scalar‘𝑈)) ∧ 2 ≠ 0) → (1 / 2) ∈ (Base‘(Scalar‘𝑈)))
485, 44, 46, 47syl3anc 1371 . . . . . . . . . . 11 (𝜑 → (1 / 2) ∈ (Base‘(Scalar‘𝑈)))
49 eqid 2736 . . . . . . . . . . . . 13 (+g𝑈) = (+g𝑈)
5049, 23lssvacl 20415 . . . . . . . . . . . 12 (((𝑈 ∈ LMod ∧ 𝑌 ∈ (LSubSp‘𝑈)) ∧ (𝐾𝑌𝐿𝑌)) → (𝐾(+g𝑈)𝐿) ∈ 𝑌)
5135, 6, 26, 28, 50syl22anc 837 . . . . . . . . . . 11 (𝜑 → (𝐾(+g𝑈)𝐿) ∈ 𝑌)
52 eqid 2736 . . . . . . . . . . . 12 ( ·𝑠𝑈) = ( ·𝑠𝑈)
5338, 52, 39, 23lssvscl 20416 . . . . . . . . . . 11 (((𝑈 ∈ LMod ∧ 𝑌 ∈ (LSubSp‘𝑈)) ∧ ((1 / 2) ∈ (Base‘(Scalar‘𝑈)) ∧ (𝐾(+g𝑈)𝐿) ∈ 𝑌)) → ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑌)
5435, 6, 48, 51, 53syl22anc 837 . . . . . . . . . 10 (𝜑 → ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑌)
5525, 54sseldd 3945 . . . . . . . . 9 (𝜑 → ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑋)
562, 3lmodvsubcl 20367 . . . . . . . . 9 ((𝑈 ∈ LMod ∧ 𝐴𝑋 ∧ ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑋) → (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋)
5735, 8, 55, 56syl3anc 1371 . . . . . . . 8 (𝜑 → (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋)
582, 4nmcl 23972 . . . . . . . 8 ((𝑈 ∈ NrmGrp ∧ (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋) → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℝ)
5917, 57, 58syl2anc 584 . . . . . . 7 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℝ)
6059resqcld 14030 . . . . . 6 (𝜑 → ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ)
61 remulcl 11136 . . . . . 6 ((4 ∈ ℝ ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ) → (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) ∈ ℝ)
621, 60, 61sylancr 587 . . . . 5 (𝜑 → (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) ∈ ℝ)
6362, 32readdcld 11184 . . . 4 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) ∈ ℝ)
64 minveclem2.1 . . . . . 6 (𝜑𝐵 ∈ ℝ)
6513, 64readdcld 11184 . . . . 5 (𝜑 → ((𝑆↑2) + 𝐵) ∈ ℝ)
66 remulcl 11136 . . . . 5 ((4 ∈ ℝ ∧ ((𝑆↑2) + 𝐵) ∈ ℝ) → (4 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
671, 65, 66sylancr 587 . . . 4 (𝜑 → (4 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
682, 3, 4, 5, 6, 7, 8, 9, 10minveclem1 24788 . . . . . . . . . 10 (𝜑 → (𝑅 ⊆ ℝ ∧ 𝑅 ≠ ∅ ∧ ∀𝑤𝑅 0 ≤ 𝑤))
6968simp3d 1144 . . . . . . . . 9 (𝜑 → ∀𝑤𝑅 0 ≤ 𝑤)
7068simp1d 1142 . . . . . . . . . 10 (𝜑𝑅 ⊆ ℝ)
7168simp2d 1143 . . . . . . . . . 10 (𝜑𝑅 ≠ ∅)
72 0re 11157 . . . . . . . . . . 11 0 ∈ ℝ
73 breq1 5108 . . . . . . . . . . . . 13 (𝑥 = 0 → (𝑥𝑤 ↔ 0 ≤ 𝑤))
7473ralbidv 3174 . . . . . . . . . . . 12 (𝑥 = 0 → (∀𝑤𝑅 𝑥𝑤 ↔ ∀𝑤𝑅 0 ≤ 𝑤))
7574rspcev 3581 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ ∀𝑤𝑅 0 ≤ 𝑤) → ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤)
7672, 69, 75sylancr 587 . . . . . . . . . 10 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤)
7772a1i 11 . . . . . . . . . 10 (𝜑 → 0 ∈ ℝ)
78 infregelb 12139 . . . . . . . . . 10 (((𝑅 ⊆ ℝ ∧ 𝑅 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤) ∧ 0 ∈ ℝ) → (0 ≤ inf(𝑅, ℝ, < ) ↔ ∀𝑤𝑅 0 ≤ 𝑤))
7970, 71, 76, 77, 78syl31anc 1373 . . . . . . . . 9 (𝜑 → (0 ≤ inf(𝑅, ℝ, < ) ↔ ∀𝑤𝑅 0 ≤ 𝑤))
8069, 79mpbird 256 . . . . . . . 8 (𝜑 → 0 ≤ inf(𝑅, ℝ, < ))
8180, 11breqtrrdi 5147 . . . . . . 7 (𝜑 → 0 ≤ 𝑆)
82 eqid 2736 . . . . . . . . . . . 12 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
83 oveq2 7365 . . . . . . . . . . . . . 14 (𝑦 = ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) → (𝐴 𝑦) = (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
8483fveq2d 6846 . . . . . . . . . . . . 13 (𝑦 = ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) → (𝑁‘(𝐴 𝑦)) = (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
8584rspceeqv 3595 . . . . . . . . . . . 12 ((((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑌 ∧ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) → ∃𝑦𝑌 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 𝑦)))
8654, 82, 85sylancl 586 . . . . . . . . . . 11 (𝜑 → ∃𝑦𝑌 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 𝑦)))
87 eqid 2736 . . . . . . . . . . . 12 (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦))) = (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦)))
88 fvex 6855 . . . . . . . . . . . 12 (𝑁‘(𝐴 𝑦)) ∈ V
8987, 88elrnmpti 5915 . . . . . . . . . . 11 ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ran (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦))) ↔ ∃𝑦𝑌 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 𝑦)))
9086, 89sylibr 233 . . . . . . . . . 10 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ran (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦))))
9190, 10eleqtrrdi 2849 . . . . . . . . 9 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ 𝑅)
92 infrelb 12140 . . . . . . . . 9 ((𝑅 ⊆ ℝ ∧ ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤 ∧ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ 𝑅) → inf(𝑅, ℝ, < ) ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
9370, 76, 91, 92syl3anc 1371 . . . . . . . 8 (𝜑 → inf(𝑅, ℝ, < ) ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
9411, 93eqbrtrid 5140 . . . . . . 7 (𝜑𝑆 ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
95 le2sq2 14040 . . . . . . 7 (((𝑆 ∈ ℝ ∧ 0 ≤ 𝑆) ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℝ ∧ 𝑆 ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))) → (𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))
9612, 81, 59, 94, 95syl22anc 837 . . . . . 6 (𝜑 → (𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))
97 4pos 12260 . . . . . . . . 9 0 < 4
981, 97pm3.2i 471 . . . . . . . 8 (4 ∈ ℝ ∧ 0 < 4)
99 lemul2 12008 . . . . . . . 8 (((𝑆↑2) ∈ ℝ ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ ∧ (4 ∈ ℝ ∧ 0 < 4)) → ((𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ↔ (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))))
10098, 99mp3an3 1450 . . . . . . 7 (((𝑆↑2) ∈ ℝ ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ) → ((𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ↔ (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))))
10113, 60, 100syl2anc 584 . . . . . 6 (𝜑 → ((𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ↔ (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))))
10296, 101mpbid 231 . . . . 5 (𝜑 → (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
10315, 62, 32, 102leadd1dd 11769 . . . 4 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)))
104 metcl 23685 . . . . . . . . . 10 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐴𝑋𝐾𝑋) → (𝐴𝐷𝐾) ∈ ℝ)
10522, 8, 27, 104syl3anc 1371 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐾) ∈ ℝ)
106105resqcld 14030 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐾)↑2) ∈ ℝ)
107 metcl 23685 . . . . . . . . . 10 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐴𝑋𝐿𝑋) → (𝐴𝐷𝐿) ∈ ℝ)
10822, 8, 29, 107syl3anc 1371 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐿) ∈ ℝ)
109108resqcld 14030 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐿)↑2) ∈ ℝ)
110 minveclem2.5 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐾)↑2) ≤ ((𝑆↑2) + 𝐵))
111 minveclem2.6 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐿)↑2) ≤ ((𝑆↑2) + 𝐵))
112106, 109, 65, 65, 110, 111le2addd 11774 . . . . . . 7 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (((𝑆↑2) + 𝐵) + ((𝑆↑2) + 𝐵)))
11365recnd 11183 . . . . . . . 8 (𝜑 → ((𝑆↑2) + 𝐵) ∈ ℂ)
1141132timesd 12396 . . . . . . 7 (𝜑 → (2 · ((𝑆↑2) + 𝐵)) = (((𝑆↑2) + 𝐵) + ((𝑆↑2) + 𝐵)))
115112, 114breqtrrd 5133 . . . . . 6 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)))
116106, 109readdcld 11184 . . . . . . 7 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ∈ ℝ)
117 2re 12227 . . . . . . . 8 2 ∈ ℝ
118 remulcl 11136 . . . . . . . 8 ((2 ∈ ℝ ∧ ((𝑆↑2) + 𝐵) ∈ ℝ) → (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
119117, 65, 118sylancr 587 . . . . . . 7 (𝜑 → (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
120 2pos 12256 . . . . . . . . 9 0 < 2
121117, 120pm3.2i 471 . . . . . . . 8 (2 ∈ ℝ ∧ 0 < 2)
122 lemul2 12008 . . . . . . . 8 (((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ∈ ℝ ∧ (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)) ↔ (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵)))))
123121, 122mp3an3 1450 . . . . . . 7 (((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ∈ ℝ ∧ (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ) → ((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)) ↔ (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵)))))
124116, 119, 123syl2anc 584 . . . . . 6 (𝜑 → ((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)) ↔ (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵)))))
125115, 124mpbid 231 . . . . 5 (𝜑 → (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵))))
1262, 3lmodvsubcl 20367 . . . . . . . 8 ((𝑈 ∈ LMod ∧ 𝐴𝑋𝐾𝑋) → (𝐴 𝐾) ∈ 𝑋)
12735, 8, 27, 126syl3anc 1371 . . . . . . 7 (𝜑 → (𝐴 𝐾) ∈ 𝑋)
1282, 3lmodvsubcl 20367 . . . . . . . 8 ((𝑈 ∈ LMod ∧ 𝐴𝑋𝐿𝑋) → (𝐴 𝐿) ∈ 𝑋)
12935, 8, 29, 128syl3anc 1371 . . . . . . 7 (𝜑 → (𝐴 𝐿) ∈ 𝑋)
1302, 49, 3, 4nmpar 24604 . . . . . . 7 ((𝑈 ∈ ℂPreHil ∧ (𝐴 𝐾) ∈ 𝑋 ∧ (𝐴 𝐿) ∈ 𝑋) → (((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2) + ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2)) = (2 · (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2))))
1315, 127, 129, 130syl3anc 1371 . . . . . 6 (𝜑 → (((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2) + ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2)) = (2 · (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2))))
132 2cn 12228 . . . . . . . . . 10 2 ∈ ℂ
13359recnd 11183 . . . . . . . . . 10 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℂ)
134 sqmul 14024 . . . . . . . . . 10 ((2 ∈ ℂ ∧ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℂ) → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = ((2↑2) · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
135132, 133, 134sylancr 587 . . . . . . . . 9 (𝜑 → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = ((2↑2) · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
136 sq2 14101 . . . . . . . . . 10 (2↑2) = 4
137136oveq1i 7367 . . . . . . . . 9 ((2↑2) · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) = (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))
138135, 137eqtrdi 2792 . . . . . . . 8 (𝜑 → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
1392, 4, 52, 38, 39cphnmvs 24554 . . . . . . . . . . . 12 ((𝑈 ∈ ℂPreHil ∧ 2 ∈ (Base‘(Scalar‘𝑈)) ∧ (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋) → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = ((abs‘2) · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))))
1405, 44, 57, 139syl3anc 1371 . . . . . . . . . . 11 (𝜑 → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = ((abs‘2) · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))))
141 0le2 12255 . . . . . . . . . . . . 13 0 ≤ 2
142 absid 15181 . . . . . . . . . . . . 13 ((2 ∈ ℝ ∧ 0 ≤ 2) → (abs‘2) = 2)
143117, 141, 142mp2an 690 . . . . . . . . . . . 12 (abs‘2) = 2
144143oveq1i 7367 . . . . . . . . . . 11 ((abs‘2) · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
145140, 144eqtrdi 2792 . . . . . . . . . 10 (𝜑 → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))))
1462, 52, 38, 39, 3, 35, 44, 8, 55lmodsubdi 20379 . . . . . . . . . . . 12 (𝜑 → (2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = ((2( ·𝑠𝑈)𝐴) (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
147 eqid 2736 . . . . . . . . . . . . . . . 16 (.g𝑈) = (.g𝑈)
1482, 147, 49mulg2 18885 . . . . . . . . . . . . . . 15 (𝐴𝑋 → (2(.g𝑈)𝐴) = (𝐴(+g𝑈)𝐴))
1498, 148syl 17 . . . . . . . . . . . . . 14 (𝜑 → (2(.g𝑈)𝐴) = (𝐴(+g𝑈)𝐴))
1502, 147, 52clmmulg 24464 . . . . . . . . . . . . . . 15 ((𝑈 ∈ ℂMod ∧ 2 ∈ ℤ ∧ 𝐴𝑋) → (2(.g𝑈)𝐴) = (2( ·𝑠𝑈)𝐴))
15137, 43, 8, 150syl3anc 1371 . . . . . . . . . . . . . 14 (𝜑 → (2(.g𝑈)𝐴) = (2( ·𝑠𝑈)𝐴))
152149, 151eqtr3d 2778 . . . . . . . . . . . . 13 (𝜑 → (𝐴(+g𝑈)𝐴) = (2( ·𝑠𝑈)𝐴))
1532, 49lmodvacl 20336 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ LMod ∧ 𝐾𝑋𝐿𝑋) → (𝐾(+g𝑈)𝐿) ∈ 𝑋)
15435, 27, 29, 153syl3anc 1371 . . . . . . . . . . . . . . 15 (𝜑 → (𝐾(+g𝑈)𝐿) ∈ 𝑋)
1552, 52clmvs1 24456 . . . . . . . . . . . . . . 15 ((𝑈 ∈ ℂMod ∧ (𝐾(+g𝑈)𝐿) ∈ 𝑋) → (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (𝐾(+g𝑈)𝐿))
15637, 154, 155syl2anc 584 . . . . . . . . . . . . . 14 (𝜑 → (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (𝐾(+g𝑈)𝐿))
157132, 45recidi 11886 . . . . . . . . . . . . . . . 16 (2 · (1 / 2)) = 1
158157oveq1i 7367 . . . . . . . . . . . . . . 15 ((2 · (1 / 2))( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))
1592, 38, 52, 39clmvsass 24452 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ ℂMod ∧ (2 ∈ (Base‘(Scalar‘𝑈)) ∧ (1 / 2) ∈ (Base‘(Scalar‘𝑈)) ∧ (𝐾(+g𝑈)𝐿) ∈ 𝑋)) → ((2 · (1 / 2))( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
16037, 44, 48, 154, 159syl13anc 1372 . . . . . . . . . . . . . . 15 (𝜑 → ((2 · (1 / 2))( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
161158, 160eqtr3id 2790 . . . . . . . . . . . . . 14 (𝜑 → (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
162156, 161eqtr3d 2778 . . . . . . . . . . . . 13 (𝜑 → (𝐾(+g𝑈)𝐿) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
163152, 162oveq12d 7375 . . . . . . . . . . . 12 (𝜑 → ((𝐴(+g𝑈)𝐴) (𝐾(+g𝑈)𝐿)) = ((2( ·𝑠𝑈)𝐴) (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
164 lmodabl 20369 . . . . . . . . . . . . . 14 (𝑈 ∈ LMod → 𝑈 ∈ Abel)
16535, 164syl 17 . . . . . . . . . . . . 13 (𝜑𝑈 ∈ Abel)
1662, 49, 3ablsub4 19591 . . . . . . . . . . . . 13 ((𝑈 ∈ Abel ∧ (𝐴𝑋𝐴𝑋) ∧ (𝐾𝑋𝐿𝑋)) → ((𝐴(+g𝑈)𝐴) (𝐾(+g𝑈)𝐿)) = ((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))
167165, 8, 8, 27, 29, 166syl122anc 1379 . . . . . . . . . . . 12 (𝜑 → ((𝐴(+g𝑈)𝐴) (𝐾(+g𝑈)𝐿)) = ((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))
168146, 163, 1673eqtr2d 2782 . . . . . . . . . . 11 (𝜑 → (2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = ((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))
169168fveq2d 6846 . . . . . . . . . 10 (𝜑 → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿))))
170145, 169eqtr3d 2778 . . . . . . . . 9 (𝜑 → (2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿))))
171170oveq1d 7372 . . . . . . . 8 (𝜑 → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = ((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2))
172138, 171eqtr3d 2778 . . . . . . 7 (𝜑 → (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) = ((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2))
173 eqid 2736 . . . . . . . . . . 11 (dist‘𝑈) = (dist‘𝑈)
1744, 2, 3, 173ngpdsr 23961 . . . . . . . . . 10 ((𝑈 ∈ NrmGrp ∧ 𝐾𝑋𝐿𝑋) → (𝐾(dist‘𝑈)𝐿) = (𝑁‘(𝐿 𝐾)))
17517, 27, 29, 174syl3anc 1371 . . . . . . . . 9 (𝜑 → (𝐾(dist‘𝑈)𝐿) = (𝑁‘(𝐿 𝐾)))
17620oveqi 7370 . . . . . . . . . 10 (𝐾𝐷𝐿) = (𝐾((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿)
17727, 29ovresd 7521 . . . . . . . . . 10 (𝜑 → (𝐾((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿) = (𝐾(dist‘𝑈)𝐿))
178176, 177eqtrid 2788 . . . . . . . . 9 (𝜑 → (𝐾𝐷𝐿) = (𝐾(dist‘𝑈)𝐿))
1792, 3, 165, 8, 27, 29ablnnncan1 19602 . . . . . . . . . 10 (𝜑 → ((𝐴 𝐾) (𝐴 𝐿)) = (𝐿 𝐾))
180179fveq2d 6846 . . . . . . . . 9 (𝜑 → (𝑁‘((𝐴 𝐾) (𝐴 𝐿))) = (𝑁‘(𝐿 𝐾)))
181175, 178, 1803eqtr4d 2786 . . . . . . . 8 (𝜑 → (𝐾𝐷𝐿) = (𝑁‘((𝐴 𝐾) (𝐴 𝐿))))
182181oveq1d 7372 . . . . . . 7 (𝜑 → ((𝐾𝐷𝐿)↑2) = ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2))
183172, 182oveq12d 7375 . . . . . 6 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) = (((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2) + ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2)))
18420oveqi 7370 . . . . . . . . . . 11 (𝐴𝐷𝐾) = (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐾)
1858, 27ovresd 7521 . . . . . . . . . . 11 (𝜑 → (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐾) = (𝐴(dist‘𝑈)𝐾))
186184, 185eqtrid 2788 . . . . . . . . . 10 (𝜑 → (𝐴𝐷𝐾) = (𝐴(dist‘𝑈)𝐾))
1874, 2, 3, 173ngpds 23960 . . . . . . . . . . 11 ((𝑈 ∈ NrmGrp ∧ 𝐴𝑋𝐾𝑋) → (𝐴(dist‘𝑈)𝐾) = (𝑁‘(𝐴 𝐾)))
18817, 8, 27, 187syl3anc 1371 . . . . . . . . . 10 (𝜑 → (𝐴(dist‘𝑈)𝐾) = (𝑁‘(𝐴 𝐾)))
189186, 188eqtrd 2776 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐾) = (𝑁‘(𝐴 𝐾)))
190189oveq1d 7372 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐾)↑2) = ((𝑁‘(𝐴 𝐾))↑2))
19120oveqi 7370 . . . . . . . . . . 11 (𝐴𝐷𝐿) = (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿)
1928, 29ovresd 7521 . . . . . . . . . . 11 (𝜑 → (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿) = (𝐴(dist‘𝑈)𝐿))
193191, 192eqtrid 2788 . . . . . . . . . 10 (𝜑 → (𝐴𝐷𝐿) = (𝐴(dist‘𝑈)𝐿))
1944, 2, 3, 173ngpds 23960 . . . . . . . . . . 11 ((𝑈 ∈ NrmGrp ∧ 𝐴𝑋𝐿𝑋) → (𝐴(dist‘𝑈)𝐿) = (𝑁‘(𝐴 𝐿)))
19517, 8, 29, 194syl3anc 1371 . . . . . . . . . 10 (𝜑 → (𝐴(dist‘𝑈)𝐿) = (𝑁‘(𝐴 𝐿)))
196193, 195eqtrd 2776 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐿) = (𝑁‘(𝐴 𝐿)))
197196oveq1d 7372 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐿)↑2) = ((𝑁‘(𝐴 𝐿))↑2))
198190, 197oveq12d 7375 . . . . . . 7 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) = (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2)))
199198oveq2d 7373 . . . . . 6 (𝜑 → (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) = (2 · (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2))))
200131, 183, 1993eqtr4d 2786 . . . . 5 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) = (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))))
201 2t2e4 12317 . . . . . . 7 (2 · 2) = 4
202201oveq1i 7367 . . . . . 6 ((2 · 2) · ((𝑆↑2) + 𝐵)) = (4 · ((𝑆↑2) + 𝐵))
203 2cnd 12231 . . . . . . 7 (𝜑 → 2 ∈ ℂ)
204203, 203, 113mulassd 11178 . . . . . 6 (𝜑 → ((2 · 2) · ((𝑆↑2) + 𝐵)) = (2 · (2 · ((𝑆↑2) + 𝐵))))
205202, 204eqtr3id 2790 . . . . 5 (𝜑 → (4 · ((𝑆↑2) + 𝐵)) = (2 · (2 · ((𝑆↑2) + 𝐵))))
206125, 200, 2053brtr4d 5137 . . . 4 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ (4 · ((𝑆↑2) + 𝐵)))
20733, 63, 67, 103, 206letrd 11312 . . 3 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ (4 · ((𝑆↑2) + 𝐵)))
208 4cn 12238 . . . . 5 4 ∈ ℂ
209208a1i 11 . . . 4 (𝜑 → 4 ∈ ℂ)
21013recnd 11183 . . . 4 (𝜑 → (𝑆↑2) ∈ ℂ)
21164recnd 11183 . . . 4 (𝜑𝐵 ∈ ℂ)
212209, 210, 211adddid 11179 . . 3 (𝜑 → (4 · ((𝑆↑2) + 𝐵)) = ((4 · (𝑆↑2)) + (4 · 𝐵)))
213207, 212breqtrd 5131 . 2 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ ((4 · (𝑆↑2)) + (4 · 𝐵)))
214 remulcl 11136 . . . 4 ((4 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (4 · 𝐵) ∈ ℝ)
2151, 64, 214sylancr 587 . . 3 (𝜑 → (4 · 𝐵) ∈ ℝ)
21632, 215, 15leadd2d 11750 . 2 (𝜑 → (((𝐾𝐷𝐿)↑2) ≤ (4 · 𝐵) ↔ ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ ((4 · (𝑆↑2)) + (4 · 𝐵))))
217213, 216mpbird 256 1 (𝜑 → ((𝐾𝐷𝐿)↑2) ≤ (4 · 𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396   = wceq 1541  wcel 2106  wne 2943  wral 3064  wrex 3073  wss 3910  c0 4282   class class class wbr 5105  cmpt 5188   × cxp 5631  ran crn 5634  cres 5635  cfv 6496  (class class class)co 7357  infcinf 9377  cc 11049  cr 11050  0cc0 11051  1c1 11052   + caddc 11054   · cmul 11056   < clt 11189  cle 11190   / cdiv 11812  2c2 12208  4c4 12210  cz 12499  cexp 13967  abscabs 15119  Basecbs 17083  s cress 17112  +gcplusg 17133  Scalarcsca 17136   ·𝑠 cvsca 17137  distcds 17142  TopOpenctopn 17303  -gcsg 18750  .gcmg 18872  Abelcabl 19563  LModclmod 20322  LSubSpclss 20392  Metcmet 20782  MetSpcms 23671  normcnm 23932  NrmGrpcngp 23933  ℂModcclm 24425  ℂPreHilccph 24530  CMetSpccms 24696
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5242  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672  ax-cnex 11107  ax-resscn 11108  ax-1cn 11109  ax-icn 11110  ax-addcl 11111  ax-addrcl 11112  ax-mulcl 11113  ax-mulrcl 11114  ax-mulcom 11115  ax-addass 11116  ax-mulass 11117  ax-distr 11118  ax-i2m1 11119  ax-1ne0 11120  ax-1rid 11121  ax-rnegex 11122  ax-rrecex 11123  ax-cnre 11124  ax-pre-lttri 11125  ax-pre-lttrn 11126  ax-pre-ltadd 11127  ax-pre-mulgt0 11128  ax-pre-sup 11129  ax-addf 11130  ax-mulf 11131
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3065  df-rex 3074  df-rmo 3353  df-reu 3354  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-pss 3929  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-tp 4591  df-op 4593  df-uni 4866  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-tr 5223  df-id 5531  df-eprel 5537  df-po 5545  df-so 5546  df-fr 5588  df-we 5590  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-pred 6253  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-riota 7313  df-ov 7360  df-oprab 7361  df-mpo 7362  df-om 7803  df-1st 7921  df-2nd 7922  df-tpos 8157  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-1o 8412  df-er 8648  df-map 8767  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-sup 9378  df-inf 9379  df-pnf 11191  df-mnf 11192  df-xr 11193  df-ltxr 11194  df-le 11195  df-sub 11387  df-neg 11388  df-div 11813  df-nn 12154  df-2 12216  df-3 12217  df-4 12218  df-5 12219  df-6 12220  df-7 12221  df-8 12222  df-9 12223  df-n0 12414  df-z 12500  df-dec 12619  df-uz 12764  df-q 12874  df-rp 12916  df-xneg 13033  df-xadd 13034  df-xmul 13035  df-fz 13425  df-seq 13907  df-exp 13968  df-cj 14984  df-re 14985  df-im 14986  df-sqrt 15120  df-abs 15121  df-struct 17019  df-sets 17036  df-slot 17054  df-ndx 17066  df-base 17084  df-ress 17113  df-plusg 17146  df-mulr 17147  df-starv 17148  df-sca 17149  df-vsca 17150  df-ip 17151  df-tset 17152  df-ple 17153  df-ds 17155  df-unif 17156  df-0g 17323  df-topgen 17325  df-mgm 18497  df-sgrp 18546  df-mnd 18557  df-mhm 18601  df-grp 18751  df-minusg 18752  df-sbg 18753  df-mulg 18873  df-subg 18925  df-ghm 19006  df-cmn 19564  df-abl 19565  df-mgp 19897  df-ur 19914  df-ring 19966  df-cring 19967  df-oppr 20049  df-dvdsr 20070  df-unit 20071  df-invr 20101  df-dvr 20112  df-rnghom 20146  df-drng 20187  df-subrg 20220  df-staf 20304  df-srng 20305  df-lmod 20324  df-lss 20393  df-lmhm 20483  df-lvec 20564  df-sra 20633  df-rgmod 20634  df-psmet 20788  df-xmet 20789  df-met 20790  df-bl 20791  df-mopn 20792  df-cnfld 20797  df-phl 21030  df-top 22243  df-topon 22260  df-topsp 22282  df-bases 22296  df-xms 23673  df-ms 23674  df-nm 23938  df-ngp 23939  df-nlm 23942  df-clm 24426  df-cph 24532
This theorem is referenced by:  minveclem3  24793  minveclem7  24799
  Copyright terms: Public domain W3C validator