https://pharo.fogbugz.com/default.asp?13116
> Point>>vertex: aPoint > ^aRectangle vertex: self vertex: aPoint > > Rectangle class>>vertex: point1 vertex: point2 > ^self origin: (point1 min: point2) corner: (point1 max: point2)
https://pharo.fogbugz.com/default.asp?13116
> Point>>vertex: aPoint > ^aRectangle vertex: self vertex: aPoint > > Rectangle class>>vertex: point1 vertex: point2 > ^self origin: (point1 min: point2) corner: (point1 max: point2)