Step
*
2
1
1
1
1
1
1
1
of Lemma
bfs-rm0-equiv
1. K : RngSig
2. S : Type
3. eq : EqDecider(|K|)
4. EquivRel(bag(|K| × S);a,b.bfs-equiv(K;S;a;b))
5. u1 : |K|
6. u2 : S
7. v : (|K| × S) List
8. bfs-equiv(K;S;bfs-rm0(K;eq;v);v)
9. u1 = 0 ∈ |K|
⊢ {<0, u2>} = ({} + 0 * {u2}) ∈ basic-formal-sum(K;S)
BY
{ ((Subst' {} + 0 * {u2} ~ {<0, u2>} 0 THENA Computation) THEN Auto) }
Latex:
Latex:
1.  K  :  RngSig
2.  S  :  Type
3.  eq  :  EqDecider(|K|)
4.  EquivRel(bag(|K|  \mtimes{}  S);a,b.bfs-equiv(K;S;a;b))
5.  u1  :  |K|
6.  u2  :  S
7.  v  :  (|K|  \mtimes{}  S)  List
8.  bfs-equiv(K;S;bfs-rm0(K;eq;v);v)
9.  u1  =  0
\mvdash{}  \{ɘ,  u2>\}  =  (\{\}  +  0  *  \{u2\})
By
Latex:
((Subst'  \{\}  +  0  *  \{u2\}  \msim{}  \{ɘ,  u2>\}  0  THENA  Computation)  THEN  Auto)
Home
Index