Some definitions of interest.
rat	Def  ==
	Thm*   Type
nat_plus	Def  == {i:| 0<i }
	Thm*   Type
qdenom	Def q.den == 2of(q)
	Thm* q:. q.den

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