m,n,x:. nx  (m+n = x    m = nnsub(x;n))

By:

RewriteOfThm Thm* all Thm* (m:hnum. all Thm* (m:hnum. (n:hnum. all Thm* (m:hnum. (n:hnum. (p:hnum. implies Thm* (m:hnum. (n:hnum. (p:hnum. (le(n,p) Thm* (m:hnum. (n:hnum. (p:hnum. ,equal Thm* (m:hnum. (n:hnum. (p:hnum. ,(equal(add(m,n),p) Thm* (m:hnum. (n:hnum. (p:hnum. ,,equal(m,sub(p,n))))))) (SimpsetC [`hol_to_nuprl`;`bequal`])

None

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