Some definitions of interest.
assoced	Def a ~ b == a | b & b | a
	Thm* a,b:. (a ~ b)  Prop
gcd	Def gcd(a;b) == if b=0 a else gcd(b;a rem b) fi  (recursive)
	Thm* a,b:. gcd(a;b)

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