---

Step * 1 3 1 of Lemma firstn-partition

.....antecedent..... 
1. I : Interval
2. icompact(I)
3. a : ℝ
4. p : ℝ List
5. frs-non-dec(p)
6. i : ℕ||p||
7. a = p[i]
8. left-endpoint(I) ≤ p[0]
9. last(p) ≤ right-endpoint(I)
10. 0 < ||firstn(i;p)||
11. left-endpoint([left-endpoint(I), a]) ≤ firstn(i;p)[0]
⊢ last(firstn(i;p)) ≤ p[i]
BY
{ (Unfold `last` 0
   THEN (RWO "length_firstn" 0 THENA Auto)
   THEN (RWO "length_firstn" (-2) THENA Auto)
   THEN (RWO "select-firstn" 0 THENA Auto)
   THEN BackThruHyp' 5
   THEN Auto) }

---

Latex:

---

Latex:
.....antecedent..... 
1.  I  :  Interval
2.  icompact(I)
3.  a  :  \mBbbR{}
4.  p  :  \mBbbR{}  List
5.  frs-non-dec(p)
6.  i  :  \mBbbN{}||p||
7.  a  =  p[i]
8.  left-endpoint(I)  \mleq{}  p[0]
9.  last(p)  \mleq{}  right-endpoint(I)
10.  0  <  ||firstn(i;p)||
11.  left-endpoint([left-endpoint(I),  a])  \mleq{}  firstn(i;p)[0]
\mvdash{}  last(firstn(i;p))  \mleq{}  p[i]


By

---

Latex:
(Unfold  `last`  0
  THEN  (RWO  "length\_firstn"  0  THENA  Auto)
  THEN  (RWO  "length\_firstn"  (-2)  THENA  Auto)
  THEN  (RWO  "select-firstn"  0  THENA  Auto)
  THEN  BackThruHyp'  5
  THEN  Auto)

---

Home Index