Nuprl - Proof: hadd eq sub

IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: hadd eq sub

all

(

m:hnum. all

(

m:hnum. (

n:hnum. all

(

m:hnum. (

n:hnum. (

p:hnum. implies

(

m:hnum. (

n:hnum. (

p:hnum. (le(n,p)

(

m:hnum. (

n:hnum. (

p:hnum. ,equal(equal(add(m,n),p),equal(m,sub(p,n)))))))

By:	HOL "hadd_eq_sub"

Generated subgoals:

None

About:

IF YOU CAN SEE THIS go to http://www.cs.cornell.edu/Info/People/sfa/Nuprl/Shared/Xindentation_hack_doc.html