Anonymous user
Power set: Difference between revisions
Added racket version
(Added powerset method for actual set class.) |
(Added racket version) |
||
Line 1,604:
{{}, {1}, {"qwerty"}, {<<list(2)>>}, {1, <<list(2)>>}, {"qwerty",
1}, {"qwerty", <<list(2)>>}, {"qwerty", 1, <<list(2)>>}}
=={{header|Racket}}==
<lang scheme>;;; Direct translation of 'functional' ruby method
(define (powerset s)
(for/fold ([outer-set (set(set))])
([element s])
(set-union outer-set
(list->set (set-map
outer-set
(λ(inner-set)(set-add inner-set element)))))))</lang>
=={{header|Ruby}}==
| |||