Some definitions of interest.
array	Def [T]Array  == n:m:{n...}{n..m}T
	Thm* T:Type{i}. [T]Array   Type{[i']}
array_shift	Def a[++i] == <(a.l+i),(a.u+i),(j.a[(j-i)])>
	Thm* T:Type, i:, j:{i...}, a:[T]Array{i..j}, m:. Thm* a[++m]  [T]Array{i+m..j+m}
array_lb	Def a.l == 1of(a)
	Thm* T:Type, a:[T]Array . a.l
array_ub	Def a.u == 1of(2of(a))
	Thm* T:Type, a:[T]Array . a.u
int_seg	Def {i..j} == {k:| i  k < j }
	Thm* m,n:. {m..n}  Type
int_upper	Def {i...} == {j:| ij }
	Thm* n:. {n...}  Type

About: IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html