--- a/lib/basis.urs	Tue Oct 21 09:52:52 2008 -0400
+++ b/lib/basis.urs	Tue Oct 21 10:34:07 2008 -0400
@@ -18,6 +18,15 @@
 val eq_string : eq string
 val eq_bool : eq bool
 
+class num
+val neg : t ::: Type -> num t -> t -> t
+val plus : t ::: Type -> num t -> t -> t -> t
+val minus : t ::: Type -> num t -> t -> t -> t
+val times : t ::: Type -> num t -> t -> t -> t
+val div : t ::: Type -> num t -> t -> t -> t
+val mod : t ::: Type -> num t -> t -> t -> t
+val num_int : num int
+
 
 (** String operations *)