--- a/ArithmeticValue.st	Mon Mar 10 10:25:48 2008 +0100
+++ b/ArithmeticValue.st	Mon Mar 10 10:26:03 2008 +0100
@@ -213,6 +213,7 @@
     ^ self == ArithmeticValue
 ! !
 
+
 !ArithmeticValue methodsFor:'arithmetic'!
 
 * something
@@ -1259,6 +1260,9 @@
      6 roundUpTo:4
      7 roundUpTo:4
      8 roundUpTo:4
+     (3@4) roundUpTo:8
+     (3@4) roundUpTo:(5 @ 4)
+     (3@3) roundUpTo:(5 @ 4) 
     "
 !
 
@@ -1291,7 +1295,7 @@
 !ArithmeticValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.76 2007-01-12 23:18:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.77 2008-03-10 09:26:03 cg Exp $'
 ! !
 
 ArithmeticValue initialize!