RosettaCodeData/Task/Power-set/FunL/power-set-3.funl
2016-12-05 23:44:36 +01:00

5 lines
134 B
Text

import lists.foldr
def powerset( s ) = foldr( \x, acc -> acc + map( a -> {x} + a, acc), {{}}, s )
println( powerset({1, 2, 3, 4}) )