Nuprl - Proof: hsub right greater eq

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

all

(

m:hnum. all

(

m:hnum. (

n:hnum. all

(

m:hnum. (

n:hnum. (

p:hnum. equal

(

m:hnum. (

n:hnum. (

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

(

m:hnum. (

n:hnum. (

p:hnum. ,or(ge(m,add(n,p)),ge(0,p))))))

By:	HOL "hsub_right_greater_eq"

Generated subgoals:

None

About:

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