--- a/LimitedPrecisionReal.st	Wed May 29 03:43:44 2019 +0200
+++ b/LimitedPrecisionReal.st	Wed May 29 03:51:21 2019 +0200
@@ -1504,7 +1504,6 @@
    ^ 0
 ! !
 
-
 !LimitedPrecisionReal methodsFor:'special access'!
 
 partValues:aBlock
@@ -1520,10 +1519,14 @@
      2.0 partValues:[:sign :exp :mantissa | Transcript showCR:'%1/%2/%3' with:sign with:exp with:mantissa].
      -1.0 partValues:[:sign :exp :mantissa | Transcript showCR:'%1/%2/%3' with:sign with:exp with:mantissa].
      -2.0 partValues:[:sign :exp :mantissa | Transcript showCR:'%1/%2/%3' with:sign with:exp with:mantissa].
+
+     1.0 asShortFloat partValues:[:sign :exp :mantissa | Transcript showCR:'%1/%2/%3' with:sign with:exp with:mantissa].
+     1.0 asLongFloat partValues:[:sign :exp :mantissa | Transcript showCR:'%1/%2/%3' with:sign with:exp with:mantissa].
+     1.0 asLargeFloat partValues:[:sign :exp :mantissa | Transcript showCR:'%1/%2/%3' with:sign with:exp with:mantissa].
     "
 
     "Created: / 26-05-2019 / 03:11:28 / Claus Gittinger"
-    "Modified (comment): / 26-05-2019 / 10:59:46 / Claus Gittinger"
+    "Modified (comment): / 29-05-2019 / 03:49:20 / Claus Gittinger"
 ! !
 
 !LimitedPrecisionReal methodsFor:'testing'!