--- a/Magnitude.st	Mon Jun 19 14:44:08 2017 +0200
+++ b/Magnitude.st	Mon Jun 19 15:04:52 2017 +0200
@@ -38,7 +38,7 @@
 
 documentation
 "
-    This is an abstract class definining common methods for
+    This is an abstract class defining common methods for
     Objects which can be compared by a kind of less-than relation.
 
     [author:]
@@ -101,8 +101,8 @@
 !
 
 clampBetween:min and:max
-    "return the receiver if its between min .. max,
-     or min if it's less than min, or max of its greater than max.
+    "return the receiver if it is between min .. max,
+     or min if it is less than min, or max if it is greater than max.
      This is only a lazy-typers helper for: ((something min:max) max:min)"
 
     (max < self) ifTrue:[^ max].
@@ -117,6 +117,7 @@
 
     "Modified: / 19-04-1996 / 14:58:12 / cg"
     "Modified (comment): / 13-02-2017 / 20:26:41 / cg"
+    "Modified (comment): / 19-06-2017 / 14:59:47 / mawalch"
 !
 
 compare:arg ifLess:lessBlock ifEqual:equalBlock ifGreater:greaterBlock
@@ -429,7 +430,7 @@
 !Magnitude methodsFor:'testing'!
 
 between:min and:max
-    "return true if the receiver greater than or equal to the argument min
+    "return true if the receiver is greater than or equal to the argument min
      and less than or equal to the argument max"
 
     (self < min) ifTrue:[^ false].
@@ -441,6 +442,8 @@
      (3/2) between:1 and:2
      (3/2) between:0 and:1
     "
+
+    "Modified (comment): / 19-06-2017 / 14:59:05 / mawalch"
 !
 
 in:anInterval