gistfile1.txt

- map: lambda {
	^self reduce: { obj accum=#[] | accum push lambda(obj) }
}
- _reduce: lambda result: result {
	^self empty? unless: {
		result push lambda(self next)
		^self _map:lambda result: result
	} else: {
		^result
	}
}
- reduce: lambda {
	accum = lambda(self next)
	^self _reduce result accum
}
- map: mapLambda reduce: reduceLambda {
	(self map: mapLambda) reduce: reduceLambda
}