---

Step * 1 1 1 2 1 of Lemma bounded-decidable-nset-finite

.....aux..... 
1. K : Type
2. K ⊆r ℕ
3. d : ∀l:ℕ. ((l ∈ K) ∨ (¬(l ∈ K)))
4. B : ℕ
5. ∀k:K. (k ≤ B)
6. K ⊆r ℕB + 1
7. ∀i:ℕ. ((i ∈ upto(B + 1)) ⇐⇒ i < B + 1)
8. filter(λl.isl(d l);upto(B + 1)) ∈ {x:ℕ| ↑isl(d x)}  List
9. filter(λl.isl(d l);upto(B + 1)) ∈ K List
10. x : K
⊢ (x ∈ upto(B + 1))
BY
{ ((Assert x ≤ B BY Auto) THEN (Assert x < B + 1 BY Auto) THEN Auto) }

---

Latex:

---

Latex:
.....aux..... 
1.  K  :  Type
2.  K  \msubseteq{}r  \mBbbN{}
3.  d  :  \mforall{}l:\mBbbN{}.  ((l  \mmember{}  K)  \mvee{}  (\mneg{}(l  \mmember{}  K)))
4.  B  :  \mBbbN{}
5.  \mforall{}k:K.  (k  \mleq{}  B)
6.  K  \msubseteq{}r  \mBbbN{}B  +  1
7.  \mforall{}i:\mBbbN{}.  ((i  \mmember{}  upto(B  +  1))  \mLeftarrow{}{}\mRightarrow{}  i  <  B  +  1)
8.  filter(\mlambda{}l.isl(d  l);upto(B  +  1))  \mmember{}  \{x:\mBbbN{}|  \muparrow{}isl(d  x)\}    List
9.  filter(\mlambda{}l.isl(d  l);upto(B  +  1))  \mmember{}  K  List
10.  x  :  K
\mvdash{}  (x  \mmember{}  upto(B  +  1))


By

---

Latex:
((Assert  x  \mleq{}  B  BY  Auto)  THEN  (Assert  x  <  B  +  1  BY  Auto)  THEN  Auto)

---

Home Index