'From Squeak3.11alpha of 13 February 2010 [latest update: #9483] on 9 March 2010 at 11:11:22 am'! !Collection methodsFor: 'math functions' stamp: 'klc 3/7/2010 18:50'! minMax "Scans for minimum and maximum in one pass returning the results as a two-element array" | min max | min := max := self anyOne. self do: [ :each | min := min min: each. max := max max: each ]. ^ Array with: min with: max! !