--- a/ArithmeticValue.st	Wed Nov 15 23:20:38 2017 +0100
+++ b/ArithmeticValue.st	Thu Nov 16 11:27:03 2017 +0100
@@ -490,6 +490,7 @@
     ^ self == ArithmeticValue
 ! !
 
+
 !ArithmeticValue methodsFor:'arithmetic'!
 
 * something
@@ -516,20 +517,21 @@
     ^ self subclassResponsibility
 !
 
-// something
+// aNumber
     "return the integer quotient of dividing the receiver by aNumber with
      truncation towards negative infinity.
-     
+
      Please be aware of the effect of truncation on negative receivers,
      and understand the difference between '//' vs. 'quo:'
      and the corresponding '\\' vs. 'rem:'"
 
-    "/ Note: '^ (self / something) floor' may lead to infinite recursion
+    "/ Note: '^ (self / aNumber) floor' may lead to infinite recursion
 
     ^ self subclassResponsibility
 
-    "Modified: / 5.11.1996 / 11:46:27 / cg"
-    "Modified: / 12.2.1998 / 16:31:36 / stefan"
+    "Modified: / 05-11-1996 / 11:46:27 / cg"
+    "Modified: / 12-02-1998 / 16:31:36 / stefan"
+    "Modified (comment): / 16-11-2017 / 11:26:13 / mawalch"
 !
 
 \\ something
@@ -1734,7 +1736,6 @@
     ^ self * self
 ! !
 
-
 !ArithmeticValue methodsFor:'queries'!
 
 respondsToArithmetic