--- a/Number.st	Thu May 31 12:17:03 2018 +0200
+++ b/Number.st	Fri Jun 01 13:09:46 2018 +0200
@@ -838,6 +838,7 @@
     "
 ! !
 
+
 !Number class methodsFor:'private'!
 
 readMantissaAndScaleFrom:aStream radix:radix
@@ -934,6 +935,7 @@
     ^ self == Number
 ! !
 
+
 !Number methodsFor:'Compatibility-Squeak'!
 
 asSmallAngleDegrees
@@ -1650,11 +1652,13 @@
 !
 
 imaginary
-    "Return the imaginary part of this Number."
+    "Return the imaginary part of a complex number.
+     For non-complex numbers, zero is returned."
 
     ^ 0
 
-    "Modified: / 9.7.1998 / 10:17:24 / cg"
+    "Modified: / 09-07-1998 / 10:17:24 / cg"
+    "Modified (comment): / 01-06-2018 / 13:09:09 / Claus Gittinger"
 !
 
 ldexp:exp
@@ -1789,11 +1793,13 @@
 !
 
 real
-    "Return the real part of this Number."
+    "Return the real part of a complex number.
+     For non-complex numbers, the receiver is returned."
 
     ^ self
 
-    "Modified: / 9.7.1998 / 10:17:17 / cg"
+    "Modified: / 09-07-1998 / 10:17:17 / cg"
+    "Modified (comment): / 01-06-2018 / 13:09:33 / Claus Gittinger"
 !
 
 sqrt
@@ -3444,6 +3450,7 @@
     "Modified: / 5.11.2001 / 17:54:22 / cg"
 ! !
 
+
 !Number class methodsFor:'documentation'!
 
 version