Power set: Difference between revisions
Content added Content deleted
m (→{{header|Go}}: typo) |
(Added Bracmat example) |
||
Line 186: | Line 186: | ||
{{},{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}} |
{{},{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> |
||
=={{header|Bracmat}}== |
|||
<lang bracmat>( ( powerset |
|||
= done todo first |
|||
. !arg:(?done.?todo) |
|||
& ( !todo:%?first ?todo |
|||
& (powerset$(!done !first.!todo),powerset$(!done.!todo)) |
|||
| !done |
|||
) |
|||
) |
|||
& out$(powerset$(.1 2 3 4)) |
|||
);</lang> |
|||
Output: |
|||
<pre> 1 2 3 4 |
|||
, 1 2 3 |
|||
, 1 2 4 |
|||
, 1 2 |
|||
, 1 3 4 |
|||
, 1 3 |
|||
, 1 4 |
|||
, 1 |
|||
, 2 3 4 |
|||
, 2 3 |
|||
, 2 4 |
|||
, 2 |
|||
, 3 4 |
|||
, 3 |
|||
, 4 |
|||
,</pre> |
|||
=={{header|Burlesque}}== |
=={{header|Burlesque}}== |