accessing
momentum
	^ momentum ifNil: [ 
		momentum := Dictionary new
			at: 'max' put: 10;
			at: 'reset' put: 2;
			at: 'current' put: 2. 
	]