Step
*
1
of Lemma
tree-secures_functionality
1. T : Type@i'
2. [A] : n:ℕ ⟶ (ℕn ⟶ T) ⟶ ℙ
3. [B] : n:ℕ ⟶ (ℕn ⟶ T) ⟶ ℙ
4. ∀n:ℕ. ∀s:ℕn ⟶ T.  ((A n s) 
⇒ (B n s))@i
5. tree-secures(T;A;Wsup(tt;⋅))@i
⊢ tree-secures(T;B;Wsup(tt;⋅))
BY
{ ((RecUnfold `tree-secures` 0 THEN Unfold `Wsup` 0 THEN Reduce 0)
   THEN RecUnfold `tree-secures` (-1)
   THEN Unfold `Wsup` (-1)
   THEN Reduce (-1)
   THEN Auto) }
Latex:
Latex:
1.  T  :  Type@i'
2.  [A]  :  n:\mBbbN{}  {}\mrightarrow{}  (\mBbbN{}n  {}\mrightarrow{}  T)  {}\mrightarrow{}  \mBbbP{}
3.  [B]  :  n:\mBbbN{}  {}\mrightarrow{}  (\mBbbN{}n  {}\mrightarrow{}  T)  {}\mrightarrow{}  \mBbbP{}
4.  \mforall{}n:\mBbbN{}.  \mforall{}s:\mBbbN{}n  {}\mrightarrow{}  T.    ((A  n  s)  {}\mRightarrow{}  (B  n  s))@i
5.  tree-secures(T;A;Wsup(tt;\mcdot{}))@i
\mvdash{}  tree-secures(T;B;Wsup(tt;\mcdot{}))
By
Latex:
((RecUnfold  `tree-secures`  0  THEN  Unfold  `Wsup`  0  THEN  Reduce  0)
  THEN  RecUnfold  `tree-secures`  (-1)
  THEN  Unfold  `Wsup`  (-1)
  THEN  Reduce  (-1)
  THEN  Auto)
Home
Index