---

Step * 3 1 of Lemma fs-in-subtype-subspace


1. K : CRng
2. S : Type
3. T : Type
4. strong-subtype(T;S)
5. T ⊆r S
6. respects-equality(S;T)
7. ∀[a,b:S].  (a = b ∈ T ∈ ℙ)
8. ∀f,y:Point(free-vs(K;S)).  (fs-in-subtype(K;S;T;f) ⇒ fs-in-subtype(K;S;T;y) ⇒ fs-in-subtype(K;S;T;f + y))
9. f : Point(free-vs(K;S))
10. a : |K|
11. b : basic-formal-sum(K;S)
12. f = b ∈ formal-sum(K;S)
13. bfs-predicate(K;S;p.snd(p) ∈ T;b)
⊢ a * f = a * b ∈ formal-sum(K;S)
BY
{ ((Subst' a * b ~ a * b 0 THENA Computation) THEN EqCD THEN Auto) }

---

Latex:

---

Latex:

1.  K  :  CRng
2.  S  :  Type
3.  T  :  Type
4.  strong-subtype(T;S)
5.  T  \msubseteq{}r  S
6.  respects-equality(S;T)
7.  \mforall{}[a,b:S].    (a  =  b  \mmember{}  \mBbbP{})
8.  \mforall{}f,y:Point(free-vs(K;S)).
          (fs-in-subtype(K;S;T;f)  {}\mRightarrow{}  fs-in-subtype(K;S;T;y)  {}\mRightarrow{}  fs-in-subtype(K;S;T;f  +  y))
9.  f  :  Point(free-vs(K;S))
10.  a  :  |K|
11.  b  :  basic-formal-sum(K;S)
12.  f  =  b
13.  bfs-predicate(K;S;p.snd(p)  \mmember{}  T;b)
\mvdash{}  a  *  f  =  a  *  b


By

---

Latex:
((Subst'  a  *  b  \msim{}  a  *  b  0  THENA  Computation)  THEN  EqCD  THEN  Auto)

---

Home Index