Step * 2 2 of Lemma upto_decomp1


1. : ℕ+
2. upto(n) upto(n 1) map(λx.(x (n 1));upto(n 1))
⊢ [n 1] map(λx.(x (n 1));upto(1))
BY
Unfold `upto` 0
THEN (RWO "from-upto-shift" THENA Auto) }

1
1. : ℕ+
2. upto(n) upto(n 1) map(λx.(x (n 1));upto(n 1))
⊢ [n 1] [0 (n 1), (n 1))


Latex:


Latex:

1.  n  :  \mBbbN{}\msupplus{}
2.  upto(n)  \msim{}  upto(n  -  1)  @  map(\mlambda{}x.(x  +  (n  -  1));upto(n  -  n  -  1))
\mvdash{}  [n  -  1]  \msim{}  map(\mlambda{}x.(x  +  (n  -  1));upto(1))


By


Latex:
Unfold  `upto`  0
THEN  (RWO  "from-upto-shift"  0  THENA  Auto)




Home Index