Step * 1 1 3 1 1 of Lemma partition-sum_functionality


1. Interval
2. icompact(I)
3. partition(I)
4. : ℝ List
5. ||q|| ||p|| ∈ ℤ
6. ∀i:ℕ||q||. (q[i] p[i])
7. I ⟶ℝ
8. partition-choice(full-partition(I;p))
9. ||full-partition(I;q)|| ||full-partition(I;p)|| ∈ ℤ
10. ∀i:ℕ((i ≤ (||full-partition(I;p)|| 1))  (full-partition(I;q)[i] ∈ ℝ))
11. : ℤ
12. 0 ≤ i
13. i ≤ (||full-partition(I;p)|| 2)
14. (x i) ∈ ℝ
15. : ℝ
16. (f (x i)) v ∈ ℝ
17. i1 : ℕ
18. i1 ≤ (||full-partition(I;p)|| 1)
⊢ full-partition(I;q)[i1] full-partition(I;p)[i1]
BY
xxx(RepUR ``full-partition`` 0
      THEN CaseNat `i1'
      THEN Reduce 0
      THEN Auto
      THEN RWO "select-cons-tl" 0
      THEN Auto
      THEN (RWO "select-append" THENA Auto)
      THEN AutoSplit)xxx }

1
1. Interval
2. icompact(I)
3. partition(I)
4. : ℝ List
5. ||q|| ||p|| ∈ ℤ
6. ∀i:ℕ||q||. (q[i] p[i])
7. I ⟶ℝ
8. partition-choice(full-partition(I;p))
9. ||full-partition(I;q)|| ||full-partition(I;p)|| ∈ ℤ
10. ∀i:ℕ((i ≤ (||full-partition(I;p)|| 1))  (full-partition(I;q)[i] ∈ ℝ))
11. : ℤ
12. 0 ≤ i
13. i ≤ (||full-partition(I;p)|| 2)
14. (x i) ∈ ℝ
15. : ℝ
16. (f (x i)) v ∈ ℝ
17. i1 : ℕ
18. ¬i1 1 < ||q||
19. i1 ≤ (||full-partition(I;p)|| 1)
20. ¬(i1 0 ∈ ℤ)
⊢ [right-endpoint(I)][i1 ||q||] [right-endpoint(I)][i1 ||p||]


Latex:


Latex:

1.  I  :  Interval
2.  icompact(I)
3.  p  :  partition(I)
4.  q  :  \mBbbR{}  List
5.  ||q||  =  ||p||
6.  \mforall{}i:\mBbbN{}||q||.  (q[i]  =  p[i])
7.  f  :  I  {}\mrightarrow{}\mBbbR{}
8.  x  :  partition-choice(full-partition(I;p))
9.  ||full-partition(I;q)||  =  ||full-partition(I;p)||
10.  \mforall{}i:\mBbbN{}.  ((i  \mleq{}  (||full-partition(I;p)||  -  1))  {}\mRightarrow{}  (full-partition(I;q)[i]  \mmember{}  \mBbbR{}))
11.  i  :  \mBbbZ{}
12.  0  \mleq{}  i
13.  i  \mleq{}  (||full-partition(I;p)||  -  2)
14.  f  (x  i)  \mmember{}  \mBbbR{}
15.  v  :  \mBbbR{}
16.  (f  (x  i))  =  v
17.  i1  :  \mBbbN{}
18.  i1  \mleq{}  (||full-partition(I;p)||  -  1)
\mvdash{}  full-partition(I;q)[i1]  =  full-partition(I;p)[i1]


By


Latex:
xxx(RepUR  ``full-partition``  0
        THEN  CaseNat  0  `i1'
        THEN  Reduce  0
        THEN  Auto
        THEN  RWO  "select-cons-tl"  0
        THEN  Auto
        THEN  (RWO  "select-append"  0  THENA  Auto)
        THEN  AutoSplit)xxx




Home Index