--- a/Timestamp.st	Wed Jun 23 12:50:05 2021 +0100
+++ b/Timestamp.st	Wed Jun 23 21:53:27 2021 +0000
@@ -1172,12 +1172,13 @@
         ] ifFalse:[ ( format = 'f'  or:[ format = 'F' ]) ifTrue:[
             fractionString := input upToMatching:[:ch | ch isDigit not].
             fraction := FixedPoint readFrom:'0.',fractionString.
+            fraction printString.
             format = 'f' ifTrue:[
                 millisecond := (fraction * 1000) truncated.
             ] ifFalse:[
-                picos := (fraction * 1000*1000*1000*1000) truncated.
-                millisecond := picos // (1000*1000*1000).
-                picos := picos \\ (1000*1000*1000).
+                picos := (fraction * 1000000000000) truncated.
+                millisecond := picos // (1000000000).
+                picos := picos \\ (1000000000).
             ].
         ] ifFalse:[ ( format = 'tz' ) ifTrue:[
             utcOffset := self utcOffsetFrom:input.