---

Step * 3 1 1 of Lemma generated-s-subgroup_wf


1. sg : s-Group
2. P : Point ⟶ ℙ
3. ∀f:Point. (P[f] ⇒ P[f^-1])
4. ∀g:Point
     ((∃L:Point List. ((∀f∈L.P[f]) ∧ g ≡ reduce(λx,y. (x y);1;L)))
     ⇒ (∃L:Point List. ((∀f∈L.P[f]) ∧ g^-1 ≡ reduce(λx,y. (x y);1;L))))
5. g : Point
6. y : Point
7. L1 : Point List
8. (∀f∈L1.P[f])
9. g ≡ reduce(λx,y. (x y);1;L1)
10. v : Point
⊢ y ≡ v ⇒ (g y) ≡ reduce(λx,y. (x y);v;L1)
BY
{ ((RWO  "-2" 0 THENA Auto) THEN ThinVar `g' THEN MoveToConcl (-1) THEN MoveToConcl (-3)) }

1
1. sg : s-Group
2. P : Point ⟶ ℙ
3. ∀f:Point. (P[f] ⇒ P[f^-1])
4. ∀g:Point
     ((∃L:Point List. ((∀f∈L.P[f]) ∧ g ≡ reduce(λx,y. (x y);1;L)))
     ⇒ (∃L:Point List. ((∀f∈L.P[f]) ∧ g^-1 ≡ reduce(λx,y. (x y);1;L))))
5. L1 : Point List
6. (∀f∈L1.P[f])
⊢ ∀y,v:Point.  (y ≡ v ⇒ (reduce(λx,y. (x y);1;L1) y) ≡ reduce(λx,y. (x y);v;L1))

---

Latex:

---

Latex:

1.  sg  :  s-Group
2.  P  :  Point  {}\mrightarrow{}  \mBbbP{}
3.  \mforall{}f:Point.  (P[f]  {}\mRightarrow{}  P[f\^{}-1])
4.  \mforall{}g:Point
          ((\mexists{}L:Point  List.  ((\mforall{}f\mmember{}L.P[f])  \mwedge{}  g  \mequiv{}  reduce(\mlambda{}x,y.  (x  y);1;L)))
          {}\mRightarrow{}  (\mexists{}L:Point  List.  ((\mforall{}f\mmember{}L.P[f])  \mwedge{}  g\^{}-1  \mequiv{}  reduce(\mlambda{}x,y.  (x  y);1;L))))
5.  g  :  Point
6.  y  :  Point
7.  L1  :  Point  List
8.  (\mforall{}f\mmember{}L1.P[f])
9.  g  \mequiv{}  reduce(\mlambda{}x,y.  (x  y);1;L1)
10.  v  :  Point
\mvdash{}  y  \mequiv{}  v  {}\mRightarrow{}  (g  y)  \mequiv{}  reduce(\mlambda{}x,y.  (x  y);v;L1)


By

---

Latex:
((RWO    "-2"  0  THENA  Auto)  THEN  ThinVar  `g'  THEN  MoveToConcl  (-1)  THEN  MoveToConcl  (-3))

---

Home Index