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

Theorem minvecolem4 29864
Description: Lemma for minveco 29868. 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 29798 . . . . . 6 (π‘ˆ ∈ CPreHilOLD β†’ π‘ˆ ∈ NrmCVec)
3 minveco.x . . . . . . 7 𝑋 = (BaseSetβ€˜π‘ˆ)
4 minveco.d . . . . . . 7 𝐷 = (IndMetβ€˜π‘ˆ)
53, 4imsxmet 29676 . . . . . 6 (π‘ˆ ∈ NrmCVec β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
61, 2, 53syl 18 . . . . 5 (πœ‘ β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
7 minveco.j . . . . . 6 𝐽 = (MetOpenβ€˜π·)
87methaus 23892 . . . . 5 (𝐷 ∈ (∞Metβ€˜π‘‹) β†’ 𝐽 ∈ Haus)
9 lmfun 22748 . . . . 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 29861 . . . . 5 (πœ‘ β†’ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ))
21 eqid 2733 . . . . . . 7 (𝐽 β†Ύt π‘Œ) = (𝐽 β†Ύt π‘Œ)
22 nnuz 12811 . . . . . . 7 β„• = (β„€β‰₯β€˜1)
2313fvexi 6857 . . . . . . . 8 π‘Œ ∈ V
2423a1i 11 . . . . . . 7 (πœ‘ β†’ π‘Œ ∈ V)
251, 2syl 17 . . . . . . . 8 (πœ‘ β†’ π‘ˆ ∈ NrmCVec)
267mopntop 23809 . . . . . . . 8 (𝐷 ∈ (∞Metβ€˜π‘‹) β†’ 𝐽 ∈ Top)
2725, 5, 263syl 18 . . . . . . 7 (πœ‘ β†’ 𝐽 ∈ Top)
28 elin 3927 . . . . . . . . . . . . 13 (π‘Š ∈ ((SubSpβ€˜π‘ˆ) ∩ CBan) ↔ (π‘Š ∈ (SubSpβ€˜π‘ˆ) ∧ π‘Š ∈ CBan))
2914, 28sylib 217 . . . . . . . . . . . 12 (πœ‘ β†’ (π‘Š ∈ (SubSpβ€˜π‘ˆ) ∧ π‘Š ∈ CBan))
3029simpld 496 . . . . . . . . . . 11 (πœ‘ β†’ π‘Š ∈ (SubSpβ€˜π‘ˆ))
31 eqid 2733 . . . . . . . . . . . 12 (SubSpβ€˜π‘ˆ) = (SubSpβ€˜π‘ˆ)
323, 13, 31sspba 29711 . . . . . . . . . . 11 ((π‘ˆ ∈ NrmCVec ∧ π‘Š ∈ (SubSpβ€˜π‘ˆ)) β†’ π‘Œ βŠ† 𝑋)
3325, 30, 32syl2anc 585 . . . . . . . . . 10 (πœ‘ β†’ π‘Œ βŠ† 𝑋)
34 xmetres2 23730 . . . . . . . . . 10 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) ∈ (∞Metβ€˜π‘Œ))
356, 33, 34syl2anc 585 . . . . . . . . 9 (πœ‘ β†’ (𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) ∈ (∞Metβ€˜π‘Œ))
36 eqid 2733 . . . . . . . . . 10 (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) = (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ)))
3736mopntopon 23808 . . . . . . . . 9 ((𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) ∈ (∞Metβ€˜π‘Œ) β†’ (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) ∈ (TopOnβ€˜π‘Œ))
3835, 37syl 17 . . . . . . . 8 (πœ‘ β†’ (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) ∈ (TopOnβ€˜π‘Œ))
39 lmcl 22664 . . . . . . . 8 (((MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))) ∈ (TopOnβ€˜π‘Œ) ∧ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)) β†’ ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ∈ π‘Œ)
4038, 20, 39syl2anc 585 . . . . . . 7 (πœ‘ β†’ ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ∈ π‘Œ)
41 1zzd 12539 . . . . . . 7 (πœ‘ β†’ 1 ∈ β„€)
4221, 22, 24, 27, 40, 41, 18lmss 22665 . . . . . 6 (πœ‘ β†’ (𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ↔ 𝐹(β‡π‘‘β€˜(𝐽 β†Ύt π‘Œ))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
43 eqid 2733 . . . . . . . . . 10 (𝐷 β†Ύ (π‘Œ Γ— π‘Œ)) = (𝐷 β†Ύ (π‘Œ Γ— π‘Œ))
4443, 7, 36metrest 23896 . . . . . . . . 9 ((𝐷 ∈ (∞Metβ€˜π‘‹) ∧ π‘Œ βŠ† 𝑋) β†’ (𝐽 β†Ύt π‘Œ) = (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))
456, 33, 44syl2anc 585 . . . . . . . 8 (πœ‘ β†’ (𝐽 β†Ύt π‘Œ) = (MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))
4645fveq2d 6847 . . . . . . 7 (πœ‘ β†’ (β‡π‘‘β€˜(𝐽 β†Ύt π‘Œ)) = (β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ)))))
4746breqd 5117 . . . . . 6 (πœ‘ β†’ (𝐹(β‡π‘‘β€˜(𝐽 β†Ύt π‘Œ))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ↔ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
4842, 47bitrd 279 . . . . 5 (πœ‘ β†’ (𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) ↔ 𝐹(β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
4920, 48mpbird 257 . . . 4 (πœ‘ β†’ 𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ))
50 funbrfv 6894 . . . 4 (Fun (β‡π‘‘β€˜π½) β†’ (𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ) β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) = ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ)))
5110, 49, 50sylc 65 . . 3 (πœ‘ β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) = ((β‡π‘‘β€˜(MetOpenβ€˜(𝐷 β†Ύ (π‘Œ Γ— π‘Œ))))β€˜πΉ))
5251, 40eqeltrd 2834 . 2 (πœ‘ β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ π‘Œ)
533, 11, 12, 13, 1, 14, 15, 4, 7, 16, 17, 18, 19minvecolem4b 29862 . . . . . 6 (πœ‘ β†’ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋)
543, 11, 12, 4imsdval 29670 . . . . . 6 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
5525, 15, 53, 54syl3anc 1372 . . . . 5 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
5655adantr 482 . . . 4 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
573, 4imsmet 29675 . . . . . . . 8 (π‘ˆ ∈ NrmCVec β†’ 𝐷 ∈ (Metβ€˜π‘‹))
581, 2, 573syl 18 . . . . . . 7 (πœ‘ β†’ 𝐷 ∈ (Metβ€˜π‘‹))
59 metcl 23701 . . . . . . 7 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ)
6058, 15, 53, 59syl3anc 1372 . . . . . 6 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ)
6160adantr 482 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ)
623, 11, 12, 13, 1, 14, 15, 4, 7, 16, 17, 18, 19minvecolem4c 29863 . . . . . 6 (πœ‘ β†’ 𝑆 ∈ ℝ)
6362adantr 482 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑆 ∈ ℝ)
6425adantr 482 . . . . . 6 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ π‘ˆ ∈ NrmCVec)
6515adantr 482 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝐴 ∈ 𝑋)
6633sselda 3945 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑦 ∈ 𝑋)
673, 11nvmcl 29630 . . . . . . 7 ((π‘ˆ ∈ NrmCVec ∧ 𝐴 ∈ 𝑋 ∧ 𝑦 ∈ 𝑋) β†’ (𝐴𝑀𝑦) ∈ 𝑋)
6864, 65, 66, 67syl3anc 1372 . . . . . 6 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝑀𝑦) ∈ 𝑋)
693, 12nvcl 29645 . . . . . 6 ((π‘ˆ ∈ NrmCVec ∧ (𝐴𝑀𝑦) ∈ 𝑋) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ℝ)
7064, 68, 69syl2anc 585 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ℝ)
7162, 60ltnled 11307 . . . . . . . 8 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ Β¬ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆))
72 eqid 2733 . . . . . . . . . . 11 (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1)) = (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))
736adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝐷 ∈ (∞Metβ€˜π‘‹))
74 minveco.t . . . . . . . . . . . . . . 15 𝑇 = (1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
7560, 62readdcld 11189 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ)
7675rehalfcld 12405 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ)
7776resqcld 14036 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ∈ ℝ)
7862resqcld 14036 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑆↑2) ∈ ℝ)
7977, 78resubcld 11588 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ)
8079adantr 482 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ)
8162, 60, 62ltadd1d 11753 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ (𝑆 + 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
8262recnd 11188 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝑆 ∈ β„‚)
83822timesd 12401 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (2 Β· 𝑆) = (𝑆 + 𝑆))
8483breq1d 5116 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ ((2 Β· 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝑆 + 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
85 2re 12232 . . . . . . . . . . . . . . . . . . . . . . 23 2 ∈ ℝ
86 2pos 12261 . . . . . . . . . . . . . . . . . . . . . . 23 0 < 2
8785, 86pm3.2i 472 . . . . . . . . . . . . . . . . . . . . . 22 (2 ∈ ℝ ∧ 0 < 2)
8887a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (2 ∈ ℝ ∧ 0 < 2))
89 ltmuldiv2 12034 . . . . . . . . . . . . . . . . . . . . 21 ((𝑆 ∈ ℝ ∧ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) β†’ ((2 Β· 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ 𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
9062, 75, 88, 89syl3anc 1372 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ ((2 Β· 𝑆) < ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ 𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
9181, 84, 903bitr2d 307 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ 𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
923, 11, 12, 13, 1, 14, 15, 4, 7, 16minvecolem1 29858 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (𝑅 βŠ† ℝ ∧ 𝑅 β‰  βˆ… ∧ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
9392simp3d 1145 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀)
9492simp1d 1143 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝑅 βŠ† ℝ)
9592simp2d 1144 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝑅 β‰  βˆ…)
96 0re 11162 . . . . . . . . . . . . . . . . . . . . . . . 24 0 ∈ ℝ
97 breq1 5109 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (π‘₯ = 0 β†’ (π‘₯ ≀ 𝑀 ↔ 0 ≀ 𝑀))
9897ralbidv 3171 . . . . . . . . . . . . . . . . . . . . . . . . 25 (π‘₯ = 0 β†’ (βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀 ↔ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
9998rspcev 3580 . . . . . . . . . . . . . . . . . . . . . . . 24 ((0 ∈ ℝ ∧ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀)
10096, 93, 99sylancr 588 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀)
10196a1i 11 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 0 ∈ ℝ)
102 infregelb 12144 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑅 βŠ† ℝ ∧ 𝑅 β‰  βˆ… ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀) ∧ 0 ∈ ℝ) β†’ (0 ≀ inf(𝑅, ℝ, < ) ↔ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
10394, 95, 100, 101, 102syl31anc 1374 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (0 ≀ inf(𝑅, ℝ, < ) ↔ βˆ€π‘€ ∈ 𝑅 0 ≀ 𝑀))
10493, 103mpbird 257 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 0 ≀ inf(𝑅, ℝ, < ))
105104, 17breqtrrdi 5148 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 0 ≀ 𝑆)
106 metge0 23714 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ ((β‡π‘‘β€˜π½)β€˜πΉ) ∈ 𝑋) β†’ 0 ≀ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)))
10758, 15, 53, 106syl3anc 1372 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 0 ≀ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)))
10860, 62, 107, 105addge0d 11736 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 0 ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆))
109 divge0 12029 . . . . . . . . . . . . . . . . . . . . 21 (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ ∧ 0 ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)) ∧ (2 ∈ ℝ ∧ 0 < 2)) β†’ 0 ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
11075, 108, 88, 109syl21anc 837 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 0 ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
11162, 76, 105, 110lt2sqd 14165 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝑆 < (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ↔ (𝑆↑2) < ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2)))
11278, 77posdifd 11747 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ((𝑆↑2) < ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ↔ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
11391, 111, 1123bitrd 305 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ↔ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
114113biimpa 478 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
11580, 114elrpd 12959 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ+)
116115rpreccld 12972 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ∈ ℝ+)
11774, 116eqeltrid 2838 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝑇 ∈ ℝ+)
118117rprege0d 12969 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (𝑇 ∈ ℝ ∧ 0 ≀ 𝑇))
119 flge0nn0 13731 . . . . . . . . . . . . 13 ((𝑇 ∈ ℝ ∧ 0 ≀ 𝑇) β†’ (βŒŠβ€˜π‘‡) ∈ β„•0)
120 nn0p1nn 12457 . . . . . . . . . . . . 13 ((βŒŠβ€˜π‘‡) ∈ β„•0 β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ β„•)
121118, 119, 1203syl 18 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ β„•)
122121nnzd 12531 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ β„€)
12349, 51breqtrrd 5134 . . . . . . . . . . . 12 (πœ‘ β†’ 𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜π½)β€˜πΉ))
124123adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝐹(β‡π‘‘β€˜π½)((β‡π‘‘β€˜π½)β€˜πΉ))
12515adantr 482 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ 𝐴 ∈ 𝑋)
12676adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ)
127126rexrd 11210 . . . . . . . . . . 11 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ*)
128 simpll 766 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ πœ‘)
129 eluznn 12848 . . . . . . . . . . . . . . . 16 ((((βŒŠβ€˜π‘‡) + 1) ∈ β„• ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑛 ∈ β„•)
130121, 129sylan 581 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑛 ∈ β„•)
13158adantr 482 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 𝐷 ∈ (Metβ€˜π‘‹))
13215adantr 482 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 𝐴 ∈ 𝑋)
13318, 33fssd 6687 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ 𝐹:β„•βŸΆπ‘‹)
134133ffvelcdmda 7036 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (πΉβ€˜π‘›) ∈ 𝑋)
135 metcl 23701 . . . . . . . . . . . . . . . 16 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ (πΉβ€˜π‘›) ∈ 𝑋) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ∈ ℝ)
136131, 132, 134, 135syl3anc 1372 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ∈ ℝ)
137128, 130, 136syl2anc 585 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ∈ ℝ)
138137resqcld 14036 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ∈ ℝ)
13962ad2antrr 725 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑆 ∈ ℝ)
140139resqcld 14036 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (𝑆↑2) ∈ ℝ)
141130nnrecred 12209 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (1 / 𝑛) ∈ ℝ)
142140, 141readdcld 11189 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝑆↑2) + (1 / 𝑛)) ∈ ℝ)
14377ad2antrr 725 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ∈ ℝ)
144128, 130, 19syl2anc 585 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((𝑆↑2) + (1 / 𝑛)))
145117adantr 482 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ∈ ℝ+)
146145rpred 12962 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ∈ ℝ)
147 reflcl 13707 . . . . . . . . . . . . . . . . . 18 (𝑇 ∈ ℝ β†’ (βŒŠβ€˜π‘‡) ∈ ℝ)
148 peano2re 11333 . . . . . . . . . . . . . . . . . 18 ((βŒŠβ€˜π‘‡) ∈ ℝ β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ ℝ)
149146, 147, 1483syl 18 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((βŒŠβ€˜π‘‡) + 1) ∈ ℝ)
150130nnred 12173 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑛 ∈ ℝ)
151 fllep1 13712 . . . . . . . . . . . . . . . . . 18 (𝑇 ∈ ℝ β†’ 𝑇 ≀ ((βŒŠβ€˜π‘‡) + 1))
152146, 151syl 17 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ≀ ((βŒŠβ€˜π‘‡) + 1))
153 eluzle 12781 . . . . . . . . . . . . . . . . . 18 (𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1)) β†’ ((βŒŠβ€˜π‘‡) + 1) ≀ 𝑛)
154153adantl 483 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((βŒŠβ€˜π‘‡) + 1) ≀ 𝑛)
155146, 149, 150, 152, 154letrd 11317 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 𝑇 ≀ 𝑛)
15674, 155eqbrtrrid 5142 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ≀ 𝑛)
157 1red 11161 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 1 ∈ ℝ)
15879ad2antrr 725 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ)
159114adantr 482 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
160130nngt0d 12207 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 < 𝑛)
161 lediv23 12052 . . . . . . . . . . . . . . . 16 ((1 ∈ ℝ ∧ ((((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)) ∈ ℝ ∧ 0 < (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ∧ (𝑛 ∈ ℝ ∧ 0 < 𝑛)) β†’ ((1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ≀ 𝑛 ↔ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
162157, 158, 159, 150, 160, 161syl122anc 1380 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((1 / (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))) ≀ 𝑛 ↔ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
163156, 162mpbid 231 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2)))
164140, 141, 143leaddsub2d 11762 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (((𝑆↑2) + (1 / 𝑛)) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) ↔ (1 / 𝑛) ≀ (((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2) βˆ’ (𝑆↑2))))
165163, 164mpbird 257 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝑆↑2) + (1 / 𝑛)) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2))
166138, 142, 143, 144, 165letrd 11317 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2))
16776ad2antrr 725 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ∈ ℝ)
168 metge0 23714 . . . . . . . . . . . . . . 15 ((𝐷 ∈ (Metβ€˜π‘‹) ∧ 𝐴 ∈ 𝑋 ∧ (πΉβ€˜π‘›) ∈ 𝑋) β†’ 0 ≀ (𝐴𝐷(πΉβ€˜π‘›)))
169131, 132, 134, 168syl3anc 1372 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑛 ∈ β„•) β†’ 0 ≀ (𝐴𝐷(πΉβ€˜π‘›)))
170128, 130, 169syl2anc 585 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 ≀ (𝐴𝐷(πΉβ€˜π‘›)))
171110ad2antrr 725 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ 0 ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
172137, 167, 170, 171le2sqd 14166 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ ((𝐴𝐷(πΉβ€˜π‘›)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2) ↔ ((𝐴𝐷(πΉβ€˜π‘›))↑2) ≀ ((((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)↑2)))
173166, 172mpbird 257 . . . . . . . . . . 11 (((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ∧ 𝑛 ∈ (β„€β‰₯β€˜((βŒŠβ€˜π‘‡) + 1))) β†’ (𝐴𝐷(πΉβ€˜π‘›)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
17472, 7, 73, 122, 124, 125, 127, 173lmle 24681 . . . . . . . . . 10 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2))
17560, 62, 60leadd2d 11755 . . . . . . . . . . . 12 (πœ‘ β†’ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆 ↔ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
17660recnd 11188 . . . . . . . . . . . . . 14 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ β„‚)
1771762timesd 12401 . . . . . . . . . . . . 13 (πœ‘ β†’ (2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) = ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))))
178177breq1d 5116 . . . . . . . . . . . 12 (πœ‘ β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆)))
179 lemuldiv2 12041 . . . . . . . . . . . . . 14 (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ ∧ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
18087, 179mp3an3 1451 . . . . . . . . . . . . 13 (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ∈ ℝ ∧ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ∈ ℝ) β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
18160, 75, 180syl2anc 585 . . . . . . . . . . . 12 (πœ‘ β†’ ((2 Β· (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
182175, 178, 1813bitr2d 307 . . . . . . . . . . 11 (πœ‘ β†’ ((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆 ↔ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)))
183182biimpar 479 . . . . . . . . . 10 ((πœ‘ ∧ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (((𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) + 𝑆) / 2)) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
184174, 183syldan 592 . . . . . . . . 9 ((πœ‘ ∧ 𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ))) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
185184ex 414 . . . . . . . 8 (πœ‘ β†’ (𝑆 < (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆))
18671, 185sylbird 260 . . . . . . 7 (πœ‘ β†’ (Β¬ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆 β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆))
187186pm2.18d 127 . . . . . 6 (πœ‘ β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
188187adantr 482 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ 𝑆)
18994adantr 482 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑅 βŠ† ℝ)
190100adantr 482 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀)
191 simpr 486 . . . . . . . . 9 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑦 ∈ π‘Œ)
192 fvex 6856 . . . . . . . . 9 (π‘β€˜(𝐴𝑀𝑦)) ∈ V
193 eqid 2733 . . . . . . . . . 10 (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦))) = (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦)))
194193elrnmpt1 5914 . . . . . . . . 9 ((𝑦 ∈ π‘Œ ∧ (π‘β€˜(𝐴𝑀𝑦)) ∈ V) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ran (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦))))
195191, 192, 194sylancl 587 . . . . . . . 8 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ ran (𝑦 ∈ π‘Œ ↦ (π‘β€˜(𝐴𝑀𝑦))))
196195, 16eleqtrrdi 2845 . . . . . . 7 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀𝑦)) ∈ 𝑅)
197 infrelb 12145 . . . . . . 7 ((𝑅 βŠ† ℝ ∧ βˆƒπ‘₯ ∈ ℝ βˆ€π‘€ ∈ 𝑅 π‘₯ ≀ 𝑀 ∧ (π‘β€˜(𝐴𝑀𝑦)) ∈ 𝑅) β†’ inf(𝑅, ℝ, < ) ≀ (π‘β€˜(𝐴𝑀𝑦)))
198189, 190, 196, 197syl3anc 1372 . . . . . 6 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ inf(𝑅, ℝ, < ) ≀ (π‘β€˜(𝐴𝑀𝑦)))
19917, 198eqbrtrid 5141 . . . . 5 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ 𝑆 ≀ (π‘β€˜(𝐴𝑀𝑦)))
20061, 63, 70, 188, 199letrd 11317 . . . 4 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (𝐴𝐷((β‡π‘‘β€˜π½)β€˜πΉ)) ≀ (π‘β€˜(𝐴𝑀𝑦)))
20156, 200eqbrtrrd 5130 . . 3 ((πœ‘ ∧ 𝑦 ∈ π‘Œ) β†’ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦)))
202201ralrimiva 3140 . 2 (πœ‘ β†’ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦)))
203 oveq2 7366 . . . . . 6 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ (𝐴𝑀π‘₯) = (𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ)))
204203fveq2d 6847 . . . . 5 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ (π‘β€˜(𝐴𝑀π‘₯)) = (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))))
205204breq1d 5116 . . . 4 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ ((π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)) ↔ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦))))
206205ralbidv 3171 . . 3 (π‘₯ = ((β‡π‘‘β€˜π½)β€˜πΉ) β†’ (βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)) ↔ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦))))
207206rspcev 3580 . 2 ((((β‡π‘‘β€˜π½)β€˜πΉ) ∈ π‘Œ ∧ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀((β‡π‘‘β€˜π½)β€˜πΉ))) ≀ (π‘β€˜(𝐴𝑀𝑦))) β†’ βˆƒπ‘₯ ∈ π‘Œ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)))
20852, 202, 207syl2anc 585 1 (πœ‘ β†’ βˆƒπ‘₯ ∈ π‘Œ βˆ€π‘¦ ∈ π‘Œ (π‘β€˜(𝐴𝑀π‘₯)) ≀ (π‘β€˜(𝐴𝑀𝑦)))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 397   = wceq 1542   ∈ wcel 2107   β‰  wne 2940  βˆ€wral 3061  βˆƒwrex 3070  Vcvv 3444   ∩ cin 3910   βŠ† wss 3911  βˆ…c0 4283   class class class wbr 5106   ↦ cmpt 5189   Γ— cxp 5632  ran crn 5635   β†Ύ cres 5636  Fun wfun 6491  βŸΆwf 6493  β€˜cfv 6497  (class class class)co 7358  infcinf 9382  β„cr 11055  0cc0 11056  1c1 11057   + caddc 11059   Β· cmul 11061   < clt 11194   ≀ cle 11195   βˆ’ cmin 11390   / cdiv 11817  β„•cn 12158  2c2 12213  β„•0cn0 12418  β„€β‰₯cuz 12768  β„+crp 12920  βŒŠcfl 13701  β†‘cexp 13973   β†Ύt crest 17307  βˆžMetcxmet 20797  Metcmet 20798  MetOpencmopn 20802  Topctop 22258  TopOnctopon 22275  β‡π‘‘clm 22593  Hauscha 22675  NrmCVeccnv 29568  BaseSetcba 29570   βˆ’π‘£ cnsb 29573  normCVcnmcv 29574  IndMetcims 29575  SubSpcss 29705  CPreHilOLDccphlo 29796  CBanccbn 29846
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5243  ax-sep 5257  ax-nul 5264  ax-pow 5321  ax-pr 5385  ax-un 7673  ax-cnex 11112  ax-resscn 11113  ax-1cn 11114  ax-icn 11115  ax-addcl 11116  ax-addrcl 11117  ax-mulcl 11118  ax-mulrcl 11119  ax-mulcom 11120  ax-addass 11121  ax-mulass 11122  ax-distr 11123  ax-i2m1 11124  ax-1ne0 11125  ax-1rid 11126  ax-rnegex 11127  ax-rrecex 11128  ax-cnre 11129  ax-pre-lttri 11130  ax-pre-lttrn 11131  ax-pre-ltadd 11132  ax-pre-mulgt0 11133  ax-pre-sup 11134  ax-addf 11135  ax-mulf 11136
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3352  df-reu 3353  df-rab 3407  df-v 3446  df-sbc 3741  df-csb 3857  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3930  df-nul 4284  df-if 4488  df-pw 4563  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4867  df-int 4909  df-iun 4957  df-iin 4958  df-br 5107  df-opab 5169  df-mpt 5190  df-tr 5224  df-id 5532  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5589  df-we 5591  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-pred 6254  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6499  df-fn 6500  df-f 6501  df-f1 6502  df-fo 6503  df-f1o 6504  df-fv 6505  df-riota 7314  df-ov 7361  df-oprab 7362  df-mpo 7363  df-om 7804  df-1st 7922  df-2nd 7923  df-frecs 8213  df-wrecs 8244  df-recs 8318  df-rdg 8357  df-er 8651  df-map 8770  df-pm 8771  df-en 8887  df-dom 8888  df-sdom 8889  df-fin 8890  df-fi 9352  df-sup 9383  df-inf 9384  df-pnf 11196  df-mnf 11197  df-xr 11198  df-ltxr 11199  df-le 11200  df-sub 11392  df-neg 11393  df-div 11818  df-nn 12159  df-2 12221  df-3 12222  df-4 12223  df-n0 12419  df-z 12505  df-uz 12769  df-q 12879  df-rp 12921  df-xneg 13038  df-xadd 13039  df-xmul 13040  df-ico 13276  df-icc 13277  df-fl 13703  df-seq 13913  df-exp 13974  df-cj 14990  df-re 14991  df-im 14992  df-sqrt 15126  df-abs 15127  df-rest 17309  df-topgen 17330  df-psmet 20804  df-xmet 20805  df-met 20806  df-bl 20807  df-mopn 20808  df-fbas 20809  df-fg 20810  df-top 22259  df-topon 22276  df-bases 22312  df-cld 22386  df-ntr 22387  df-cls 22388  df-nei 22465  df-lm 22596  df-haus 22682  df-fil 23213  df-fm 23305  df-flim 23306  df-flf 23307  df-cfil 24635  df-cau 24636  df-cmet 24637  df-grpo 29477  df-gid 29478  df-ginv 29479  df-gdiv 29480  df-ablo 29529  df-vc 29543  df-nv 29576  df-va 29579  df-ba 29580  df-sm 29581  df-0v 29582  df-vs 29583  df-nmcv 29584  df-ims 29585  df-ssp 29706  df-ph 29797  df-cbn 29847
This theorem is referenced by:  minvecolem5  29865
  Copyright terms: Public domain W3C validator