Some definitions of interest.
assert	Def  b == if b True else False fi
	Thm*  b:. b  Prop
sized_bool	Def  a {k}  == {p:(a)| size(a)(p) = k }
	Thm*  a,k:. a {k}   Type
boolsize	Def  size(a)(p) == Msize(x.if p(x) 1 else 0 fi)
	Thm*  a:. size(a)  (a)
int_seg	Def  {i..j} == {k:| i  k < j }
	Thm*  m,n:. {m..n}  Type
nat	Def   == {i:| 0i }
	Thm*    Type
one_one_corr_2	Def  A ~ B == f:(AB), g:(BA). InvFuns(A;B;f;g)
	Thm*  A,B:Type. (A ~ B)  Prop

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