Step
*
1
1
of Lemma
name-morph-flips-commute
.....assertion..... 
1. I : Cname List
2. x : name-morph(I;[])
3. i : nameset(I)
4. j : nameset(I)
5. x1 : nameset(I)
⊢ (flip(flip(x;j);i) x1) = (flip(flip(x;i);j) x1) ∈ ℕ2
BY
{ (RepUR ``name-morph-flip`` 0
   THEN (BoolCase ⌜eq-cname(x1;i)⌝⋅ THENA Auto)
   THEN (BoolCase ⌜eq-cname(x1;j)⌝⋅ THENA Auto)
   THEN GenConcl ⌜(x x1) = a ∈ ℕ2⌝⋅
   THEN Auto) }
Latex:
Latex:
.....assertion..... 
1.  I  :  Cname  List
2.  x  :  name-morph(I;[])
3.  i  :  nameset(I)
4.  j  :  nameset(I)
5.  x1  :  nameset(I)
\mvdash{}  (flip(flip(x;j);i)  x1)  =  (flip(flip(x;i);j)  x1)
By
Latex:
(RepUR  ``name-morph-flip``  0
  THEN  (BoolCase  \mkleeneopen{}eq-cname(x1;i)\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  (BoolCase  \mkleeneopen{}eq-cname(x1;j)\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  GenConcl  \mkleeneopen{}(x  x1)  =  a\mkleeneclose{}\mcdot{}
  THEN  Auto)
Home
Index