Some definitions of interest.
Knd	Def Knd == (IdLnkId)+Id
	Thm* Knd  Type
Id	Def Id == Atom
	Thm* Id  Type
has-src	Def has-src(i;k) == isrcv(k)source(lnk(k)) = i
assert	Def b == if b True else False fi
	Thm* b:. b  Prop
isrcv	Def isrcv(k) == isl(k)
	Thm* k:Knd. isrcv(k)

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