Step * 1 1 2 1 of Lemma decidable-bar-rec_wf


1. n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ ℙ
2. n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ ℙ
3. bar : ∀s:ℕ ⟶ ℕ(↓∃n:ℕB[n;s])
4. dec : ∀n:ℕ. ∀s:ℕn ⟶ ℕ.  (B[n;s] ∨ B[n;s]))
5. base : ∀n:ℕ. ∀s:ℕn ⟶ ℕ.  (B[n;s]  Q[n;s])
6. ind : ∀n:ℕ. ∀s:ℕn ⟶ ℕ.  ((∀m:ℕQ[n 1;s.m@n])  Q[n;s])
7. s1 : ℕ ⟶ ℕ
8. : ℕ
9. B[n;s1]
⊢ seq-normalize(n;s1)
BY
((Assert ⌜s1 seq-normalize(n;s1) ∈ (ℕn ⟶ ℕ)⌝⋅ THENM (RWO "-1<THEN Auto)) THEN Ext THEN Auto) }


Latex:


Latex:

1.  B  :  n:\mBbbN{}  {}\mrightarrow{}  (\mBbbN{}n  {}\mrightarrow{}  \mBbbN{})  {}\mrightarrow{}  \mBbbP{}
2.  Q  :  n:\mBbbN{}  {}\mrightarrow{}  (\mBbbN{}n  {}\mrightarrow{}  \mBbbN{})  {}\mrightarrow{}  \mBbbP{}
3.  bar  :  \mforall{}s:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}.  (\mdownarrow{}\mexists{}n:\mBbbN{}.  B[n;s])
4.  dec  :  \mforall{}n:\mBbbN{}.  \mforall{}s:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}.    (B[n;s]  \mvee{}  (\mneg{}B[n;s]))
5.  base  :  \mforall{}n:\mBbbN{}.  \mforall{}s:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}.    (B[n;s]  {}\mRightarrow{}  Q[n;s])
6.  ind  :  \mforall{}n:\mBbbN{}.  \mforall{}s:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}.    ((\mforall{}m:\mBbbN{}.  Q[n  +  1;s.m@n])  {}\mRightarrow{}  Q[n;s])
7.  s1  :  \mBbbN{}  {}\mrightarrow{}  \mBbbN{}
8.  n  :  \mBbbN{}
9.  B[n;s1]
\mvdash{}  B  n  seq-normalize(n;s1)


By


Latex:
((Assert  \mkleeneopen{}s1  =  seq-normalize(n;s1)\mkleeneclose{}\mcdot{}  THENM  (RWO  "-1<"  0  THEN  Auto))  THEN  Ext  THEN  Auto)




Home Index