Step * 1 2 of Lemma equipollent-list-as-product


1. [T] Type
2. k:ℕ × (T^k)
⊢ ∃a:T List. (<||a||, a> b ∈ (k:ℕ × (T^k)))
BY
(D -1
   THEN ((With ⌜b1⌝ (D 0)⋅ THEN Try ((EqualityIsType1 THEN Auto THEN BLemma `list-subtype-power-type` THEN Auto)))
         THENW Auto
         )
   }

1
1. Type
2. : ℕ
3. b1 (T^k)
⊢ <||b1||, b1> = <k, b1> ∈ (k:ℕ × (T^k))


Latex:


Latex:

1.  [T]  :  Type
2.  b  :  k:\mBbbN{}  \mtimes{}  (T\^{}k)
\mvdash{}  \mexists{}a:T  List.  (<||a||,  a>  =  b)


By


Latex:
(D  -1
  THEN  ((With  \mkleeneopen{}b1\mkleeneclose{}  (D  0)\mcdot{}
                THEN  Try  ((EqualityIsType1  THEN  Auto  THEN  BLemma  `list-subtype-power-type`  THEN  Auto))
                )
              THENW  Auto
              )
  )




Home Index