>./+.z^0j1-z=: 0j_10
3.13112e7
    >./+.y^0j1-y=: 0j_10
3.13112e7
    >./+.y^0j1-y=. 0j_10
3.13112e7
    13 :'>./+.y^0j1-y' 0j_10
3.13112e7
    13 :'>./+.y^0j1-y'
[: >./ [: +. ] ^ 0j1 - ]
   ([: >./ [: +. ] ^ 0j1 - ]) 0j_10
3.13112e7
   ([: >./ [: +. ] ^ 0j1&-) 0j_10
3.13112e7
   >./ +. (^ 0j1&-) 0j_10
3.13112e7
   >./+.(^0j1&-)0j_10
3.13112e7

I hope this helps,

-- 
Raul


On Tue, Apr 18, 2017 at 10:54 PM, Richard Donovan <[email protected]> wrote:
> Can anyone show me how to eliminate having to define z and use it later is 
> this code snippet? I'm playing code golf and think I can get J to number 1 if 
> I could lose the extra bytes!
>
>
> TIA
>
>
>  >./+.z^0j1-z=: 0j_10
> 3.13112e7
> ----------------------------------------------------------------------
> 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