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

Theorem minvecolem4 30120
Description: Lemma for minveco 30124. The convergent point of the cauchy sequence 𝐹 attains the minimum distance, and so is closer to 𝐴 than any other point in π‘Œ. (Contributed by Mario Carneiro, 7-May-2014.) (Revised by AV, 4-Oct-2020.) (New usage is discouraged.)
Hypotheses
Ref Expression
minveco.x 𝑋 = (BaseSetβ€˜π‘ˆ)
minveco.m 𝑀 = ( βˆ’π‘£ β€˜π‘ˆ)
minveco.n 𝑁 = (normCVβ€˜π‘ˆ)
minveco.y π‘Œ = (BaseSetβ€˜π‘Š)
minveco.u (πœ‘ β†’ π‘ˆ ∈ CPreHilOLD)
minveco.w (πœ‘ β†’ π‘Š ∈ ((SubSpβ€˜π‘ˆ) ∩ CBan))
minveco.a (πœ‘ β†’ 𝐴 ∈ 𝑋)
minveco.d 𝐷 = (IndMetβ€˜π‘ˆ)
minveco.j 𝐽 = (MetOpenβ€˜π·)
minveco.r 𝑅 = ran (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦)))
minveco.s 𝑆 = inf(𝑅, ℝ, < )
minveco.f (πœ‘ β†’ 𝐹:β„•βŸΆπ‘Œ)
minveco.1 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((𝑆↑2) + (1 / 𝑛)))
minveco.t 𝑇 = (1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
Assertion
Ref Expression
minvecolem4 (πœ‘ β†’ βˆƒπ‘₯ ∈ π‘Œ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)))
Distinct variable groups:   π‘₯,𝑛,𝑦,𝐹   𝑛,𝐽,π‘₯,𝑦   π‘₯,𝑀,𝑦   π‘₯,𝑁,𝑦   πœ‘,𝑛,π‘₯,𝑦   π‘₯,𝑅   𝑆,𝑛,π‘₯,𝑦   𝐴,𝑛,π‘₯,𝑦   𝐷,𝑛,π‘₯,𝑦   π‘₯,π‘ˆ,𝑦   π‘₯,π‘Š,𝑦   𝑇,𝑛   𝑛,𝑋,π‘₯   𝑛,π‘Œ,π‘₯,𝑦
Allowed substitution hints:   𝑅(𝑦,𝑛)   𝑇(π‘₯,𝑦)   π‘ˆ(𝑛)   𝑀(𝑛)   𝑁(𝑛)   π‘Š(𝑛)   𝑋(𝑦)

Proof of Theorem minvecolem4
Dummy variable 𝑀 is distinct from all other variables.
StepHypRef Expression
1 minveco.u . . . . . 6 (πœ‘ β†’ π‘ˆ ∈ CPreHilOLD)
2 phnv 30054 . . . . . 6 (π‘ˆ ∈ CPreHilOLD β†’ π‘ˆ ∈ NrmCVec)
3 minveco.x . . . . . . 7 𝑋 = (BaseSetβ€˜π‘ˆ)
4 minveco.d . . . . . . 7 𝐷 = (IndMetβ€˜π‘ˆ)
53, 4imsxmet 29932 . . . . . 6 (π‘ˆ ∈ NrmCVec β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
61, 2, 53syl 18 . . . . 5 (πœ‘ β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
7 minveco.j . . . . . 6 𝐽 = (MetOpenβ€˜π·)
87methaus 24020 . . . . 5 (𝐷 ∈ (∞Metβ€˜π‘‹) β†’ 𝐽 ∈ Haus)
9 lmfun 22876 . . . . 5 (𝐽 ∈ Haus β†’ Fun (β‡π‘‘β€˜π½))
106, 8, 93syl 18 . . . 4 (πœ‘ β†’ Fun (β‡π‘‘β€˜π½))
11 minveco.m . . . . . 6 𝑀 = ( βˆ’π‘£ β€˜π‘ˆ)
12 minveco.n . . . . . 6 𝑁 = (normCVβ€˜π‘ˆ)
13 minveco.y . . . . . 6 π‘Œ = (BaseSetβ€˜π‘Š)
14 minveco.w . . . . . 6 (πœ‘ β†’ π‘Š ∈ ((SubSpβ€˜π‘ˆ) ∩ CBan))
15 minveco.a . . . . . 6 (πœ‘ β†’ 𝐴 ∈ 𝑋)
16 minveco.r . . . . . 6 𝑅 = ran (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦)))
17 minveco.s . . . . . 6 𝑆 = inf(𝑅, ℝ, < )
18 minveco.f . . . . . 6 (πœ‘ β†’ 𝐹:β„•βŸΆπ‘Œ)
19 minveco.1 . . . . . 6 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((𝑆↑2) + (1 / 𝑛)))
203, 11, 12, 13, 1, 14, 15, 4, 7, 16, 17, 18, 19minvecolem4a 30117 . . . . 5 (πœ‘ β†’ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ))
21 eqid 2732 . . . . . . 7 (𝐽 β†Ύt π‘Œ) = (𝐽 β†Ύt π‘Œ)
22 nnuz 12861 . . . . . . 7 β„• = (β„€β‰₯β€˜1)
2313fvexi 6902 . . . . . . . 8 π‘Œ ∈ V
2423a1i 11 . . . . . . 7 (πœ‘ β†’ π‘Œ ∈ V)
251, 2syl 17 . . . . . . . 8 (πœ‘ β†’ π‘ˆ ∈ NrmCVec)
267mopntop 23937 . . . . . . . 8 (𝐷 ∈ (∞Metβ€˜π‘‹) β†’ 𝐽 ∈ Top)
2725, 5, 263syl 18 . . . . . . 7 (πœ‘ β†’ 𝐽 ∈ Top)
28 elin 3963 . . . . . . . . . . . . 13 (π‘Š ∈ ((SubSpβ€˜π‘ˆ) ∩ CBan) ↔ (π‘Š ∈ (SubSpβ€˜π‘ˆ) ∧ π‘Š ∈ CBan))
2914, 28sylib 217 . . . . . . . . . . . 12 (πœ‘ β†’ (π‘Š ∈ (SubSpβ€˜π‘ˆ) ∧ π‘Š ∈ CBan))
3029simpld 495 . . . . . . . . . . 11 (πœ‘ β†’ π‘Š ∈ (SubSpβ€˜π‘ˆ))
31 eqid 2732 . . . . . . . . . . . 12 (SubSpβ€˜π‘ˆ) = (SubSpβ€˜π‘ˆ)
323, 13, 31sspba 29967 . . . . . . . . . . 11 ((π‘ˆ ∈ NrmCVec ∧ π‘Š ∈ (SubSpβ€˜π‘ˆ)) β†’ π‘Œ βŠ† 𝑋)
3325, 30, 32syl2anc 584 . . . . . . . . . 10 (πœ‘ β†’ π‘Œ βŠ† 𝑋)
34 xmetres2 23858 . . . . . . . . . 10 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) ∈ (∞Metβ€˜π‘Œ))
356, 33, 34syl2anc 584 . . . . . . . . 9 (πœ‘ β†’ (𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) ∈ (∞Metβ€˜π‘Œ))
36 eqid 2732 . . . . . . . . . 10 (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) = (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ)))
3736mopntopon 23936 . . . . . . . . 9 ((𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) ∈ (∞Metβ€˜π‘Œ) β†’ (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) ∈ (TopOnβ€˜π‘Œ))
3835, 37syl 17 . . . . . . . 8 (πœ‘ β†’ (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) ∈ (TopOnβ€˜π‘Œ))
39 lmcl 22792 . . . . . . . 8 (((MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) ∈ (TopOnβ€˜π‘Œ) ∧ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)) β†’ ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ∈ π‘Œ)
4038, 20, 39syl2anc 584 . . . . . . 7 (πœ‘ β†’ ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ∈ π‘Œ)
41 1zzd 12589 . . . . . . 7 (πœ‘ β†’ 1 ∈ β„€)
4221, 22, 24, 27, 40, 41, 18lmss 22793 . . . . . 6 (πœ‘ β†’ (𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ↔ 𝐹(β‡π‘‘β€˜(𝐽 β†Ύt π‘Œ))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
43 eqid 2732 . . . . . . . . . 10 (𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) = (𝐷 β†Ύ (π‘Œ Γ— π‘Œ))
4443, 7, 36metrest 24024 . . . . . . . . 9 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝐽 β†Ύt π‘Œ) = (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))
456, 33, 44syl2anc 584 . . . . . . . 8 (πœ‘ β†’ (𝐽 β†Ύt π‘Œ) = (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))
4645fveq2d 6892 . . . . . . 7 (πœ‘ β†’ (β‡π‘‘β€˜(𝐽 β†Ύt π‘Œ)) = (β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ)))))
4746breqd 5158 . . . . . 6 (πœ‘ β†’ (𝐹(β‡π‘‘β€˜(𝐽 β†Ύt π‘Œ))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ↔ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
4842, 47bitrd 278 . . . . 5 (πœ‘ β†’ (𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ↔ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
4920, 48mpbird 256 . . . 4 (πœ‘ β†’ 𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ))
50 funbrfv 6939 . . . 4 (Fun (β‡π‘‘β€˜π½) β†’ (𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) = ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
5110, 49, 50sylc 65 . . 3 (πœ‘ β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) = ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ))
5251, 40eqeltrd 2833 . 2 (πœ‘ β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ π‘Œ)
533, 11, 12, 13, 1, 14, 15, 4, 7, 16, 17, 18, 19minvecolem4b 30118 . . . . . 6 (πœ‘ β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋)
543, 11, 12, 4imsdval 29926 . . . . . 6 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
5525, 15, 53, 54syl3anc 1371 . . . . 5 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
5655adantr 481 . . . 4 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
573, 4imsmet 29931 . . . . . . . 8 (π‘ˆ ∈ NrmCVec β†’ 𝐷 ∈ (Metβ€˜π‘‹))
581, 2, 573syl 18 . . . . . . 7 (πœ‘ β†’ 𝐷 ∈ (Metβ€˜π‘‹))
59 metcl 23829 . . . . . . 7 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ)
6058, 15, 53, 59syl3anc 1371 . . . . . 6 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ)
6160adantr 481 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ)
623, 11, 12, 13, 1, 14, 15, 4, 7, 16, 17, 18, 19minvecolem4c 30119 . . . . . 6 (πœ‘ β†’ 𝑆 ∈ ℝ)
6362adantr 481 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑆 ∈ ℝ)
6425adantr 481 . . . . . 6 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ π‘ˆ ∈ NrmCVec)
6515adantr 481 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝐴 ∈ 𝑋)
6633sselda 3981 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑦 ∈ 𝑋)
673, 11nvmcl 29886 . . . . . . 7 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) β†’ (𝐴𝑀𝑦) ∈ 𝑋)
6864, 65, 66, 67syl3anc 1371 . . . . . 6 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝑀𝑦) ∈ 𝑋)
693, 12nvcl 29901 . . . . . 6 ((π‘ˆ ∈ NrmCVec ∧ (𝐴𝑀𝑦) ∈ 𝑋) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ℝ)
7064, 68, 69syl2anc 584 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ℝ)
7162, 60ltnled 11357 . . . . . . . 8 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ Β¬ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆))
72 eqid 2732 . . . . . . . . . . 11 (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1)) = (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))
736adantr 481 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
74 minveco.t . . . . . . . . . . . . . . 15 𝑇 = (1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
7560, 62readdcld 11239 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ)
7675rehalfcld 12455 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ)
7776resqcld 14086 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ∈ ℝ)
7862resqcld 14086 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑆↑2) ∈ ℝ)
7977, 78resubcld 11638 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ)
8079adantr 481 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ)
8162, 60, 62ltadd1d 11803 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ (𝑆 + 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
8262recnd 11238 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝑆 ∈ β„‚)
83822timesd 12451 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (2 Β· 𝑆) = (𝑆 + 𝑆))
8483breq1d 5157 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ ((2 Β· 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝑆 + 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
85 2re 12282 . . . . . . . . . . . . . . . . . . . . . . 23 2 ∈ ℝ
86 2pos 12311 . . . . . . . . . . . . . . . . . . . . . . 23 0 < 2
8785, 86pm3.2i 471 . . . . . . . . . . . . . . . . . . . . . 22 (2 ∈ ℝ ∧ 0 < 2)
8887a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (2 ∈ ℝ ∧ 0 < 2))
89 ltmuldiv2 12084 . . . . . . . . . . . . . . . . . . . . 21 ((𝑆 ∈ ℝ ∧ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) β†’ ((2 Β· 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ 𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
9062, 75, 88, 89syl3anc 1371 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ ((2 Β· 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ 𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
9181, 84, 903bitr2d 306 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ 𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
923, 11, 12, 13, 1, 14, 15, 4, 7, 16minvecolem1 30114 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (𝑅 βŠ† ℝ ∧ 𝑅 β‰  βˆ… ∧ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
9392simp3d 1144 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀)
9492simp1d 1142 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝑅 βŠ† ℝ)
9592simp2d 1143 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝑅 β‰  βˆ…)
96 0re 11212 . . . . . . . . . . . . . . . . . . . . . . . 24 0 ∈ ℝ
97 breq1 5150 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (π‘₯ = 0 β†’ (π‘₯ ≀ 𝑀 ↔ 0 ≀ 𝑀))
9897ralbidv 3177 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘₯ = 0 β†’ (βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀 ↔ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
9998rspcev 3612 . . . . . . . . . . . . . . . . . . . . . . . 24 ((0 ∈ ℝ ∧ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀)
10096, 93, 99sylancr 587 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀)
10196a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 0 ∈ ℝ)
102 infregelb 12194 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑅 βŠ† ℝ ∧ 𝑅 β‰  βˆ… ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀) ∧ 0 ∈ ℝ) β†’ (0 ≀ inf(𝑅, ℝ, < ) ↔ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
10394, 95, 100, 101, 102syl31anc 1373 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (0 ≀ inf(𝑅, ℝ, < ) ↔ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
10493, 103mpbird 256 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 0 ≀ inf(𝑅, ℝ, < ))
105104, 17breqtrrdi 5189 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 0 ≀ 𝑆)
106 metge0 23842 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋) β†’ 0 ≀ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)))
10758, 15, 53, 106syl3anc 1371 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 0 ≀ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)))
10860, 62, 107, 105addge0d 11786 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 0 ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆))
109 divge0 12079 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ ∧ 0 ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)) ∧ (2 ∈ ℝ ∧ 0 < 2)) β†’ 0 ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
11075, 108, 88, 109syl21anc 836 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 0 ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
11162, 76, 105, 110lt2sqd 14215 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ↔ (𝑆↑2) < ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2)))
11278, 77posdifd 11797 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ((𝑆↑2) < ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ↔ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
11391, 111, 1123bitrd 304 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
114113biimpa 477 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
11580, 114elrpd 13009 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ+)
116115rpreccld 13022 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ∈ ℝ+)
11774, 116eqeltrid 2837 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝑇 ∈ ℝ+)
118117rprege0d 13019 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (𝑇 ∈ ℝ ∧ 0 ≀ 𝑇))
119 flge0nn0 13781 . . . . . . . . . . . . 13 ((𝑇 ∈ ℝ ∧ 0 ≀ 𝑇) β†’ (βŒŠβ€˜π‘‡) ∈ β„•0)
120 nn0p1nn 12507 . . . . . . . . . . . . 13 ((βŒŠβ€˜π‘‡) ∈ β„•0 β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ β„•)
121118, 119, 1203syl 18 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ β„•)
122121nnzd 12581 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ β„€)
12349, 51breqtrrd 5175 . . . . . . . . . . . 12 (πœ‘ β†’ 𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜π½)β€˜πΉ))
124123adantr 481 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜π½)β€˜πΉ))
12515adantr 481 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝐴 ∈ 𝑋)
12676adantr 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ)
127126rexrd 11260 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ*)
128 simpll 765 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ πœ‘)
129 eluznn 12898 . . . . . . . . . . . . . . . 16 ((((βŒŠβ€˜π‘‡) + 1) ∈ β„• ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑛 ∈ β„•)
130121, 129sylan 580 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑛 ∈ β„•)
13158adantr 481 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 𝐷 ∈ (Metβ€˜π‘‹))
13215adantr 481 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 𝐴 ∈ 𝑋)
13318, 33fssd 6732 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ 𝐹:β„•βŸΆπ‘‹)
134133ffvelcdmda 7083 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (πΉβ€˜π‘›) ∈ 𝑋)
135 metcl 23829 . . . . . . . . . . . . . . . 16 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ (πΉβ€˜π‘›) ∈ 𝑋) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ∈ ℝ)
136131, 132, 134, 135syl3anc 1371 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ∈ ℝ)
137128, 130, 136syl2anc 584 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ∈ ℝ)
138137resqcld 14086 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ∈ ℝ)
13962ad2antrr 724 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑆 ∈ ℝ)
140139resqcld 14086 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (𝑆↑2) ∈ ℝ)
141130nnrecred 12259 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (1 / 𝑛) ∈ ℝ)
142140, 141readdcld 11239 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝑆↑2) + (1 / 𝑛)) ∈ ℝ)
14377ad2antrr 724 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ∈ ℝ)
144128, 130, 19syl2anc 584 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((𝑆↑2) + (1 / 𝑛)))
145117adantr 481 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ∈ ℝ+)
146145rpred 13012 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ∈ ℝ)
147 reflcl 13757 . . . . . . . . . . . . . . . . . 18 (𝑇 ∈ ℝ β†’ (βŒŠβ€˜π‘‡) ∈ ℝ)
148 peano2re 11383 . . . . . . . . . . . . . . . . . 18 ((βŒŠβ€˜π‘‡) ∈ ℝ β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ ℝ)
149146, 147, 1483syl 18 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ ℝ)
150130nnred 12223 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑛 ∈ ℝ)
151 fllep1 13762 . . . . . . . . . . . . . . . . . 18 (𝑇 ∈ ℝ β†’ 𝑇 ≀ ((βŒŠβ€˜π‘‡) + 1))
152146, 151syl 17 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ≀ ((βŒŠβ€˜π‘‡) + 1))
153 eluzle 12831 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1)) β†’ ((βŒŠβ€˜π‘‡) + 1) ≀ 𝑛)
154153adantl 482 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((βŒŠβ€˜π‘‡) + 1) ≀ 𝑛)
155146, 149, 150, 152, 154letrd 11367 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ≀ 𝑛)
15674, 155eqbrtrrid 5183 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ≀ 𝑛)
157 1red 11211 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 1 ∈ ℝ)
15879ad2antrr 724 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ)
159114adantr 481 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
160130nngt0d 12257 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 < 𝑛)
161 lediv23 12102 . . . . . . . . . . . . . . . 16 ((1 ∈ ℝ ∧ ((((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ ∧ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ∧ (𝑛 ∈ ℝ ∧ 0 < 𝑛)) β†’ ((1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ≀ 𝑛 ↔ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
162157, 158, 159, 150, 160, 161syl122anc 1379 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ≀ 𝑛 ↔ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
163156, 162mpbid 231 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
164140, 141, 143leaddsub2d 11812 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (((𝑆↑2) + (1 / 𝑛)) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ↔ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
165163, 164mpbird 256 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝑆↑2) + (1 / 𝑛)) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2))
166138, 142, 143, 144, 165letrd 11367 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2))
16776ad2antrr 724 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ)
168 metge0 23842 . . . . . . . . . . . . . . 15 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ (πΉβ€˜π‘›) ∈ 𝑋) β†’ 0 ≀ (𝐴𝐷(πΉβ€˜π‘›)))
169131, 132, 134, 168syl3anc 1371 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 0 ≀ (𝐴𝐷(πΉβ€˜π‘›)))
170128, 130, 169syl2anc 584 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 ≀ (𝐴𝐷(πΉβ€˜π‘›)))
171110ad2antrr 724 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
172137, 167, 170, 171le2sqd 14216 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ↔ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2)))
173166, 172mpbird 256 . . . . . . . . . . 11 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
17472, 7, 73, 122, 124, 125, 127, 173lmle 24809 . . . . . . . . . 10 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
17560, 62, 60leadd2d 11805 . . . . . . . . . . . 12 (πœ‘ β†’ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆 ↔ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
17660recnd 11238 . . . . . . . . . . . . . 14 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ β„‚)
1771762timesd 12451 . . . . . . . . . . . . 13 (πœ‘ β†’ (2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) = ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))))
178177breq1d 5157 . . . . . . . . . . . 12 (πœ‘ β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
179 lemuldiv2 12091 . . . . . . . . . . . . . 14 (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ ∧ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
18087, 179mp3an3 1450 . . . . . . . . . . . . 13 (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ ∧ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ) β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
18160, 75, 180syl2anc 584 . . . . . . . . . . . 12 (πœ‘ β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
182175, 178, 1813bitr2d 306 . . . . . . . . . . 11 (πœ‘ β†’ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆 ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
183182biimpar 478 . . . . . . . . . 10 ((πœ‘ ∧ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
184174, 183syldan 591 . . . . . . . . 9 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
185184ex 413 . . . . . . . 8 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆))
18671, 185sylbird 259 . . . . . . 7 (πœ‘ β†’ (Β¬ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆 β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆))
187186pm2.18d 127 . . . . . 6 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
188187adantr 481 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
18994adantr 481 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑅 βŠ† ℝ)
190100adantr 481 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀)
191 simpr 485 . . . . . . . . 9 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑦 ∈ π‘Œ)
192 fvex 6901 . . . . . . . . 9 (π‘β€˜(𝐴𝑀𝑦)) ∈ V
193 eqid 2732 . . . . . . . . . 10 (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦))) = (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦)))
194193elrnmpt1 5955 . . . . . . . . 9 ((𝑦 ∈ π‘Œ ∧ (π‘β€˜(𝐴𝑀𝑦)) ∈ V) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ran (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦))))
195191, 192, 194sylancl 586 . . . . . . . 8 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ran (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦))))
196195, 16eleqtrrdi 2844 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ 𝑅)
197 infrelb 12195 . . . . . . 7 ((𝑅 βŠ† ℝ ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀 ∧ (π‘β€˜(𝐴𝑀𝑦)) ∈ 𝑅) β†’ inf(𝑅, ℝ, < ) ≀ (π‘β€˜(𝐴𝑀𝑦)))
198189, 190, 196, 197syl3anc 1371 . . . . . 6 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ inf(𝑅, ℝ, < ) ≀ (π‘β€˜(𝐴𝑀𝑦)))
19917, 198eqbrtrid 5182 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑆 ≀ (π‘β€˜(𝐴𝑀𝑦)))
20061, 63, 70, 188, 199letrd 11367 . . . 4 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (π‘β€˜(𝐴𝑀𝑦)))
20156, 200eqbrtrrd 5171 . . 3 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦)))
202201ralrimiva 3146 . 2 (πœ‘ β†’ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦)))
203 oveq2 7413 . . . . . 6 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ (𝐴𝑀π‘₯) = (𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ)))
204203fveq2d 6892 . . . . 5 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ (π‘β€˜(𝐴𝑀π‘₯)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
205204breq1d 5157 . . . 4 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ ((π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)) ↔ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦))))
206205ralbidv 3177 . . 3 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ (βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)) ↔ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦))))
207206rspcev 3612 . 2 ((((β‡π‘‘β€˜π½)β€˜πΉ) ∈ π‘Œ ∧ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦))) β†’ βˆƒπ‘₯ ∈ π‘Œ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)))
20852, 202, 207syl2anc 584 1 (πœ‘ β†’ βˆƒπ‘₯ ∈ π‘Œ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541   ∈ wcel 2106   β‰  wne 2940  βˆ€wral 3061  βˆƒwrex 3070  Vcvv 3474   ∩ cin 3946   βŠ† wss 3947  βˆ…c0 4321   class class class wbr 5147   ↦ cmpt 5230   Γ— cxp 5673  ran crn 5676   β†Ύ cres 5677  Fun wfun 6534  βŸΆwf 6536  β€˜cfv 6540  (class class class)co 7405  infcinf 9432  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   Β· cmul 11111   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440   / cdiv 11867  β„•cn 12208  2c2 12263  β„•0cn0 12468  β„€β‰₯cuz 12818  β„+crp 12970  βŒŠcfl 13751  β†‘cexp 14023   β†Ύt crest 17362  βˆžMetcxmet 20921  Metcmet 20922  MetOpencmopn 20926  Topctop 22386  TopOnctopon 22403  β‡π‘‘clm 22721  Hauscha 22803  NrmCVeccnv 29824  BaseSetcba 29826   βˆ’π‘£ cnsb 29829  normCVcnmcv 29830  IndMetcims 29831  SubSpcss 29961  CPreHilOLDccphlo 30052  CBanccbn 30102
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 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184  ax-addf 11185  ax-mulf 11186
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 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7852  df-1st 7971  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-er 8699  df-map 8818  df-pm 8819  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fi 9402  df-sup 9433  df-inf 9434  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-4 12273  df-n0 12469  df-z 12555  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ico 13326  df-icc 13327  df-fl 13753  df-seq 13963  df-exp 14024  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-rest 17364  df-topgen 17385  df-psmet 20928  df-xmet 20929  df-met 20930  df-bl 20931  df-mopn 20932  df-fbas 20933  df-fg 20934  df-top 22387  df-topon 22404  df-bases 22440  df-cld 22514  df-ntr 22515  df-cls 22516  df-nei 22593  df-lm 22724  df-haus 22810  df-fil 23341  df-fm 23433  df-flim 23434  df-flf 23435  df-cfil 24763  df-cau 24764  df-cmet 24765  df-grpo 29733  df-gid 29734  df-ginv 29735  df-gdiv 29736  df-ablo 29785  df-vc 29799  df-nv 29832  df-va 29835  df-ba 29836  df-sm 29837  df-0v 29838  df-vs 29839  df-nmcv 29840  df-ims 29841  df-ssp 29962  df-ph 30053  df-cbn 30103
This theorem is referenced by:  minvecolem5  30121
  Copyright terms: Public domain W3C validator