Def equal == x:'a. y:'a. x = y

is mentioned by

Thm* 'a:S. all(e:'a. exists_unique(fn:hone  'a. equal(fn(one_el),e)))	[hone_axiom_2]
Thm* all(v:hone. equal(v,one_el))	[hone_wd]
Thm* 'a:S. all(f:'a  hone. all(g:'a  hone. equal(f,g)))	[hone_axiom]
Thm* equal(one_el,select(x:hone. t))	[hone_def]

In prior sections: hol bool

Try larger context: HOLlib IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html