My terminal has garbled much of the output, so I
drop the previous content.
I use
psmn
((] # 2:) #: >:@i.@(_2: + 2: ^ ])) #L:0"1 <@i.
which gives the power set without the null set
and the relative universal set.
Then psmm=: (psm @#){ L:0 <@]
would give what SC wanted (except for the null
and universal).
Wouldn't be fast, I think.
On 2016.05.08 00:18:40, you,
the extraordinary Skip Cave, spake thus:
> Nice! However, I realized that I didn't specify my problem in quite
> enough detail. I need to keep duplicated integers in the final
> sub-sets:
--
Nollaig MacKenzie
ftp://ftp.nollaig.ca/pub/pap/
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm