---

Step * of Lemma the-member-bag-rep

∀[T:Type]. ∀[n:ℕ]. ∀[a:T].  a ↓∈ bag-rep(n;a) supposing 0 < n
BY
{ (Auto THEN Unfold `bag-rep` 0 THEN RWO "primrec-unroll" 0 THEN Reduce 0 THEN Auto THEN SplitOnConclITE THEN Auto) }

1
.....falsecase..... 
1. T : Type
2. n : ℕ
3. a : T
4. 0 < n
5. ¬(n = 0 ∈ ℤ)
⊢ a ↓∈ a.primrec(n - 1;{};λi,r. a.r)

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[n:\mBbbN{}].  \mforall{}[a:T].    a  \mdownarrow{}\mmember{}  bag-rep(n;a)  supposing  0  <  n


By

---

Latex:
(Auto
  THEN  Unfold  `bag-rep`  0
  THEN  RWO  "primrec-unroll"  0
  THEN  Reduce  0
  THEN  Auto
  THEN  SplitOnConclITE
  THEN  Auto)

---

Home Index