equal
deleted
inserted
replaced
64 "similar to clampBetween:and:" |
64 "similar to clampBetween:and:" |
65 |
65 |
66 ^ (self min: aMin) max: aMax |
66 ^ (self min: aMin) max: aMax |
67 |
67 |
68 "Created: / 06-06-2007 / 11:00:22 / cg" |
68 "Created: / 06-06-2007 / 11:00:22 / cg" |
|
69 ! |
|
70 |
|
71 threeWayCompareWith:arg |
|
72 "alias for compareWith:" |
|
73 |
|
74 ^ self compareWith:arg |
|
75 |
|
76 "Created: / 24-07-2019 / 10:10:08 / Claus Gittinger" |
69 ! ! |
77 ! ! |
70 |
78 |
71 !Magnitude methodsFor:'comparing'! |
79 !Magnitude methodsFor:'comparing'! |
72 |
80 |
73 < aMagnitude |
81 < aMagnitude |