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

Theorem minveclem2 24323
Description: Lemma for minvec 24333. 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 11914 . . . . . 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 24322 . . . . . . 7 (𝜑𝑆 ∈ ℝ)
1312resqcld 13817 . . . . . 6 (𝜑 → (𝑆↑2) ∈ ℝ)
14 remulcl 10814 . . . . . 6 ((4 ∈ ℝ ∧ (𝑆↑2) ∈ ℝ) → (4 · (𝑆↑2)) ∈ ℝ)
151, 13, 14sylancr 590 . . . . 5 (𝜑 → (4 · (𝑆↑2)) ∈ ℝ)
16 cphngp 24070 . . . . . . . . . 10 (𝑈 ∈ ℂPreHil → 𝑈 ∈ NrmGrp)
175, 16syl 17 . . . . . . . . 9 (𝜑𝑈 ∈ NrmGrp)
18 ngpms 23498 . . . . . . . . 9 (𝑈 ∈ NrmGrp → 𝑈 ∈ MetSp)
1917, 18syl 17 . . . . . . . 8 (𝜑𝑈 ∈ MetSp)
20 minvec.d . . . . . . . . 9 𝐷 = ((dist‘𝑈) ↾ (𝑋 × 𝑋))
212, 20msmet 23355 . . . . . . . 8 (𝑈 ∈ MetSp → 𝐷 ∈ (Met‘𝑋))
2219, 21syl 17 . . . . . . 7 (𝜑𝐷 ∈ (Met‘𝑋))
23 eqid 2737 . . . . . . . . . 10 (LSubSp‘𝑈) = (LSubSp‘𝑈)
242, 23lssss 19973 . . . . . . . . 9 (𝑌 ∈ (LSubSp‘𝑈) → 𝑌𝑋)
256, 24syl 17 . . . . . . . 8 (𝜑𝑌𝑋)
26 minveclem2.3 . . . . . . . 8 (𝜑𝐾𝑌)
2725, 26sseldd 3902 . . . . . . 7 (𝜑𝐾𝑋)
28 minveclem2.4 . . . . . . . 8 (𝜑𝐿𝑌)
2925, 28sseldd 3902 . . . . . . 7 (𝜑𝐿𝑋)
30 metcl 23230 . . . . . . 7 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐾𝑋𝐿𝑋) → (𝐾𝐷𝐿) ∈ ℝ)
3122, 27, 29, 30syl3anc 1373 . . . . . 6 (𝜑 → (𝐾𝐷𝐿) ∈ ℝ)
3231resqcld 13817 . . . . 5 (𝜑 → ((𝐾𝐷𝐿)↑2) ∈ ℝ)
3315, 32readdcld 10862 . . . 4 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ∈ ℝ)
34 cphlmod 24071 . . . . . . . . . 10 (𝑈 ∈ ℂPreHil → 𝑈 ∈ LMod)
355, 34syl 17 . . . . . . . . 9 (𝜑𝑈 ∈ LMod)
36 cphclm 24086 . . . . . . . . . . . . . . 15 (𝑈 ∈ ℂPreHil → 𝑈 ∈ ℂMod)
375, 36syl 17 . . . . . . . . . . . . . 14 (𝜑𝑈 ∈ ℂMod)
38 eqid 2737 . . . . . . . . . . . . . . 15 (Scalar‘𝑈) = (Scalar‘𝑈)
39 eqid 2737 . . . . . . . . . . . . . . 15 (Base‘(Scalar‘𝑈)) = (Base‘(Scalar‘𝑈))
4038, 39clmzss 23975 . . . . . . . . . . . . . 14 (𝑈 ∈ ℂMod → ℤ ⊆ (Base‘(Scalar‘𝑈)))
4137, 40syl 17 . . . . . . . . . . . . 13 (𝜑 → ℤ ⊆ (Base‘(Scalar‘𝑈)))
42 2z 12209 . . . . . . . . . . . . . 14 2 ∈ ℤ
4342a1i 11 . . . . . . . . . . . . 13 (𝜑 → 2 ∈ ℤ)
4441, 43sseldd 3902 . . . . . . . . . . . 12 (𝜑 → 2 ∈ (Base‘(Scalar‘𝑈)))
45 2ne0 11934 . . . . . . . . . . . . 13 2 ≠ 0
4645a1i 11 . . . . . . . . . . . 12 (𝜑 → 2 ≠ 0)
4738, 39cphreccl 24078 . . . . . . . . . . . 12 ((𝑈 ∈ ℂPreHil ∧ 2 ∈ (Base‘(Scalar‘𝑈)) ∧ 2 ≠ 0) → (1 / 2) ∈ (Base‘(Scalar‘𝑈)))
485, 44, 46, 47syl3anc 1373 . . . . . . . . . . 11 (𝜑 → (1 / 2) ∈ (Base‘(Scalar‘𝑈)))
49 eqid 2737 . . . . . . . . . . . . 13 (+g𝑈) = (+g𝑈)
5049, 23lssvacl 19991 . . . . . . . . . . . 12 (((𝑈 ∈ LMod ∧ 𝑌 ∈ (LSubSp‘𝑈)) ∧ (𝐾𝑌𝐿𝑌)) → (𝐾(+g𝑈)𝐿) ∈ 𝑌)
5135, 6, 26, 28, 50syl22anc 839 . . . . . . . . . . 11 (𝜑 → (𝐾(+g𝑈)𝐿) ∈ 𝑌)
52 eqid 2737 . . . . . . . . . . . 12 ( ·𝑠𝑈) = ( ·𝑠𝑈)
5338, 52, 39, 23lssvscl 19992 . . . . . . . . . . 11 (((𝑈 ∈ LMod ∧ 𝑌 ∈ (LSubSp‘𝑈)) ∧ ((1 / 2) ∈ (Base‘(Scalar‘𝑈)) ∧ (𝐾(+g𝑈)𝐿) ∈ 𝑌)) → ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑌)
5435, 6, 48, 51, 53syl22anc 839 . . . . . . . . . 10 (𝜑 → ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑌)
5525, 54sseldd 3902 . . . . . . . . 9 (𝜑 → ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑋)
562, 3lmodvsubcl 19944 . . . . . . . . 9 ((𝑈 ∈ LMod ∧ 𝐴𝑋 ∧ ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑋) → (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋)
5735, 8, 55, 56syl3anc 1373 . . . . . . . 8 (𝜑 → (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋)
582, 4nmcl 23514 . . . . . . . 8 ((𝑈 ∈ NrmGrp ∧ (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋) → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℝ)
5917, 57, 58syl2anc 587 . . . . . . 7 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℝ)
6059resqcld 13817 . . . . . 6 (𝜑 → ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ)
61 remulcl 10814 . . . . . 6 ((4 ∈ ℝ ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ) → (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) ∈ ℝ)
621, 60, 61sylancr 590 . . . . 5 (𝜑 → (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) ∈ ℝ)
6362, 32readdcld 10862 . . . 4 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) ∈ ℝ)
64 minveclem2.1 . . . . . 6 (𝜑𝐵 ∈ ℝ)
6513, 64readdcld 10862 . . . . 5 (𝜑 → ((𝑆↑2) + 𝐵) ∈ ℝ)
66 remulcl 10814 . . . . 5 ((4 ∈ ℝ ∧ ((𝑆↑2) + 𝐵) ∈ ℝ) → (4 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
671, 65, 66sylancr 590 . . . 4 (𝜑 → (4 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
682, 3, 4, 5, 6, 7, 8, 9, 10minveclem1 24321 . . . . . . . . . 10 (𝜑 → (𝑅 ⊆ ℝ ∧ 𝑅 ≠ ∅ ∧ ∀𝑤𝑅 0 ≤ 𝑤))
6968simp3d 1146 . . . . . . . . 9 (𝜑 → ∀𝑤𝑅 0 ≤ 𝑤)
7068simp1d 1144 . . . . . . . . . 10 (𝜑𝑅 ⊆ ℝ)
7168simp2d 1145 . . . . . . . . . 10 (𝜑𝑅 ≠ ∅)
72 0re 10835 . . . . . . . . . . 11 0 ∈ ℝ
73 breq1 5056 . . . . . . . . . . . . 13 (𝑥 = 0 → (𝑥𝑤 ↔ 0 ≤ 𝑤))
7473ralbidv 3118 . . . . . . . . . . . 12 (𝑥 = 0 → (∀𝑤𝑅 𝑥𝑤 ↔ ∀𝑤𝑅 0 ≤ 𝑤))
7574rspcev 3537 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ ∀𝑤𝑅 0 ≤ 𝑤) → ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤)
7672, 69, 75sylancr 590 . . . . . . . . . 10 (𝜑 → ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤)
7772a1i 11 . . . . . . . . . 10 (𝜑 → 0 ∈ ℝ)
78 infregelb 11816 . . . . . . . . . 10 (((𝑅 ⊆ ℝ ∧ 𝑅 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤) ∧ 0 ∈ ℝ) → (0 ≤ inf(𝑅, ℝ, < ) ↔ ∀𝑤𝑅 0 ≤ 𝑤))
7970, 71, 76, 77, 78syl31anc 1375 . . . . . . . . 9 (𝜑 → (0 ≤ inf(𝑅, ℝ, < ) ↔ ∀𝑤𝑅 0 ≤ 𝑤))
8069, 79mpbird 260 . . . . . . . 8 (𝜑 → 0 ≤ inf(𝑅, ℝ, < ))
8180, 11breqtrrdi 5095 . . . . . . 7 (𝜑 → 0 ≤ 𝑆)
82 eqid 2737 . . . . . . . . . . . 12 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
83 oveq2 7221 . . . . . . . . . . . . . 14 (𝑦 = ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) → (𝐴 𝑦) = (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
8483fveq2d 6721 . . . . . . . . . . . . 13 (𝑦 = ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) → (𝑁‘(𝐴 𝑦)) = (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
8584rspceeqv 3552 . . . . . . . . . . . 12 ((((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) ∈ 𝑌 ∧ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) → ∃𝑦𝑌 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 𝑦)))
8654, 82, 85sylancl 589 . . . . . . . . . . 11 (𝜑 → ∃𝑦𝑌 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 𝑦)))
87 eqid 2737 . . . . . . . . . . . 12 (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦))) = (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦)))
88 fvex 6730 . . . . . . . . . . . 12 (𝑁‘(𝐴 𝑦)) ∈ V
8987, 88elrnmpti 5829 . . . . . . . . . . 11 ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ran (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦))) ↔ ∃𝑦𝑌 (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = (𝑁‘(𝐴 𝑦)))
9086, 89sylibr 237 . . . . . . . . . 10 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ran (𝑦𝑌 ↦ (𝑁‘(𝐴 𝑦))))
9190, 10eleqtrrdi 2849 . . . . . . . . 9 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ 𝑅)
92 infrelb 11817 . . . . . . . . 9 ((𝑅 ⊆ ℝ ∧ ∃𝑥 ∈ ℝ ∀𝑤𝑅 𝑥𝑤 ∧ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ 𝑅) → inf(𝑅, ℝ, < ) ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
9370, 76, 91, 92syl3anc 1373 . . . . . . . 8 (𝜑 → inf(𝑅, ℝ, < ) ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
9411, 93eqbrtrid 5088 . . . . . . 7 (𝜑𝑆 ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
95 le2sq2 13706 . . . . . . 7 (((𝑆 ∈ ℝ ∧ 0 ≤ 𝑆) ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℝ ∧ 𝑆 ≤ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))) → (𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))
9612, 81, 59, 94, 95syl22anc 839 . . . . . 6 (𝜑 → (𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))
97 4pos 11937 . . . . . . . . 9 0 < 4
981, 97pm3.2i 474 . . . . . . . 8 (4 ∈ ℝ ∧ 0 < 4)
99 lemul2 11685 . . . . . . . 8 (((𝑆↑2) ∈ ℝ ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ ∧ (4 ∈ ℝ ∧ 0 < 4)) → ((𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ↔ (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))))
10098, 99mp3an3 1452 . . . . . . 7 (((𝑆↑2) ∈ ℝ ∧ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ∈ ℝ) → ((𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ↔ (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))))
10113, 60, 100syl2anc 587 . . . . . 6 (𝜑 → ((𝑆↑2) ≤ ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2) ↔ (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))))
10296, 101mpbid 235 . . . . 5 (𝜑 → (4 · (𝑆↑2)) ≤ (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
10315, 62, 32, 102leadd1dd 11446 . . . 4 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)))
104 metcl 23230 . . . . . . . . . 10 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐴𝑋𝐾𝑋) → (𝐴𝐷𝐾) ∈ ℝ)
10522, 8, 27, 104syl3anc 1373 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐾) ∈ ℝ)
106105resqcld 13817 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐾)↑2) ∈ ℝ)
107 metcl 23230 . . . . . . . . . 10 ((𝐷 ∈ (Met‘𝑋) ∧ 𝐴𝑋𝐿𝑋) → (𝐴𝐷𝐿) ∈ ℝ)
10822, 8, 29, 107syl3anc 1373 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐿) ∈ ℝ)
109108resqcld 13817 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐿)↑2) ∈ ℝ)
110 minveclem2.5 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐾)↑2) ≤ ((𝑆↑2) + 𝐵))
111 minveclem2.6 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐿)↑2) ≤ ((𝑆↑2) + 𝐵))
112106, 109, 65, 65, 110, 111le2addd 11451 . . . . . . 7 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (((𝑆↑2) + 𝐵) + ((𝑆↑2) + 𝐵)))
11365recnd 10861 . . . . . . . 8 (𝜑 → ((𝑆↑2) + 𝐵) ∈ ℂ)
1141132timesd 12073 . . . . . . 7 (𝜑 → (2 · ((𝑆↑2) + 𝐵)) = (((𝑆↑2) + 𝐵) + ((𝑆↑2) + 𝐵)))
115112, 114breqtrrd 5081 . . . . . 6 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)))
116106, 109readdcld 10862 . . . . . . 7 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ∈ ℝ)
117 2re 11904 . . . . . . . 8 2 ∈ ℝ
118 remulcl 10814 . . . . . . . 8 ((2 ∈ ℝ ∧ ((𝑆↑2) + 𝐵) ∈ ℝ) → (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
119117, 65, 118sylancr 590 . . . . . . 7 (𝜑 → (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ)
120 2pos 11933 . . . . . . . . 9 0 < 2
121117, 120pm3.2i 474 . . . . . . . 8 (2 ∈ ℝ ∧ 0 < 2)
122 lemul2 11685 . . . . . . . 8 (((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ∈ ℝ ∧ (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)) ↔ (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵)))))
123121, 122mp3an3 1452 . . . . . . 7 (((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ∈ ℝ ∧ (2 · ((𝑆↑2) + 𝐵)) ∈ ℝ) → ((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)) ↔ (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵)))))
124116, 119, 123syl2anc 587 . . . . . 6 (𝜑 → ((((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) ≤ (2 · ((𝑆↑2) + 𝐵)) ↔ (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵)))))
125115, 124mpbid 235 . . . . 5 (𝜑 → (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) ≤ (2 · (2 · ((𝑆↑2) + 𝐵))))
1262, 3lmodvsubcl 19944 . . . . . . . 8 ((𝑈 ∈ LMod ∧ 𝐴𝑋𝐾𝑋) → (𝐴 𝐾) ∈ 𝑋)
12735, 8, 27, 126syl3anc 1373 . . . . . . 7 (𝜑 → (𝐴 𝐾) ∈ 𝑋)
1282, 3lmodvsubcl 19944 . . . . . . . 8 ((𝑈 ∈ LMod ∧ 𝐴𝑋𝐿𝑋) → (𝐴 𝐿) ∈ 𝑋)
12935, 8, 29, 128syl3anc 1373 . . . . . . 7 (𝜑 → (𝐴 𝐿) ∈ 𝑋)
1302, 49, 3, 4nmpar 24137 . . . . . . 7 ((𝑈 ∈ ℂPreHil ∧ (𝐴 𝐾) ∈ 𝑋 ∧ (𝐴 𝐿) ∈ 𝑋) → (((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2) + ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2)) = (2 · (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2))))
1315, 127, 129, 130syl3anc 1373 . . . . . 6 (𝜑 → (((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2) + ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2)) = (2 · (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2))))
132 2cn 11905 . . . . . . . . . 10 2 ∈ ℂ
13359recnd 10861 . . . . . . . . . 10 (𝜑 → (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℂ)
134 sqmul 13691 . . . . . . . . . 10 ((2 ∈ ℂ ∧ (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) ∈ ℂ) → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = ((2↑2) · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
135132, 133, 134sylancr 590 . . . . . . . . 9 (𝜑 → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = ((2↑2) · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
136 sq2 13766 . . . . . . . . . 10 (2↑2) = 4
137136oveq1i 7223 . . . . . . . . 9 ((2↑2) · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) = (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2))
138135, 137eqtrdi 2794 . . . . . . . 8 (𝜑 → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)))
1392, 4, 52, 38, 39cphnmvs 24087 . . . . . . . . . . . 12 ((𝑈 ∈ ℂPreHil ∧ 2 ∈ (Base‘(Scalar‘𝑈)) ∧ (𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))) ∈ 𝑋) → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = ((abs‘2) · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))))
1405, 44, 57, 139syl3anc 1373 . . . . . . . . . . 11 (𝜑 → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = ((abs‘2) · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))))
141 0le2 11932 . . . . . . . . . . . . 13 0 ≤ 2
142 absid 14860 . . . . . . . . . . . . 13 ((2 ∈ ℝ ∧ 0 ≤ 2) → (abs‘2) = 2)
143117, 141, 142mp2an 692 . . . . . . . . . . . 12 (abs‘2) = 2
144143oveq1i 7223 . . . . . . . . . . 11 ((abs‘2) · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
145140, 144eqtrdi 2794 . . . . . . . . . 10 (𝜑 → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))))
1462, 52, 38, 39, 3, 35, 44, 8, 55lmodsubdi 19956 . . . . . . . . . . . 12 (𝜑 → (2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = ((2( ·𝑠𝑈)𝐴) (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
147 eqid 2737 . . . . . . . . . . . . . . . 16 (.g𝑈) = (.g𝑈)
1482, 147, 49mulg2 18501 . . . . . . . . . . . . . . 15 (𝐴𝑋 → (2(.g𝑈)𝐴) = (𝐴(+g𝑈)𝐴))
1498, 148syl 17 . . . . . . . . . . . . . 14 (𝜑 → (2(.g𝑈)𝐴) = (𝐴(+g𝑈)𝐴))
1502, 147, 52clmmulg 23998 . . . . . . . . . . . . . . 15 ((𝑈 ∈ ℂMod ∧ 2 ∈ ℤ ∧ 𝐴𝑋) → (2(.g𝑈)𝐴) = (2( ·𝑠𝑈)𝐴))
15137, 43, 8, 150syl3anc 1373 . . . . . . . . . . . . . 14 (𝜑 → (2(.g𝑈)𝐴) = (2( ·𝑠𝑈)𝐴))
152149, 151eqtr3d 2779 . . . . . . . . . . . . 13 (𝜑 → (𝐴(+g𝑈)𝐴) = (2( ·𝑠𝑈)𝐴))
1532, 49lmodvacl 19913 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ LMod ∧ 𝐾𝑋𝐿𝑋) → (𝐾(+g𝑈)𝐿) ∈ 𝑋)
15435, 27, 29, 153syl3anc 1373 . . . . . . . . . . . . . . 15 (𝜑 → (𝐾(+g𝑈)𝐿) ∈ 𝑋)
1552, 52clmvs1 23990 . . . . . . . . . . . . . . 15 ((𝑈 ∈ ℂMod ∧ (𝐾(+g𝑈)𝐿) ∈ 𝑋) → (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (𝐾(+g𝑈)𝐿))
15637, 154, 155syl2anc 587 . . . . . . . . . . . . . 14 (𝜑 → (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (𝐾(+g𝑈)𝐿))
157132, 45recidi 11563 . . . . . . . . . . . . . . . 16 (2 · (1 / 2)) = 1
158157oveq1i 7223 . . . . . . . . . . . . . . 15 ((2 · (1 / 2))( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))
1592, 38, 52, 39clmvsass 23986 . . . . . . . . . . . . . . . 16 ((𝑈 ∈ ℂMod ∧ (2 ∈ (Base‘(Scalar‘𝑈)) ∧ (1 / 2) ∈ (Base‘(Scalar‘𝑈)) ∧ (𝐾(+g𝑈)𝐿) ∈ 𝑋)) → ((2 · (1 / 2))( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
16037, 44, 48, 154, 159syl13anc 1374 . . . . . . . . . . . . . . 15 (𝜑 → ((2 · (1 / 2))( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
161158, 160eqtr3id 2792 . . . . . . . . . . . . . 14 (𝜑 → (1( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
162156, 161eqtr3d 2779 . . . . . . . . . . . . 13 (𝜑 → (𝐾(+g𝑈)𝐿) = (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))
163152, 162oveq12d 7231 . . . . . . . . . . . 12 (𝜑 → ((𝐴(+g𝑈)𝐴) (𝐾(+g𝑈)𝐿)) = ((2( ·𝑠𝑈)𝐴) (2( ·𝑠𝑈)((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))
164 lmodabl 19946 . . . . . . . . . . . . . 14 (𝑈 ∈ LMod → 𝑈 ∈ Abel)
16535, 164syl 17 . . . . . . . . . . . . 13 (𝜑𝑈 ∈ Abel)
1662, 49, 3ablsub4 19198 . . . . . . . . . . . . 13 ((𝑈 ∈ Abel ∧ (𝐴𝑋𝐴𝑋) ∧ (𝐾𝑋𝐿𝑋)) → ((𝐴(+g𝑈)𝐴) (𝐾(+g𝑈)𝐿)) = ((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))
167165, 8, 8, 27, 29, 166syl122anc 1381 . . . . . . . . . . . 12 (𝜑 → ((𝐴(+g𝑈)𝐴) (𝐾(+g𝑈)𝐿)) = ((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))
168146, 163, 1673eqtr2d 2783 . . . . . . . . . . 11 (𝜑 → (2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))) = ((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))
169168fveq2d 6721 . . . . . . . . . 10 (𝜑 → (𝑁‘(2( ·𝑠𝑈)(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿))))
170145, 169eqtr3d 2779 . . . . . . . . 9 (𝜑 → (2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))) = (𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿))))
171170oveq1d 7228 . . . . . . . 8 (𝜑 → ((2 · (𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿)))))↑2) = ((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2))
172138, 171eqtr3d 2779 . . . . . . 7 (𝜑 → (4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) = ((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2))
173 eqid 2737 . . . . . . . . . . 11 (dist‘𝑈) = (dist‘𝑈)
1744, 2, 3, 173ngpdsr 23503 . . . . . . . . . 10 ((𝑈 ∈ NrmGrp ∧ 𝐾𝑋𝐿𝑋) → (𝐾(dist‘𝑈)𝐿) = (𝑁‘(𝐿 𝐾)))
17517, 27, 29, 174syl3anc 1373 . . . . . . . . 9 (𝜑 → (𝐾(dist‘𝑈)𝐿) = (𝑁‘(𝐿 𝐾)))
17620oveqi 7226 . . . . . . . . . 10 (𝐾𝐷𝐿) = (𝐾((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿)
17727, 29ovresd 7375 . . . . . . . . . 10 (𝜑 → (𝐾((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿) = (𝐾(dist‘𝑈)𝐿))
178176, 177syl5eq 2790 . . . . . . . . 9 (𝜑 → (𝐾𝐷𝐿) = (𝐾(dist‘𝑈)𝐿))
1792, 3, 165, 8, 27, 29ablnnncan1 19209 . . . . . . . . . 10 (𝜑 → ((𝐴 𝐾) (𝐴 𝐿)) = (𝐿 𝐾))
180179fveq2d 6721 . . . . . . . . 9 (𝜑 → (𝑁‘((𝐴 𝐾) (𝐴 𝐿))) = (𝑁‘(𝐿 𝐾)))
181175, 178, 1803eqtr4d 2787 . . . . . . . 8 (𝜑 → (𝐾𝐷𝐿) = (𝑁‘((𝐴 𝐾) (𝐴 𝐿))))
182181oveq1d 7228 . . . . . . 7 (𝜑 → ((𝐾𝐷𝐿)↑2) = ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2))
183172, 182oveq12d 7231 . . . . . 6 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) = (((𝑁‘((𝐴 𝐾)(+g𝑈)(𝐴 𝐿)))↑2) + ((𝑁‘((𝐴 𝐾) (𝐴 𝐿)))↑2)))
18420oveqi 7226 . . . . . . . . . . 11 (𝐴𝐷𝐾) = (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐾)
1858, 27ovresd 7375 . . . . . . . . . . 11 (𝜑 → (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐾) = (𝐴(dist‘𝑈)𝐾))
186184, 185syl5eq 2790 . . . . . . . . . 10 (𝜑 → (𝐴𝐷𝐾) = (𝐴(dist‘𝑈)𝐾))
1874, 2, 3, 173ngpds 23502 . . . . . . . . . . 11 ((𝑈 ∈ NrmGrp ∧ 𝐴𝑋𝐾𝑋) → (𝐴(dist‘𝑈)𝐾) = (𝑁‘(𝐴 𝐾)))
18817, 8, 27, 187syl3anc 1373 . . . . . . . . . 10 (𝜑 → (𝐴(dist‘𝑈)𝐾) = (𝑁‘(𝐴 𝐾)))
189186, 188eqtrd 2777 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐾) = (𝑁‘(𝐴 𝐾)))
190189oveq1d 7228 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐾)↑2) = ((𝑁‘(𝐴 𝐾))↑2))
19120oveqi 7226 . . . . . . . . . . 11 (𝐴𝐷𝐿) = (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿)
1928, 29ovresd 7375 . . . . . . . . . . 11 (𝜑 → (𝐴((dist‘𝑈) ↾ (𝑋 × 𝑋))𝐿) = (𝐴(dist‘𝑈)𝐿))
193191, 192syl5eq 2790 . . . . . . . . . 10 (𝜑 → (𝐴𝐷𝐿) = (𝐴(dist‘𝑈)𝐿))
1944, 2, 3, 173ngpds 23502 . . . . . . . . . . 11 ((𝑈 ∈ NrmGrp ∧ 𝐴𝑋𝐿𝑋) → (𝐴(dist‘𝑈)𝐿) = (𝑁‘(𝐴 𝐿)))
19517, 8, 29, 194syl3anc 1373 . . . . . . . . . 10 (𝜑 → (𝐴(dist‘𝑈)𝐿) = (𝑁‘(𝐴 𝐿)))
196193, 195eqtrd 2777 . . . . . . . . 9 (𝜑 → (𝐴𝐷𝐿) = (𝑁‘(𝐴 𝐿)))
197196oveq1d 7228 . . . . . . . 8 (𝜑 → ((𝐴𝐷𝐿)↑2) = ((𝑁‘(𝐴 𝐿))↑2))
198190, 197oveq12d 7231 . . . . . . 7 (𝜑 → (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2)) = (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2)))
199198oveq2d 7229 . . . . . 6 (𝜑 → (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))) = (2 · (((𝑁‘(𝐴 𝐾))↑2) + ((𝑁‘(𝐴 𝐿))↑2))))
200131, 183, 1993eqtr4d 2787 . . . . 5 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) = (2 · (((𝐴𝐷𝐾)↑2) + ((𝐴𝐷𝐿)↑2))))
201 2t2e4 11994 . . . . . . 7 (2 · 2) = 4
202201oveq1i 7223 . . . . . 6 ((2 · 2) · ((𝑆↑2) + 𝐵)) = (4 · ((𝑆↑2) + 𝐵))
203 2cnd 11908 . . . . . . 7 (𝜑 → 2 ∈ ℂ)
204203, 203, 113mulassd 10856 . . . . . 6 (𝜑 → ((2 · 2) · ((𝑆↑2) + 𝐵)) = (2 · (2 · ((𝑆↑2) + 𝐵))))
205202, 204eqtr3id 2792 . . . . 5 (𝜑 → (4 · ((𝑆↑2) + 𝐵)) = (2 · (2 · ((𝑆↑2) + 𝐵))))
206125, 200, 2053brtr4d 5085 . . . 4 (𝜑 → ((4 · ((𝑁‘(𝐴 ((1 / 2)( ·𝑠𝑈)(𝐾(+g𝑈)𝐿))))↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ (4 · ((𝑆↑2) + 𝐵)))
20733, 63, 67, 103, 206letrd 10989 . . 3 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ (4 · ((𝑆↑2) + 𝐵)))
208 4cn 11915 . . . . 5 4 ∈ ℂ
209208a1i 11 . . . 4 (𝜑 → 4 ∈ ℂ)
21013recnd 10861 . . . 4 (𝜑 → (𝑆↑2) ∈ ℂ)
21164recnd 10861 . . . 4 (𝜑𝐵 ∈ ℂ)
212209, 210, 211adddid 10857 . . 3 (𝜑 → (4 · ((𝑆↑2) + 𝐵)) = ((4 · (𝑆↑2)) + (4 · 𝐵)))
213207, 212breqtrd 5079 . 2 (𝜑 → ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ ((4 · (𝑆↑2)) + (4 · 𝐵)))
214 remulcl 10814 . . . 4 ((4 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (4 · 𝐵) ∈ ℝ)
2151, 64, 214sylancr 590 . . 3 (𝜑 → (4 · 𝐵) ∈ ℝ)
21632, 215, 15leadd2d 11427 . 2 (𝜑 → (((𝐾𝐷𝐿)↑2) ≤ (4 · 𝐵) ↔ ((4 · (𝑆↑2)) + ((𝐾𝐷𝐿)↑2)) ≤ ((4 · (𝑆↑2)) + (4 · 𝐵))))
217213, 216mpbird 260 1 (𝜑 → ((𝐾𝐷𝐿)↑2) ≤ (4 · 𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399   = wceq 1543  wcel 2110  wne 2940  wral 3061  wrex 3062  wss 3866  c0 4237   class class class wbr 5053  cmpt 5135   × cxp 5549  ran crn 5552  cres 5553  cfv 6380  (class class class)co 7213  infcinf 9057  cc 10727  cr 10728  0cc0 10729  1c1 10730   + caddc 10732   · cmul 10734   < clt 10867  cle 10868   / cdiv 11489  2c2 11885  4c4 11887  cz 12176  cexp 13635  abscabs 14797  Basecbs 16760  s cress 16784  +gcplusg 16802  Scalarcsca 16805   ·𝑠 cvsca 16806  distcds 16811  TopOpenctopn 16926  -gcsg 18367  .gcmg 18488  Abelcabl 19171  LModclmod 19899  LSubSpclss 19968  Metcmet 20349  MetSpcms 23216  normcnm 23474  NrmGrpcngp 23475  ℂModcclm 23959  ℂPreHilccph 24063  CMetSpccms 24229
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2708  ax-rep 5179  ax-sep 5192  ax-nul 5199  ax-pow 5258  ax-pr 5322  ax-un 7523  ax-cnex 10785  ax-resscn 10786  ax-1cn 10787  ax-icn 10788  ax-addcl 10789  ax-addrcl 10790  ax-mulcl 10791  ax-mulrcl 10792  ax-mulcom 10793  ax-addass 10794  ax-mulass 10795  ax-distr 10796  ax-i2m1 10797  ax-1ne0 10798  ax-1rid 10799  ax-rnegex 10800  ax-rrecex 10801  ax-cnre 10802  ax-pre-lttri 10803  ax-pre-lttrn 10804  ax-pre-ltadd 10805  ax-pre-mulgt0 10806  ax-pre-sup 10807  ax-addf 10808  ax-mulf 10809
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3or 1090  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2886  df-ne 2941  df-nel 3047  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3410  df-sbc 3695  df-csb 3812  df-dif 3869  df-un 3871  df-in 3873  df-ss 3883  df-pss 3885  df-nul 4238  df-if 4440  df-pw 4515  df-sn 4542  df-pr 4544  df-tp 4546  df-op 4548  df-uni 4820  df-iun 4906  df-br 5054  df-opab 5116  df-mpt 5136  df-tr 5162  df-id 5455  df-eprel 5460  df-po 5468  df-so 5469  df-fr 5509  df-we 5511  df-xp 5557  df-rel 5558  df-cnv 5559  df-co 5560  df-dm 5561  df-rn 5562  df-res 5563  df-ima 5564  df-pred 6160  df-ord 6216  df-on 6217  df-lim 6218  df-suc 6219  df-iota 6338  df-fun 6382  df-fn 6383  df-f 6384  df-f1 6385  df-fo 6386  df-f1o 6387  df-fv 6388  df-riota 7170  df-ov 7216  df-oprab 7217  df-mpo 7218  df-om 7645  df-1st 7761  df-2nd 7762  df-tpos 7968  df-wrecs 8047  df-recs 8108  df-rdg 8146  df-1o 8202  df-er 8391  df-map 8510  df-en 8627  df-dom 8628  df-sdom 8629  df-fin 8630  df-sup 9058  df-inf 9059  df-pnf 10869  df-mnf 10870  df-xr 10871  df-ltxr 10872  df-le 10873  df-sub 11064  df-neg 11065  df-div 11490  df-nn 11831  df-2 11893  df-3 11894  df-4 11895  df-5 11896  df-6 11897  df-7 11898  df-8 11899  df-9 11900  df-n0 12091  df-z 12177  df-dec 12294  df-uz 12439  df-q 12545  df-rp 12587  df-xneg 12704  df-xadd 12705  df-xmul 12706  df-fz 13096  df-seq 13575  df-exp 13636  df-cj 14662  df-re 14663  df-im 14664  df-sqrt 14798  df-abs 14799  df-struct 16700  df-sets 16717  df-slot 16735  df-ndx 16745  df-base 16761  df-ress 16785  df-plusg 16815  df-mulr 16816  df-starv 16817  df-sca 16818  df-vsca 16819  df-ip 16820  df-tset 16821  df-ple 16822  df-ds 16824  df-unif 16825  df-0g 16946  df-topgen 16948  df-mgm 18114  df-sgrp 18163  df-mnd 18174  df-mhm 18218  df-grp 18368  df-minusg 18369  df-sbg 18370  df-mulg 18489  df-subg 18540  df-ghm 18620  df-cmn 19172  df-abl 19173  df-mgp 19505  df-ur 19517  df-ring 19564  df-cring 19565  df-oppr 19641  df-dvdsr 19659  df-unit 19660  df-invr 19690  df-dvr 19701  df-rnghom 19735  df-drng 19769  df-subrg 19798  df-staf 19881  df-srng 19882  df-lmod 19901  df-lss 19969  df-lmhm 20059  df-lvec 20140  df-sra 20209  df-rgmod 20210  df-psmet 20355  df-xmet 20356  df-met 20357  df-bl 20358  df-mopn 20359  df-cnfld 20364  df-phl 20588  df-top 21791  df-topon 21808  df-topsp 21830  df-bases 21843  df-xms 23218  df-ms 23219  df-nm 23480  df-ngp 23481  df-nlm 23484  df-clm 23960  df-cph 24065
This theorem is referenced by:  minveclem3  24326  minveclem7  24332
  Copyright terms: Public domain W3C validator