Step
*
of Lemma
sg-id-op
∀[sg:s-Group]. ∀[x:Point].  (1 x) ≡ x
BY
{ (Auto
   THEN ((InstLemma  `sg-op-inv` [⌜sg⌝;⌜x⌝]⋅ THENA Auto) THEN (RWO "-1<" 0 THENA Auto))
   THEN (InstLemma  `sg-op-inv` [⌜sg⌝;⌜x^-1⌝]⋅ THENA Auto)) }
1
1. sg : s-Group
2. x : Point
3. (x x^-1) ≡ 1
4. (x^-1 x^-1^-1) ≡ 1
⊢ ((x x^-1) x) ≡ x
Latex:
Latex:
\mforall{}[sg:s-Group].  \mforall{}[x:Point].    (1  x)  \mequiv{}  x
By
Latex:
(Auto
  THEN  ((InstLemma    `sg-op-inv`  [\mkleeneopen{}sg\mkleeneclose{};\mkleeneopen{}x\mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  (RWO  "-1<"  0  THENA  Auto))
  THEN  (InstLemma    `sg-op-inv`  [\mkleeneopen{}sg\mkleeneclose{};\mkleeneopen{}x\^{}-1\mkleeneclose{}]\mcdot{}  THENA  Auto))
Home
Index