Thms array 1 Doc

p_array Def [T]Array{i..j} == {a:[T]Array | a.l = i & a.u = j}

Thm* T:Type{i}, i:, j:{i...}. [T]Array{i..j} Type{[i']}

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

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

array_lb Def a.l == 1of(a)

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

array Def [T]Array == n:m:{n...}{n..m}T

Thm* T:Type{i}. [T]Array Type{[i']}

int_upper Def {i...} == {j:| ij}

Thm* n:. {n...} Type

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

int_seg Def {i..j} == {k:| i k < j}

Thm* m,n:. {m..n} Type

lelt Def i j < k == ij & j < k

le Def AB == B < A

Thm* i,j:. ij Prop

not Def A == A False

Thm* (A) Prop