On Tue, Aug 4, 2009 at 10:58 AM, Tracy Harms<[email protected]> wrote:
> On Mon, Aug 3, 2009 at 9:21 PM, Raul Miller<[email protected]> wrote:
>> powSet=: /:~@:(<@#~) 2 (#"1~ +./)@#:@i...@^#
...
> Thank you very much for providing your revision, by the way. The
> technique of (#"1~ +./) to get around the anomaly at zero was
> instructive.
Here's a variation which you might like:
powSet=: /:~@:(<@#~) 2 (#"1~ {:)@#:@i...@^#
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm