Step
*
1
1
1
of Lemma
gamma-neighbourhood-prop1
1. beta : ℕ ⟶ ℕ
2. n0 : finite-nat-seq()
3. a : ℕ ⟶ ℕ
4. init-seg-nat-seq(a^((fst(n0)) + 1);n0) ~ tt
⊢ False
BY
{ ((Assert ⌜↑init-seg-nat-seq(a^((fst(n0)) + 1);n0)⌝⋅ THENA (HypSubst' (-1) 0 THEN Auto))
   THEN (RWO "assert-init-seg-nat-seq" (-1) THENA Auto)
   THEN ExRepD) }
1
1. beta : ℕ ⟶ ℕ
2. n0 : finite-nat-seq()
3. a : ℕ ⟶ ℕ
4. init-seg-nat-seq(a^((fst(n0)) + 1);n0) ~ tt
5. h : finite-nat-seq()
6. n0 = a^((fst(n0)) + 1)**h ∈ finite-nat-seq()
⊢ False
Latex:
Latex:
1.  beta  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}
2.  n0  :  finite-nat-seq()
3.  a  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}
4.  init-seg-nat-seq(a\^{}((fst(n0))  +  1);n0)  \msim{}  tt
\mvdash{}  False
By
Latex:
((Assert  \mkleeneopen{}\muparrow{}init-seg-nat-seq(a\^{}((fst(n0))  +  1);n0)\mkleeneclose{}\mcdot{}  THENA  (HypSubst'  (-1)  0  THEN  Auto))
  THEN  (RWO  "assert-init-seg-nat-seq"  (-1)  THENA  Auto)
  THEN  ExRepD)
Home
Index