Step
*
1
of Lemma
nat-inf-attach-unit
1. F : ℕ ⟶ Type
2. n : ℕ
⊢ (λu.(n:{n:ℕ| u = n∞ ∈ ℕ∞}  ⟶ (F n))) n∞ ~ F n
BY
{ (Assert singleton-type({x:ℕ| n∞ = x∞ ∈ ℕ∞} ) BY
         (D 0 With ⌜n⌝  THEN Auto THEN D -1 THEN FLemma `nat2inf-one-one` [-1] THEN Auto)) }
1
1. F : ℕ ⟶ Type
2. n : ℕ
3. singleton-type({x:ℕ| n∞ = x∞ ∈ ℕ∞} )
⊢ (λu.(n:{n:ℕ| u = n∞ ∈ ℕ∞}  ⟶ (F n))) n∞ ~ F n
Latex:
Latex:
1.  F  :  \mBbbN{}  {}\mrightarrow{}  Type
2.  n  :  \mBbbN{}
\mvdash{}  (\mlambda{}u.(n:\{n:\mBbbN{}|  u  =  n\minfty{}\}    {}\mrightarrow{}  (F  n)))  n\minfty{}  \msim{}  F  n
By
Latex:
(Assert  singleton-type(\{x:\mBbbN{}|  n\minfty{}  =  x\minfty{}\}  )  BY
              (D  0  With  \mkleeneopen{}n\mkleeneclose{}    THEN  Auto  THEN  D  -1  THEN  FLemma  `nat2inf-one-one`  [-1]  THEN  Auto))
Home
Index