uc (]{~ [:+/(,:-.)@e.~((1<@|."1[)#^:_1&> (<@#i.@#))])'abcDEfghI'
abDEcfgIh
uc (]{~ [:+/(,:-.)@e.~((1<@|."1[)#^:_1&> (<@#i.@#))])'AbC'
bAC
uc (]{~ [:+/(,:-.)@e.~((1<@|."1[)#^:_1&> (<@#i.@#))])'XYZ'
XYZ
Failed Bantchev's second test also.
R.E. Boss
> -----Oorspronkelijk bericht-----
> Van: [email protected] [mailto:programming-
> [email protected]] Namens Boyko Bantchev
> Verzonden: dinsdag 9 augustus 2011 21:39
> Aan: Programming forum
> Onderwerp: Re: [Jprogramming] Materials for NYCJUG meeting today -
> Tuesday 8/9 at Empire State Building
>
> On 9 August 2011 21:11, Marshall Lochbaum <[email protected]>
> wrote:
> > Here's the selection option, which is equally ugly:
> > ................
>
> ... and buggy :)
>
> shift 'AbC'
> bCb
>
> shift 'XYZ'
> |index error: shift
>
>
> On 9 August 2011 22:15, Henry Rich <[email protected]> wrote:
> > 'lc uc' =. +&(i.26)&.(a.&i.)"0 'aA'
> > p =. e.&uc
> > shift =. {~ (;@(<@(1&|.);.1) i.@#)@:-.@:p
>
> shift 'AbC'
> Cb
>
> $ shift 'XYZ'
> 0
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
