After I realized that reading the specs properly is the key to creating viable 
solutions, I came up with:

   Foo=: ((#~ 0&<:),(#~ 0&>))@:/:~ 
   Foo 2 0 3 _1 _3
0 2 3 _3 _1

About as elegant as swatting a fly with a sledge hammer :-)

Cheers, bob

> On Dec 12, 2018, at 8:27 AM, Henry Rich <[email protected]> wrote:
> 
> Elegant indeed.
> 
> Henry Rich
> 
> On 12/12/2018 11:26 AM, R.E. Boss wrote:
>> Spoiler alert.
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> 
>> Foo=: (\: %)
>> 
>>      Foo 0.5-~10 ?.@# 0
>> 0.19185965 0.22942991 0.2705539 0.48597156 _0.49872704 _0.46163699 
>> _0.44162443 _0.21767412 _0.17071618 _0.16435555
>> 
>> 
>> R.E. Boss
>> 
>> 
>> 
>> ----------------------------------------------------------------------
>> For information about J forums see http://www.jsoftware.com/forums.htm
> 
> 
> ---
> This email has been checked for viruses by AVG.
> https://www.avg.com
> 
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to