---

Step * 2 1 2 1 of Lemma tl_perm_wf

.....subterm..... T:t
1:n
1. n : ℕ+
2. p : Perm(ℕn)
3. tl_perm(p) ∈ Perm(ℕn)
4. x : ℕ+n
⊢ (tl_perm(p).f (tl_perm(p).b x)) = x ∈ ℕ+n
BY
{ ((Assert x = (tl_perm(p).f (tl_perm(p).b x)) ∈ ℤ BY
          (RWH (LemmaWithC [`T',ℕn] `perm_f_b_cancel`) 0 THEN Auto))
   THEN (SwapEquands 0 THEN EqTypeCD)
   THEN Auto) }

---

Latex:

---

Latex:
.....subterm.....  T:t
1:n
1.  n  :  \mBbbN{}\msupplus{}
2.  p  :  Perm(\mBbbN{}n)
3.  tl\_perm(p)  \mmember{}  Perm(\mBbbN{}n)
4.  x  :  \mBbbN{}\msupplus{}n
\mvdash{}  (tl\_perm(p).f  (tl\_perm(p).b  x))  =  x


By

---

Latex:
((Assert  x  =  (tl\_perm(p).f  (tl\_perm(p).b  x))  BY
                (RWH  (LemmaWithC  [`T',\mBbbN{}n]  `perm\_f\_b\_cancel`)  0  THEN  Auto))
  THEN  (SwapEquands  0  THEN  EqTypeCD)
  THEN  Auto)

---

Home Index