Step
*
1
1
2
1
of Lemma
decidable-bar-rec_wf
1. B : n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ ℙ
2. Q : 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. n : ℕ
9. B[n;s1]
⊢ B n seq-normalize(n;s1)
BY
{ ((Assert ⌜s1 = seq-normalize(n;s1) ∈ (ℕn ⟶ ℕ)⌝⋅ THENM (RWO "-1<" 0 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