---

Step * 1 of Lemma rleq-infn


1. I : {I:Interval| icompact(I)} 
2. n : ℤ
3. f : {f:I^0 ⟶ ℝ| ∀a,b:I^0.  (req-vec(0;a;b) ⇒ ((f a) = (f b)))} 
4. c : ℝ
5. ∀a:I^0. (c ≤ (f a))
⊢ c ≤ (infn(0;I) f)
BY
{ ((Assert ⋅ ∈ I^0 BY
          (SubsumeC ⌜Top⌝⋅
           THEN Auto
           THEN (D 0 THENA Auto)
           THEN (Unfold `interval-vec` 0 THEN MemTypeCD THEN Auto)
           THEN Unfold `real-vec` 0
           THEN FunExt
           THEN Auto))
   THEN (D -2 With ⌜⋅⌝  THENA Auto)
   THEN RepUR ``infn`` 0
   THEN Auto) }

---

Latex:

---

Latex:

1.  I  :  \{I:Interval|  icompact(I)\} 
2.  n  :  \mBbbZ{}
3.  f  :  \{f:I\^{}0  {}\mrightarrow{}  \mBbbR{}|  \mforall{}a,b:I\^{}0.    (req-vec(0;a;b)  {}\mRightarrow{}  ((f  a)  =  (f  b)))\} 
4.  c  :  \mBbbR{}
5.  \mforall{}a:I\^{}0.  (c  \mleq{}  (f  a))
\mvdash{}  c  \mleq{}  (infn(0;I)  f)


By

---

Latex:
((Assert  \mcdot{}  \mmember{}  I\^{}0  BY
                (SubsumeC  \mkleeneopen{}Top\mkleeneclose{}\mcdot{}
                  THEN  Auto
                  THEN  (D  0  THENA  Auto)
                  THEN  (Unfold  `interval-vec`  0  THEN  MemTypeCD  THEN  Auto)
                  THEN  Unfold  `real-vec`  0
                  THEN  FunExt
                  THEN  Auto))
  THEN  (D  -2  With  \mkleeneopen{}\mcdot{}\mkleeneclose{}    THENA  Auto)
  THEN  RepUR  ``infn``  0
  THEN  Auto)

---

Home Index