Step
*
1
of Lemma
afcs-contradicts-markov
1. ∃a:ℕ ⟶ ℕ. (is-absolutely-free{i:l}(a) ∧ init0(a) ∧ increasing-sequence(a))
2. ∀A:ℕ ⟶ ℙ. ((∀n:ℕ. ((A n) ∨ (¬(A n)))) 
⇒ (¬¬(∃n:ℕ. (A n))) 
⇒ (∃n:ℕ. (A n)))
⊢ False
BY
{ (Assert ⌜∀a:ℕ ⟶ ℕ. (is-absolutely-free{i:l}(a) 
⇒ increasing-sequence(a) 
⇒ (∀m:ℕ. ∃n:ℕ. ((a n) ≥ m )))⌝⋅
   THENA ((UnivCD THENA Auto)
          THEN (InstHyp [⌜λn.((a n) ≥ m )⌝] 2⋅ THENA Auto)
          THEN AllReduce
          THEN Auto
          THEN InstLemma `Kripke2a` [⌜a⌝]⋅
          THEN Auto)
   ) }
1
1. ∃a:ℕ ⟶ ℕ. (is-absolutely-free{i:l}(a) ∧ init0(a) ∧ increasing-sequence(a))
2. ∀A:ℕ ⟶ ℙ. ((∀n:ℕ. ((A n) ∨ (¬(A n)))) 
⇒ (¬¬(∃n:ℕ. (A n))) 
⇒ (∃n:ℕ. (A n)))
3. ∀a:ℕ ⟶ ℕ. (is-absolutely-free{i:l}(a) 
⇒ increasing-sequence(a) 
⇒ (∀m:ℕ. ∃n:ℕ. ((a n) ≥ m )))
⊢ False
Latex:
Latex:
1.  \mexists{}a:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}.  (is-absolutely-free\{i:l\}(a)  \mwedge{}  init0(a)  \mwedge{}  increasing-sequence(a))
2.  \mforall{}A:\mBbbN{}  {}\mrightarrow{}  \mBbbP{}.  ((\mforall{}n:\mBbbN{}.  ((A  n)  \mvee{}  (\mneg{}(A  n))))  {}\mRightarrow{}  (\mneg{}\mneg{}(\mexists{}n:\mBbbN{}.  (A  n)))  {}\mRightarrow{}  (\mexists{}n:\mBbbN{}.  (A  n)))
\mvdash{}  False
By
Latex:
(Assert  \mkleeneopen{}\mforall{}a:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}
                      (is-absolutely-free\{i:l\}(a)  {}\mRightarrow{}  increasing-sequence(a)  {}\mRightarrow{}  (\mforall{}m:\mBbbN{}.  \mexists{}n:\mBbbN{}.  ((a  n)  \mgeq{}  m  )))\mkleeneclose{}\mcdot{}
  THENA  ((UnivCD  THENA  Auto)
                THEN  (InstHyp  [\mkleeneopen{}\mlambda{}n.((a  n)  \mgeq{}  m  )\mkleeneclose{}]  2\mcdot{}  THENA  Auto)
                THEN  AllReduce
                THEN  Auto
                THEN  InstLemma  `Kripke2a`  [\mkleeneopen{}a\mkleeneclose{}]\mcdot{}
                THEN  Auto)
  )
Home
Index