By: |
RewriteOfThm
Thm* all
Thm* ( n:hnum. implies
Thm* ( n:hnum. (lt(0,n)
Thm* ( n:hnum. ,all
Thm* ( n:hnum. ,( j:hnum. all
Thm* ( n:hnum. ,( j:hnum. ( k:hnum. equal
Thm* ( n:hnum. ,( j:hnum. ( k:hnum. (mod(add(mod(j,n),mod(k,n)),n)
Thm* ( n:hnum. ,( j:hnum. ( k:hnum. ,mod(add(j,k),n))))))
(SimpsetC [`hol_to_nuprl`;`bequal`]) |