Def implies == p:. q:. pq

is mentioned by

Thm* 'a,'b:S. Thm* equal Thm* (rep_prod Thm* ,select Thm* ,(rep:hprod('a; 'b) Thm* ,( 'a Thm* ,( 'b Thm* ,( hbool. and Thm* ,( hbool. (all Thm* ,( hbool. ((p':hprod('a; 'b). all Thm* ,( hbool. ((p':hprod('a; 'b). (p'':hprod('a; 'b). implies Thm* ,( hbool. ((p':hprod('a; 'b). (p'':hprod('a; 'b). (equal Thm* ,( hbool. ((p':hprod('a; 'b). (p'':hprod('a; 'b). ((rep(p') Thm* ,( hbool. ((p':hprod('a; 'b). (p'':hprod('a; 'b). (,rep(p'')) Thm* ,( hbool. ((p':hprod('a; 'b). (p'':hprod('a; 'b). ,equal(p',p'')))) Thm* ,( hbool. ,all Thm* ,( hbool. ,(p:'a  'b  hbool. equal Thm* ,( hbool. ,(p:'a  'b  hbool. (is_pair(p) Thm* ,( hbool. ,(p:'a  'b  hbool. ,exists Thm* ,( hbool. ,(p:'a  'b  hbool. ,(p':hprod('a; 'b). equal Thm* ,( hbool. ,(p:'a  'b  hbool. ,(p':hprod('a; 'b). (p Thm* ,( hbool. ,(p:'a  'b  hbool. ,(p':hprod('a; 'b). ,rep(p'))))))))

[hrep_prod_wd]

In prior sections: hol bool

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