On Thu, Apr 30, 2009 at 3:42 AM, Roger Hui <[email protected]> wrote:
> Raul's idea leads to a considerable simplification:
>
> cut1a=: 1 : '<@[ u&> <;....@]'
Purely tacit adverb for cut1a:
c1=:(&>) (<@[`) (`(<;....@])) (`: 6)
, c1
<@[ ,&> <;....@]
> 'aa' <@,~ cut1a ' now is the time'
> +------+-----+------+-------+
> | nowaa| isaa| theaa| timeaa|
> +------+-----+------+-------+
> 'bbb' <@,~ cut1a ' now is the time'
> +-------+------+-------+--------+
> | nowbbb| isbbb| thebbb| timebbb|
> +-------+------+-------+--------+
>
> <@,~ cut1
> (-:"_1 _ {.)@] (>@{...@[ <@,~ >@])/@|:;.1 <@[ ,. <"_...@]
> <@,~ cut1a
> <@[ <@,~&> <;....@]
>
>
>
> ----- Original Message -----
> From: June Kim <[email protected]>
> Date: Wednesday, April 29, 2009 11:06
> Subject: Re: [Jprogramming] Purely tacit version for x&f;._1 y
> To: Programming forum <[email protected]>
>
>> On Thu, Apr 30, 2009 at 2:46 AM, Roger Hui <[email protected]> wrote:
>> > u;.n is meant to apply the monad u . However, it can
>> > do what I think you asked, in so doing kicking and screaming
>> > all the while:
>> >
>> > cut1=: 1 : '(-:"_1 _ {.)@] (>@{...@[ u >@])/@|:;.1 (<@[ ,.
>> <"_...@])'
>> My goodness. Yet, it's not purely tacit. However, again, thanks for
>> something to chew over.
>>
>> >
>> > 'aa' <@,~ cut1 ' now is the time'
>>
>> Cool!
>>
>> > +------+-----+------+-------+
>> > | nowaa| isaa| theaa| timeaa|
>> > +------+-----+------+-------+
>> > 'bbb' <@,~ cut1 ' now is the time'
>> > +-------+------+-------+--------+
>> > | nowbbb| isbbb| thebbb| timebbb|
>> > +-------+------+-------+--------+
>> >
>> >
>> >
>> > ----- Original Message -----
>> > From: June Kim <[email protected]>
>> > Date: Wednesday, April 29, 2009 10:21
>> > Subject: [Jprogramming] Purely tacit version for x&f;._1 y
>> > To: Programming forum <[email protected]>
>> >
>> >> Could you write a purely tacit verb for x&f;._1 y, given that f
>> >> is a
>> >> dyadic verb? I squeezed out a few seeminly possible paths but
>> without>> avail.
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
