Kartik Agaram akkartik

Building simple, low-maintenance programs that reward curiosity about their internals.

timyates / fact.groovy

Created March 6, 2013 14:16

Y combinator factorial in Groovy

	fact_improver = { partial ->
	{ BigInteger n ->
	n == 0 ? 1 : n * partial( n - 1 )
	}
	}

	y = { improver ->
	{ gen -> { BigInteger n -> improver( gen( gen ) )( n ) } } { gen ->
	{ BigInteger n -> improver( gen( gen ) )( n ) } }
	}