Nuprl - Proof: hsub right less

IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: hsub right less

all

(

m:hnum. all

(

m:hnum. (

n:hnum. all

(

m:hnum. (

n:hnum. (

p:hnum. equal

(

m:hnum. (

n:hnum. (

p:hnum. (lt(sub(m,n),p)

(

m:hnum. (

n:hnum. (

p:hnum. ,and(lt(m,add(n,p)),lt(0,p))))))

By:	HOL "hsub_right_less"

Generated subgoals:

None

About:

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