Step * 1 2 1 of Lemma gamma-neighbourhood-prop3


1. beta : ℕ ⟶ ℕ
2. : ℕ
3. : ℕ
4. ¬↑init-seg-nat-seq(0s^(m);0s^(n))
5. (beta 0) 0 ∈ ℤ
6. : ∃x:ℕ((↑init-seg-nat-seq(0s^(n)**λi.x^(1);0s^(m))) ∧ ((beta x) 0 ∈ ℤ)) ∧ (∀y:ℕx. ((beta y) 0 ∈ ℤ)))
⊢ n < m ∧ ((inl 1) (inl 0) ∈ (ℕ?))
BY
((Assert ⌜False⌝⋅ THEN Auto) THEN ExRepD) }

1
1. beta : ℕ ⟶ ℕ
2. : ℕ
3. : ℕ
4. ¬↑init-seg-nat-seq(0s^(m);0s^(n))
5. (beta 0) 0 ∈ ℤ
6. x1 : ℕ
7. x3 : ↑init-seg-nat-seq(0s^(n)**λi.x1^(1);0s^(m))
8. x5 : ¬((beta x1) 0 ∈ ℤ)
9. x6 : ∀y:ℕx1. ((beta y) 0 ∈ ℤ)
⊢ False


Latex:


Latex:

1.  beta  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}
2.  n  :  \mBbbN{}
3.  m  :  \mBbbN{}
4.  \mneg{}\muparrow{}init-seg-nat-seq(0s\^{}(m);0s\^{}(n))
5.  (beta  0)  =  0
6.  x  :  \mexists{}x:\mBbbN{}
                ((\muparrow{}init-seg-nat-seq(0s\^{}(n)**\mlambda{}i.x\^{}(1);0s\^{}(m)))  \mwedge{}  (\mneg{}((beta  x)  =  0))  \mwedge{}  (\mforall{}y:\mBbbN{}x.  ((beta  y)  =  0)))
\mvdash{}  n  <  m  \mwedge{}  ((inl  1)  =  (inl  0))


By


Latex:
((Assert  \mkleeneopen{}False\mkleeneclose{}\mcdot{}  THEN  Auto)  THEN  ExRepD)




Home Index