Some definitions of interest.
habs_sum	Def abs_sum == f:'a'b. @u:'a+'b. (rep_sum(u) = f  'a'b)
	Thm* 'a,'b:S. abs_sum  ((hbool  'a  'b  hbool)  hsum('a; 'b))
his_sum_rep	Def is_sum_rep == f:'a'b. u:'a+'b. (f = (rep_sum(u)))
	Thm* 'a,'b:S. is_sum_rep  ((hbool  'a  'b  hbool)  hbool)
hrep_sum	Def rep_sum Def == u:'a+'b. InjCase(u Def == u:'a+'b. InjCase; p. b:. x:'a. y:'b. (x = p)b Def == u:'a+'b. InjCase; q. b:. x:'a. y:'b. (y = q)b)
	Thm* 'a,'b:S. rep_sum  (hsum('a; 'b)  hbool  'a  'b  hbool)
bequal	Def x = y == (x = y  T)
	Thm* T:Type, x,y:T. (x = y)
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