By: |
RewriteOfThm
Thm* all
Thm* ( m:hnum. all
Thm* ( m:hnum. ( i:hnum. all
Thm* ( m:hnum. ( i:hnum. ( n:hnum. equal
Thm* ( m:hnum. ( i:hnum. ( n:hnum. (lt(mult(suc(n),m),mult(suc(n),i))
Thm* ( m:hnum. ( i:hnum. ( n:hnum. ,lt(m,i)))))
(SimpsetC [`hol_to_nuprl`;`bequal`]) |