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<THENA Auto))
   THEN (InstLemma  `sg-op-inv` [⌜sg⌝;⌜x^-1⌝]⋅ THENA Auto)) }

1
1. sg s-Group
2. 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