Step * of Lemma upto_decomp1

[n:ℕ+]. (upto(n) upto(n 1) [n 1])
BY
(D THENA Auto)
THEN (InstLemma `upto_decomp` [⌜n⌝;⌜1⌝]⋅ THENA Auto)
THEN NthHypSq (-1)
THEN RepeatFor (EqCD) }

1
1. : ℕ+
2. upto(n) upto(n 1) map(λx.(x (n 1));upto(n 1))
⊢ upto(n 1) upto(n 1)

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


Latex:


Latex:
\mforall{}[n:\mBbbN{}\msupplus{}].  (upto(n)  \msim{}  upto(n  -  1)  @  [n  -  1])


By


Latex:
(D  0  THENA  Auto)
THEN  (InstLemma  `upto\_decomp`  [\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}n  -  1\mkleeneclose{}]\mcdot{}  THENA  Auto)
THEN  NthHypSq  (-1)
THEN  RepeatFor  2  (EqCD)




Home Index