accessing
draw
	| taken |
	taken := self stock atRandom.
	self drawn add: taken.
	^ taken