Step * 1 of Lemma flip-adjacent

.....assertion..... 
1. : ℕ
⊢ ∀k:ℕ. ∀j:ℕn. ∀i:ℕj.
    (((j i) ≤ k)  (∀f:ℕn ⟶ ℕn. ∃L:ℕList. (((i, j) f) reduce(λi,g. ((i, 1) g);f;L) ∈ (ℕn ⟶ ℕn))))
BY
(InductionOnNat THEN Auto' THEN Decide (j i) ≤ (k 1) THEN Auto) }

1
1. : ℕ
2. : ℤ
3. [%1] 0 < k
4. ∀j:ℕn. ∀i:ℕj.
     (((j i) ≤ (k 1))
      (∀f:ℕn ⟶ ℕn. ∃L:ℕList. (((i, j) f) reduce(λi,g. ((i, 1) g);f;L) ∈ (ℕn ⟶ ℕn))))
5. : ℕn
6. : ℕj
7. (j i) ≤ k
8. : ℕn ⟶ ℕn
9. ¬((j i) ≤ (k 1))
⊢ ∃L:ℕList. (((i, j) f) reduce(λi,g. ((i, 1) g);f;L) ∈ (ℕn ⟶ ℕn))


Latex:


Latex:
.....assertion..... 
1.  n  :  \mBbbN{}
\mvdash{}  \mforall{}k:\mBbbN{}.  \mforall{}j:\mBbbN{}n.  \mforall{}i:\mBbbN{}j.
        (((j  -  i)  \mleq{}  k)
        {}\mRightarrow{}  (\mforall{}f:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}n.  \mexists{}L:\mBbbN{}n  -  1  List.  (((i,  j)  o  f)  =  reduce(\mlambda{}i,g.  ((i,  i  +  1)  o  g);f;L))))


By


Latex:
(InductionOnNat  THEN  Auto'  THEN  Decide  (j  -  i)  \mleq{}  (k  -  1)  THEN  Auto)




Home Index