Some definitions of interest.
w-E	Def E == {p:(Id)| isnull(a(1of(p);2of(p))) }
world	Def World Def == T:IdIdType Def == TA:IdIdType Def == M:IdLnkIdType Def == (i:Id(x:IdT(i,x)))(i:Idaction(w-action-dec(TA;M;i))) Def == (i:Id({m:Msg(M)| source(mlnk(m)) = i } List))Top
	Thm* World  Type{i'}
Id	Def Id == Atom
	Thm* Id  Type
assert	Def b == if b True else False fi
	Thm* b:. b  Prop
iff	Def P  Q == (P  Q) & (P  Q)
	Thm* A,B:Prop. (A  B)  Prop
nat	Def  == {i:| 0i }
	Thm*   Type
w-first	Def first(e) Def == if time(e)=0 true Def == i; isnull(a(loc(e);time(e)-1)) first(<loc(e),time(e)-1>) Def == else false fi Def (recursive)
w-a	Def a(i;t) == 1of(2of(2of(2of(2of(w)))))(i,t)
w-isnull	Def isnull(a) == isl(a)
w-loc	Def loc(e) == 1of(e)
w-time	Def time(e) == 2of(e)

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