--- a/ArithmeticValue.st	Mon Feb 07 12:18:38 2000 +0100
+++ b/ArithmeticValue.st	Mon Feb 07 12:31:22 2000 +0100
@@ -255,7 +255,7 @@
     ^ self - ((self quo:something) * something)
 ! !
 
-!ArithmeticValue methodsFor:'coercing'!
+!ArithmeticValue methodsFor:'coercing & converting'!
 
 coerce:aNumber
     "convert aNumber into an instance of the receivers class and return it."
@@ -913,6 +913,6 @@
 !ArithmeticValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.32 1999-11-15 19:36:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ArithmeticValue.st,v 1.33 2000-02-07 11:30:37 cg Exp $'
 ! !
 ArithmeticValue initialize!