---

Step * 1 1 1 1 1 of Lemma extend_restrict_perm_cancel


1. n : {1...}
2. p : Perm(ℕn)
3. InvFuns(ℕn;ℕn;p.f;p.b)
4. (p.f (n - 1)) = (n - 1) ∈ ℕn
⊢ p = mk_perm(λi.if (i =z n - 1) then i else p.f i fi ;λi.if (i =z n - 1) then i else p.b i fi ) ∈ perm_sig(ℕn)
BY
{ (RWN 1 (RevLemmaC `mk_perm_eta_rw`) 0 THENA Auto) }

1
1. n : {1...}
2. p : Perm(ℕn)
3. InvFuns(ℕn;ℕn;p.f;p.b)
4. (p.f (n - 1)) = (n - 1) ∈ ℕn
⊢ mk_perm(p.f;p.b)
= mk_perm(λi.if (i =z n - 1) then i else p.f i fi ;λi.if (i =z n - 1) then i else p.b i fi )
∈ perm_sig(ℕn)

---

Latex:

---

Latex:

1.  n  :  \{1...\}
2.  p  :  Perm(\mBbbN{}n)
3.  InvFuns(\mBbbN{}n;\mBbbN{}n;p.f;p.b)
4.  (p.f  (n  -  1))  =  (n  -  1)
\mvdash{}  p  =  mk\_perm(\mlambda{}i.if  (i  =\msubz{}  n  -  1)  then  i  else  p.f  i  fi  ;\mlambda{}i.if  (i  =\msubz{}  n  -  1)  then  i  else  p.b  i  fi  )


By

---

Latex:
(RWN  1  (RevLemmaC  `mk\_perm\_eta\_rw`)  0  THENA  Auto)

---

Home Index