Step * 1 1 1 1 1 of Lemma strong-continuity2-no-inner-squash-bound


1. (ℕ ⟶ ℕ) ⟶ ℕ
2. n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ (ℕ?)
3. ∀f:ℕ ⟶ ℕ((∃n:ℕ((M f) (inl (F f)) ∈ (ℕ?))) ∧ (∀n:ℕ(M f) (inl (F f)) ∈ (ℕ?) supposing ↑isl(M f)))
4. : ∀n:ℕ. ∀s:ℕn ⟶ ℕ.  Dec(∃i:ℕn. ((↑isl(M s)) ∧ outl(M s) < n))
⊢ ∃M:n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ (ℕn?)
   ∀f:ℕ ⟶ ℕ
     ∃n:ℕ(F f < n ∧ ((M f) (inl (F f)) ∈ (ℕ?)) ∧ (∀m:ℕ((↑isl(M f))  ((M f) (inl (F f)) ∈ (ℕ?)))))
BY
TACTIC:With ⌜λn,s. case of inl(t) => (fst(t)) inr(x) => inr ⋅ ⌝ (D 0)⋅ }

1
.....wf..... 
1. (ℕ ⟶ ℕ) ⟶ ℕ
2. n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ (ℕ?)
3. ∀f:ℕ ⟶ ℕ((∃n:ℕ((M f) (inl (F f)) ∈ (ℕ?))) ∧ (∀n:ℕ(M f) (inl (F f)) ∈ (ℕ?) supposing ↑isl(M f)))
4. : ∀n:ℕ. ∀s:ℕn ⟶ ℕ.  Dec(∃i:ℕn. ((↑isl(M s)) ∧ outl(M s) < n))
⊢ λn,s. case of inl(t) => (fst(t)) inr(x) => inr ⋅  ∈ n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ (ℕn?)

2
1. (ℕ ⟶ ℕ) ⟶ ℕ
2. n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ (ℕ?)
3. ∀f:ℕ ⟶ ℕ((∃n:ℕ((M f) (inl (F f)) ∈ (ℕ?))) ∧ (∀n:ℕ(M f) (inl (F f)) ∈ (ℕ?) supposing ↑isl(M f)))
4. : ∀n:ℕ. ∀s:ℕn ⟶ ℕ.  Dec(∃i:ℕn. ((↑isl(M s)) ∧ outl(M s) < n))
⊢ ∀f:ℕ ⟶ ℕ
    ∃n:ℕ
     (F f < n
     ∧ (((λn,s. case of inl(t) => (fst(t)) inr(x) => inr ⋅ f) (inl (F f)) ∈ (ℕ?))
     ∧ (∀m:ℕ
          ((↑isl((λn,s. case of inl(t) => (fst(t)) inr(x) => inr ⋅ f))
           (((λn,s. case of inl(t) => (fst(t)) inr(x) => inr ⋅ f) (inl (F f)) ∈ (ℕ?)))))

3
.....wf..... 
1. (ℕ ⟶ ℕ) ⟶ ℕ
2. n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ (ℕ?)
3. ∀f:ℕ ⟶ ℕ((∃n:ℕ((M f) (inl (F f)) ∈ (ℕ?))) ∧ (∀n:ℕ(M f) (inl (F f)) ∈ (ℕ?) supposing ↑isl(M f)))
4. : ∀n:ℕ. ∀s:ℕn ⟶ ℕ.  Dec(∃i:ℕn. ((↑isl(M s)) ∧ outl(M s) < n))
5. M1 n:ℕ ⟶ (ℕn ⟶ ℕ) ⟶ (ℕn?)
⊢ istype(∀f:ℕ ⟶ ℕ
           ∃n:ℕ
            (F f < n ∧ ((M1 f) (inl (F f)) ∈ (ℕ?)) ∧ (∀m:ℕ((↑isl(M1 f))  ((M1 f) (inl (F f)) ∈ (ℕ?))))))


Latex:


Latex:

1.  F  :  (\mBbbN{}  {}\mrightarrow{}  \mBbbN{})  {}\mrightarrow{}  \mBbbN{}
2.  M  :  n:\mBbbN{}  {}\mrightarrow{}  (\mBbbN{}n  {}\mrightarrow{}  \mBbbN{})  {}\mrightarrow{}  (\mBbbN{}?)
3.  \mforall{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}
          ((\mexists{}n:\mBbbN{}.  ((M  n  f)  =  (inl  (F  f))))  \mwedge{}  (\mforall{}n:\mBbbN{}.  (M  n  f)  =  (inl  (F  f))  supposing  \muparrow{}isl(M  n  f)))
4.  d  :  \mforall{}n:\mBbbN{}.  \mforall{}s:\mBbbN{}n  {}\mrightarrow{}  \mBbbN{}.    Dec(\mexists{}i:\mBbbN{}n.  ((\muparrow{}isl(M  i  s))  \mwedge{}  outl(M  i  s)  <  n))
\mvdash{}  \mexists{}M:n:\mBbbN{}  {}\mrightarrow{}  (\mBbbN{}n  {}\mrightarrow{}  \mBbbN{})  {}\mrightarrow{}  (\mBbbN{}n?)
      \mforall{}f:\mBbbN{}  {}\mrightarrow{}  \mBbbN{}
          \mexists{}n:\mBbbN{}.  (F  f  <  n  \mwedge{}  ((M  n  f)  =  (inl  (F  f)))  \mwedge{}  (\mforall{}m:\mBbbN{}.  ((\muparrow{}isl(M  m  f))  {}\mRightarrow{}  ((M  m  f)  =  (inl  (F  f))))))


By


Latex:
TACTIC:With  \mkleeneopen{}\mlambda{}n,s.  case  d  n  s  of  inl(t)  =>  M  (fst(t))  s  |  inr(x)  =>  inr  \mcdot{}  \mkleeneclose{}  (D  0)\mcdot{}




Home Index