--- a/MeasurementValue.st	Fri Jan 16 13:18:06 2009 +0100
+++ b/MeasurementValue.st	Fri Jan 16 13:50:14 2009 +0100
@@ -119,6 +119,16 @@
 
 !MeasurementValue class methodsFor:'constants'!
 
+unity
+    "return the neutral element for multiplication"
+
+    ^ 1
+
+    "
+     self unity
+    "
+!
+
 zero
     "return the neutral element for addition (0 +/- 0)"
 
@@ -284,5 +294,5 @@
 !MeasurementValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MeasurementValue.st,v 1.5 2009-01-16 12:18:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MeasurementValue.st,v 1.6 2009-01-16 12:50:14 cg Exp $'
 ! !