--- a/ArithmeticValue.st	Sat May 05 23:44:52 2018 +0200
+++ b/ArithmeticValue.st	Sat May 05 23:47:11 2018 +0200
@@ -631,6 +631,16 @@
     "return the receiver's reciprocal"
 
     ^ self class unity / self
+
+    "
+     (10 + 4i) class unity -> (1+0i)
+     (10 + 4i) reciprocal  -> ((5/58)-(1/29)i)
+     (4/3) reciprocal  -> (3/4) 
+     3 reciprocal  -> (1/3) 
+     3.0 reciprocal  -> 0.333333333333333 
+     3.0 asLongFloat reciprocal  -> 0.3333333333333333333 
+     3.0 asShortFloat reciprocal  -> 0.3333333 
+    "
 !
 
 rem:something