Def select == p:'a. @x:'a. (p(x))

is mentioned by

Thm* 'a:S. all(P:'a  hbool. all(x:'a. implies(P(x),P(select(P)))))	[hselect_ax]
Thm* 'a:S.  Thm* equal Thm* (cond Thm* ,t:hbool. t1:'a. t2:'a. select Thm* ,t:hbool. t1:'a. t2:'a. (x:'a. and Thm* ,t:hbool. t1:'a. t2:'a. (x:'a. (implies(equal(t,t),equal(x,t1)) Thm* ,t:hbool. t1:'a. t2:'a. (x:'a. ,implies(equal(t,f),equal(x,t2)))))	[hcond_def]
Thm* 'a:S. equal(exists,P:'a  hbool. P(select(P)))	[hexists_def]

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