Who Cites habs sum?
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))
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)
choose	Def @x:T. P(x) == InjCase(lem({x:T| P(x) }); x. x, arb(T))
	Thm* T:S, P:(TType). (@x:T. P(x))  T
tlambda	Def (x:T. b(x))(x) == b(x)
bnot	Def b == if b false else true fi
	Thm* b:. b
bequal	Def x = y == (x = y  T)
	Thm* T:Type, x,y:T. (x = y)
band	Def pq == if p q else false fi
	Thm* p,q:. (pq)
arb	Def arb(T) == InjCase(lem(T); x. x, "uu")
	Thm* T:S. arb(T)  T
prop_to_bool	Def P == InjCase(lem(P) ; true; false)
	Thm* P:Prop. (P)

Syntax:

abs_sum

has structure:

habs_sum('a; 'b)

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