---

Step * 1 1 1 1 2 of Lemma fps-Pascal-iff


1. r : CRng
2. x : Atom
3. y : Atom
4. f : PowerSeries(r)
5. ¬(x = y ∈ Atom)
6. ∀b:bag(Atom). ((f (({x} + {y}) + b)) = ((f ({x} + b)) +r (f ({y} + b))) ∈ |r|)
7. b : bag(Atom)
8. x1 : bag(Atom)
9. x2 : bag(Atom)
10. b = ({x} + x2) ∈ bag(Atom)
11. b = ({y} + x1) ∈ bag(Atom)
12. a1 : bag(Atom)
13. x1 = ({x} + a1) ∈ bag(Atom)
14. as : bag(Atom)
15. x2 = ({y} + a1) ∈ bag(Atom)
⊢ ((f b) +r ((-r (f x1)) +r (-r (f x2)))) = 0 ∈ |r|
BY
{ (Eliminate ⌜x2⌝⋅
   THEN Auto
   THEN (HypSubst' -5 0 THENA Auto)
   THEN RWO "bag-append-assoc<" 0
   THEN Auto
   THEN RWO  "7" 0
   THEN Auto
   THEN Eliminate ⌜x1⌝⋅
   THEN Auto
   THEN (RW RngNormC 0 THEN Auto)⋅) }

---

Latex:

---

Latex:

1.  r  :  CRng
2.  x  :  Atom
3.  y  :  Atom
4.  f  :  PowerSeries(r)
5.  \mneg{}(x  =  y)
6.  \mforall{}b:bag(Atom).  ((f  ((\{x\}  +  \{y\})  +  b))  =  ((f  (\{x\}  +  b))  +r  (f  (\{y\}  +  b))))
7.  b  :  bag(Atom)
8.  x1  :  bag(Atom)
9.  x2  :  bag(Atom)
10.  b  =  (\{x\}  +  x2)
11.  b  =  (\{y\}  +  x1)
12.  a1  :  bag(Atom)
13.  x1  =  (\{x\}  +  a1)
14.  as  :  bag(Atom)
15.  x2  =  (\{y\}  +  a1)
\mvdash{}  ((f  b)  +r  ((-r  (f  x1))  +r  (-r  (f  x2))))  =  0


By

---

Latex:
(Eliminate  \mkleeneopen{}x2\mkleeneclose{}\mcdot{}
  THEN  Auto
  THEN  (HypSubst'  -5  0  THENA  Auto)
  THEN  RWO  "bag-append-assoc<"  0
  THEN  Auto
  THEN  RWO    "7"  0
  THEN  Auto
  THEN  Eliminate  \mkleeneopen{}x1\mkleeneclose{}\mcdot{}
  THEN  Auto
  THEN  (RW  RngNormC  0  THEN  Auto)\mcdot{})

---

Home Index