Step
*
1
2
2
1
1
of Lemma
permutation-generators5
.....subterm..... T:t
2:n
1. n : ℕ
2. P : {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)}  ⟶ ℙ
3. P[λx.x]
4. ∀f:{f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} . ∀i:ℕn - 1.  (P[f] 
⇒ P[f o (i, i + 1)])
5. d : ℤ
6. 0 < d
7. ∀f:{f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} . ∀i,j:ℕn.  P[f] 
⇒ P[f o (i, j)] supposing (¬(i = j ∈ ℤ)) ∧ (|i - j| ≤ ((d - 1) + 1))
8. f : {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} 
9. i : ℕn
10. j : ℕn
11. ¬(i = j ∈ ℤ)
12. |i - j| ≤ (d + 1)
13. P[f]
14. ∀f:{f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} . ∀i,j:ℕn.  P[f] 
⇒ P[f o (i, j)] supposing i < j ∧ (|i - j| ≤ (d + 1))
15. ¬i < j
16. |i - j| = |j - i| ∈ ℤ
17. P[f o (j, i)]
⊢ (f o (i, j)) = (f o (j, i)) ∈ {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)} 
BY
{ ((Assert f o (i, j) ∈ {f:ℕn ⟶ ℕn| Inj(ℕn;ℕn;f)}  BY
          (BLemma `compose-injections` THEN Auto))
   THEN (MemTypeHD (-1) THENA Auto)
   THEN EqTypeCD
   THEN Auto) }
Latex:
Latex:
.....subterm.....  T:t
2:n
1.  n  :  \mBbbN{}
2.  P  :  \{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}    {}\mrightarrow{}  \mBbbP{}
3.  P[\mlambda{}x.x]
4.  \mforall{}f:\{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}  .  \mforall{}i:\mBbbN{}n  -  1.    (P[f]  {}\mRightarrow{}  P[f  o  (i,  i  +  1)])
5.  d  :  \mBbbZ{}
6.  0  <  d
7.  \mforall{}f:\{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}  .  \mforall{}i,j:\mBbbN{}n.
          P[f]  {}\mRightarrow{}  P[f  o  (i,  j)]  supposing  (\mneg{}(i  =  j))  \mwedge{}  (|i  -  j|  \mleq{}  ((d  -  1)  +  1))
8.  f  :  \{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\} 
9.  i  :  \mBbbN{}n
10.  j  :  \mBbbN{}n
11.  \mneg{}(i  =  j)
12.  |i  -  j|  \mleq{}  (d  +  1)
13.  P[f]
14.  \mforall{}f:\{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}  .  \mforall{}i,j:\mBbbN{}n.
            P[f]  {}\mRightarrow{}  P[f  o  (i,  j)]  supposing  i  <  j  \mwedge{}  (|i  -  j|  \mleq{}  (d  +  1))
15.  \mneg{}i  <  j
16.  |i  -  j|  =  |j  -  i|
17.  P[f  o  (j,  i)]
\mvdash{}  (f  o  (i,  j))  =  (f  o  (j,  i))
By
Latex:
((Assert  f  o  (i,  j)  \mmember{}  \{f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n|  Inj(\mBbbN{}n;\mBbbN{}n;f)\}    BY
                (BLemma  `compose-injections`  THEN  Auto))
  THEN  (MemTypeHD  (-1)  THENA  Auto)
  THEN  EqTypeCD
  THEN  Auto)
Home
Index