--- a/ShortFloat.st	Thu Mar 10 16:46:14 2016 +0100
+++ b/ShortFloat.st	Thu Mar 10 16:46:23 2016 +0100
@@ -564,6 +564,11 @@
      (although only 23 are needed in the binary representation)"
 
     ^  24
+
+    "
+     self numBitsInMantissa + 1
+     self precision
+    "
 !
 
 radix