Some definitions of interest.
diagonalize	Def  (Diag f wrt y. e(y))(x) == e(f(x,x))
	Thm*  B:Type, e:(BB), A:Type, f:(AAB). (Diag f wrt y. e(y))  AB
not	Def  A == A  False
	Thm*  A:Prop. (A)  Prop

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