Some definitions of interest.
assert	Def b == if b True else False fi
	Thm* b:. b  Prop
houtr	Def outr == u:'a+'b. InjCase(u; x. arb('b), x)
	Thm* 'a,'b:S. outr  (hsum('a; 'b)  'b)
isr	Def isr(x) == InjCase(x; y. false; z. true)
	Thm* A,B:Type, x:A+B. isr(x)
outr	Def outr(x) == InjCase(x; y. "???"; z. z)
	Thm* A,B:Type, x:A+B. isl(x)  outr(x)  B
stype	Def S == {T:Type| x:T. True }
	Thm* S  Type{2}

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