--- a/QuadFloat.st	Fri Jun 07 03:25:27 2019 +0200
+++ b/QuadFloat.st	Fri Jun 07 03:27:38 2019 +0200
@@ -2090,6 +2090,17 @@
     ^ Pi
 
     "Created: / 06-06-2019 / 17:09:51 / Claus Gittinger"
+!
+
+unity
+    "return the neutral element for multiplication (1.0) as QuadFloat"
+
+    QuadFloatOne isNil ifTrue:[
+        QuadFloatOne := 1.0 asQuadFloat.
+    ].
+    ^ QuadFloatOne
+
+    "Created: / 07-06-2019 / 03:26:38 / Claus Gittinger"
 ! !
 
 !QuadFloat class methodsFor:'error reportng'!