Althought Brian emailed me directly, I suppose he intended to share it
with the community. Hence, I share my reply, too.
Included is a possible omission in the release notes of j602.
2008/4/7, June Kim <[EMAIL PROTECTED]>:
> Thank you for pointing it out.
>
> Firstly, I thought about using \, but I couldn't easily come up with
> applying infix to both x and y. After looking at your suggestion, I
> was reminded again how many times I enjoyed using compose and under.
>
> However, trying your code on my j601 didn't work. I tried it on j602
> and it worked. I looked into the release notes but there is no entry
> referring to the addition of inverse of infix.
>
> Time to move on to j602.
>
> -------
> On j602:
> (_2&(]\)) i. 10
> 0 1
> 2 3
> 4 5
> 6 7
> 8 9
> a=.(_2&(]\)) i. 10
> (_2&(]\))^:_1 a
> 0 1 2 3 4 5 6 7 8 9
>
> ------
> On j601:
> (_2&(]\)) i. 10
> 0 1
> 2 3
> 4 5
> 6 7
> 8 9
> a=.(_2&(]\)) i. 10
> (_2&(]\))^:_1 a
> |domain error
> | (_2&(]\))^:_1 a
> |[-2]
>
>
> 2008/4/7, Brian Schott <[EMAIL PROTECTED]>:
> > June,
> >
> > Isn't your verb width like ]\ ? For example I am
> > able to get good space reductions using the following (Btw,
> > I am defining char1 and char2 using only 1e5). .
> >
> > 7!:2 'char2 GTE"1&.(_500&(]\)) char1'
> > 405248
> >
> >
> > On Sun, 6 Apr 2008, June Kim wrote:
> >
> > Maybe you could kill two birds with one stone?
> >
> > width=: 13 : '((>.x%~#y), x)$y'
> >
> > chunkGTE=: 3 : 0
> > c2c=: y width char2
> > c1c=: y width char1
> > c2c GTE"1 c1c
> > )
> > nochunkGTE=: 3 : 0
> > char2 GTE char1
> > )
> >
> > ts 'chunkGTE 10000'
> > 0.0509914 1.2967e6
> > ts 'nochunkGTE 0'
> > 0.0646672 1.2585e7
> >
> >
> > 2008/4/6, Raul Miller <[EMAIL PROTECTED]>:
> > > On Sun, Apr 6, 2008 at 4:41 AM, david alis <[EMAIL PROTECTED]> wrote:
> > > > GTE =: a. {~ >. & (a. i. ])
> > > ...
> > > > Is there an alternative, or is there a form of the expression that
> > > > would use special code?
> > >
> > > You can trade space for time, using GTE"0
> > >
> > > --
> > > Raul
> > > ----------------------------------------------------------------------
> > > For information about J forums see http://www.jsoftware.com/forums.htm
> > >
> > ----------------------------------------------------------------------
> > For information about J forums see http://www.jsoftware.com/forums.htm
> >
> >
> > (B=) <----------my "sig"
> >
> > Brian Schott
> > Atlanta, GA, USA
> > schott DOT bee are eye eh en AT gee em ae eye el DOT com
> > http://schott.selfip.net/~brian/
> >
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
