Some definitions of interest.
guarded_permutation	Def guarded_permutation(T;P) Def == (L1,L2. i:(||L1||-1). P(L1,i) & L2 = swap(L1;i;i+1)  T List)^*
	Thm* T:Type, P:(L:(T List)(||L||-1)Prop). Thm* guarded_permutation(T;P)  (T List)(T List)Prop
int_seg	Def {i..j} == {k:| i  k < j }
	Thm* m,n:. {m..n}  Type
length	Def ||as|| == Case of as; nil  0 ; a.as'  ||as'||+1  (recursive)
	Thm* A:Type, l:A List. ||l||
	Thm* ||nil||
rel_star	Def (R^*)(x,y) == n:. x R^n y
	Thm* T:Type, R:(TTProp). (R^*)  TTProp
trans	Def Trans x,y:T. E(x;y) == a,b,c:T. E(a;b)  E(b;c)  E(a;c)
	Thm* T:Type, E:(TTProp). (Trans x,y:T. E(x,y))  Prop

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