Power set: Difference between revisions
Content added Content deleted
(K version added) |
|||
| Line 880: | Line 880: | ||
Outputs: |
Outputs: |
||
<pre>[[],[1],[2],[1,2],[3],[1,3],[2,3],[1,2,3],[4],[1,4],[2,4],[1,2,4],[3,4],[1,3,4],[2,3,4],[1,2,3,4]]</pre> |
<pre>[[],[1],[2],[1,2],[3],[1,3],[2,3],[1,2,3],[4],[1,4],[2,4],[1,2,4],[3,4],[1,3,4],[2,3,4],[1,2,3,4]]</pre> |
||
=={{header|K}}== |
|||
<lang K> |
|||
ps:{x@&:'+2_vs!_2^#x} |
|||
</lang> |
|||
Usage: |
|||
<lang K> |
|||
ps "ABC" |
|||
("" |
|||
,"C" |
|||
,"B" |
|||
"BC" |
|||
,"A" |
|||
"AC" |
|||
"AB" |
|||
"ABC") |
|||
</lang> |
|||
=={{header|Logo}}== |
=={{header|Logo}}== |
||