Step
*
of Lemma
natset-transitive
∀n:ℕ. transitive-set(natset(n))
BY
{ (Unfold `natset` 0 THEN InductionOnNat THEN Reduce 0 THEN Auto) }
1
.....upcase..... 
1. n : ℤ
2. [%1] : 0 < n
3. transitive-set(primrec(n - 1;{};λi,r. (r)+))
⊢ transitive-set(primrec(n;{};λi,r. (r)+))
Latex:
Latex:
\mforall{}n:\mBbbN{}.  transitive-set(natset(n))
By
Latex:
(Unfold  `natset`  0  THEN  InductionOnNat  THEN  Reduce  0  THEN  Auto)
Home
Index