Some definitions of interest.
assert	Def b == if b True else False fi
	Thm* b:. b  Prop
filter	Def filter(P;l) == reduce(a,v. if P(a) [a / v] else v fi;nil;l)
	Thm* T:Type, P:(T), l:T List. filter(P;l)  T List
iff	Def P  Q == (P  Q) & (P  Q)
	Thm* A,B:Prop. (A  B)  Prop
l_all	Def (xL.P(x)) == x:T. (x  L)  P(x)
	Thm* T:Type, L:T List, P:(TProp). (xL.P(x))  Prop
sublist	Def L1  L2 Def == f:(||L1||||L2||).  Def == increasing(f;||L1||) & (j:||L1||. L1[j] = L2[(f(j))]  T)
	Thm* T:Type, L1,L2:T List. L1  L2  Prop

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