---

Step * 2 1 1 1 of Lemma ccc-nset-weakly-decidable


1. d : ℕ
2. ∀d:ℕd. ∀K:Type.
     (((K ⊆r ℕ) ∧ K ∧ CCC(K)) ⇒ (∀m,k:K.  (k - m < d ⇒ (∀j:K. (m ≤ j)) ⇒ (∀l:{m..k-}. ((l ∈ K) ∨ (¬(l ∈ K)))))))
3. K : Type
4. (K ⊆r ℕ) ∧ K ∧ CCC(K)
5. m : K
6. k : K
7. k - m < d
8. ∀j:K. (m ≤ j)
9. l : {m..k-}
10. CCCNSet({k:K| ¬(k = m ∈ ℤ)} )
⊢ (l ∈ K) ∨ (¬(l ∈ K))
BY
{ (((InstLemma `ccc-nset-minimum` [⌜{k:K| ¬(k = m ∈ ℤ)} ⌝]⋅ THENA Auto) THEN D -1)
   THEN (InstHyp [⌜d - 1⌝;⌜{k:K| ¬(k = m ∈ ℤ)} ⌝;⌜n⌝;⌜k⌝] 2⋅ THENA Auto)
   ) }

1
1. d : ℕ
2. ∀d:ℕd. ∀K:Type.
     (((K ⊆r ℕ) ∧ K ∧ CCC(K)) ⇒ (∀m,k:K.  (k - m < d ⇒ (∀j:K. (m ≤ j)) ⇒ (∀l:{m..k-}. ((l ∈ K) ∨ (¬(l ∈ K)))))))
3. K : Type
4. K ⊆r ℕ
5. K
6. CCC(K)
7. m : K
8. k : K
9. k - m < d
10. ∀j:K. (m ≤ j)
11. l : {m..k-}
12. CCCNSet({k:K| ¬(k = m ∈ ℤ)} )
13. n : {k:K| ¬(k = m ∈ ℤ)} 
14. ∀m:{k:K| ¬(k = m ∈ ℤ)} . (n ≤ m)
⊢ k - n < d - 1

2
1. d : ℕ
2. ∀d:ℕd. ∀K:Type.
     (((K ⊆r ℕ) ∧ K ∧ CCC(K)) ⇒ (∀m,k:K.  (k - m < d ⇒ (∀j:K. (m ≤ j)) ⇒ (∀l:{m..k-}. ((l ∈ K) ∨ (¬(l ∈ K)))))))
3. K : Type
4. (K ⊆r ℕ) ∧ K ∧ CCC(K)
5. m : K
6. k : K
7. k - m < d
8. ∀j:K. (m ≤ j)
9. l : {m..k-}
10. CCCNSet({k:K| ¬(k = m ∈ ℤ)} )
11. n : {k:K| ¬(k = m ∈ ℤ)} 
12. ∀m:{k:K| ¬(k = m ∈ ℤ)} . (n ≤ m)
13. ∀l:{n..k-}. ((l ∈ {k:K| ¬(k = m ∈ ℤ)} ) ∨ (¬(l ∈ {k:K| ¬(k = m ∈ ℤ)} )))
⊢ (l ∈ K) ∨ (¬(l ∈ K))

---

Latex:

---

Latex:

1.  d  :  \mBbbN{}
2.  \mforall{}d:\mBbbN{}d.  \mforall{}K:Type.
          (((K  \msubseteq{}r  \mBbbN{})  \mwedge{}  K  \mwedge{}  CCC(K))
          {}\mRightarrow{}  (\mforall{}m,k:K.    (k  -  m  <  d  {}\mRightarrow{}  (\mforall{}j:K.  (m  \mleq{}  j))  {}\mRightarrow{}  (\mforall{}l:\{m..k\msupminus{}\}.  ((l  \mmember{}  K)  \mvee{}  (\mneg{}(l  \mmember{}  K)))))))
3.  K  :  Type
4.  (K  \msubseteq{}r  \mBbbN{})  \mwedge{}  K  \mwedge{}  CCC(K)
5.  m  :  K
6.  k  :  K
7.  k  -  m  <  d
8.  \mforall{}j:K.  (m  \mleq{}  j)
9.  l  :  \{m..k\msupminus{}\}
10.  CCCNSet(\{k:K|  \mneg{}(k  =  m)\}  )
\mvdash{}  (l  \mmember{}  K)  \mvee{}  (\mneg{}(l  \mmember{}  K))


By

---

Latex:
(((InstLemma  `ccc-nset-minimum`  [\mkleeneopen{}\{k:K|  \mneg{}(k  =  m)\}  \mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  D  -1)
  THEN  (InstHyp  [\mkleeneopen{}d  -  1\mkleeneclose{};\mkleeneopen{}\{k:K|  \mneg{}(k  =  m)\}  \mkleeneclose{};\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}k\mkleeneclose{}]  2\mcdot{}  THENA  Auto)
  )

---

Home Index