Thms array 1 Doc

array_ub Def a.u == 1of(2of(a))

Thm* a:[T]Array . a.u

pi2 Def 2of(t) == t.2

Thm* B:(AType), p:a:AB(a). 2of(p) B(1of(p))

pi1 Def 1of(t) == t.1

Thm* B:(AType), p:a:AB(a). 1of(p) A