Step
*
1
1
1
1
of Lemma
formal-sum-mul_functionality
.....subterm..... T:t
2:n
1. S : Type
2. K : CRng
3. x : basic-formal-sum(K;S)
4. x' : basic-formal-sum(K;S)
5. k : |K|
6. k' : |K|
7. k = k' ∈ |K|
8. bfs-equiv(K;S;x;x')
9. x1 : basic-formal-sum(K;S)
10. y : basic-formal-sum(K;S)
11. s : bag(S)
12. x1 = (y + 0 * s) ∈ basic-formal-sum(K;S)
⊢ k * 0 * s = 0 * s ∈ bag(|K| × S)
BY
{ (RepUR ``formal-sum-mul zero-bfs`` 0
   THEN (RWO "bag-map-map" 0 THENA Auto)
   THEN EqCDA
   THEN (FunExt THENA Auto)
   THEN Reduce 0
   THEN EqCDA
   THEN Auto) }
Latex:
Latex:
.....subterm.....  T:t
2:n
1.  S  :  Type
2.  K  :  CRng
3.  x  :  basic-formal-sum(K;S)
4.  x'  :  basic-formal-sum(K;S)
5.  k  :  |K|
6.  k'  :  |K|
7.  k  =  k'
8.  bfs-equiv(K;S;x;x')
9.  x1  :  basic-formal-sum(K;S)
10.  y  :  basic-formal-sum(K;S)
11.  s  :  bag(S)
12.  x1  =  (y  +  0  *  s)
\mvdash{}  k  *  0  *  s  =  0  *  s
By
Latex:
(RepUR  ``formal-sum-mul  zero-bfs``  0
  THEN  (RWO  "bag-map-map"  0  THENA  Auto)
  THEN  EqCDA
  THEN  (FunExt  THENA  Auto)
  THEN  Reduce  0
  THEN  EqCDA
  THEN  Auto)
Home
Index