Step
*
1
2
of Lemma
finite-cantor-decider_wf
1. T : Type
2. R : T ⟶ T ⟶ ℙ
3. dcdr : ∀x,y:T.  Dec(R[x;y])
4. n : ℕ
5. F : (ℕn ⟶ 𝔹) ⟶ T
6. λdcdr,n,F. finite-cantor-decider(dcdr;n;F) ∈ ∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
                                         ((∀x,y:T.  Dec(R[x;y]))
                                         
⇒ (∀n:ℕ. ∀F:(ℕn ⟶ 𝔹) ⟶ T.  Dec(∃f,g:ℕn ⟶ 𝔹. R[F f;F g])))
⊢ finite-cantor-decider(dcdr;n;F) ∈ Dec(∃f,g:ℕn ⟶ 𝔹. R[F f;F g])
BY
{ TACTIC:((Subst' finite-cantor-decider(dcdr;n;F) ~ (λdcdr,n,F. finite-cantor-decider(dcdr;n;F)) dcdr n F 0
           THENA (Reduce 0 THEN Auto)
           )
          THEN GenConclAtAddr [2;1;1;1]
          THEN Auto) }
Latex:
Latex:
1.  T  :  Type
2.  R  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  dcdr  :  \mforall{}x,y:T.    Dec(R[x;y])
4.  n  :  \mBbbN{}
5.  F  :  (\mBbbN{}n  {}\mrightarrow{}  \mBbbB{})  {}\mrightarrow{}  T
6.  \mlambda{}dcdr,n,F.  finite-cantor-decider(dcdr;n;F)  \mmember{}  \mforall{}[T:Type].  \mforall{}[R:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
                                                                                  ((\mforall{}x,y:T.    Dec(R[x;y]))
                                                                                  {}\mRightarrow{}  (\mforall{}n:\mBbbN{}.  \mforall{}F:(\mBbbN{}n  {}\mrightarrow{}  \mBbbB{})  {}\mrightarrow{}  T.
                                                                                              Dec(\mexists{}f,g:\mBbbN{}n  {}\mrightarrow{}  \mBbbB{}.  R[F  f;F  g])))
\mvdash{}  finite-cantor-decider(dcdr;n;F)  \mmember{}  Dec(\mexists{}f,g:\mBbbN{}n  {}\mrightarrow{}  \mBbbB{}.  R[F  f;F  g])
By
Latex:
TACTIC:((Subst'  finite-cantor-decider(dcdr;n;F)  \msim{}  (\mlambda{}dcdr,n,F.  finite-cantor-decider(dcdr;n;F))  dcdr  \000Cn  F  0
                  THENA  (Reduce  0  THEN  Auto)
                  )
                THEN  GenConclAtAddr  [2;1;1;1]
                THEN  Auto)
Home
Index