Neat!  An adverbial variation...

   Wrap=. (&,) ( :.}.) ((&.|.)@)

   'e'Wrap 'lit'
elite

   'l' Wrap 'eve'
level
   'l' Wrap ^:_1 'l' Wrap 'eve'
eve


On Tue, Oct 12, 2021 at 11:05 AM Hauke Rehr <[email protected]> wrote:
>
> I found a somewhat better approach:
>
> DELIM =: 'e'
> utrobique =: (&.|.)@
> wrap =: DELIM&, :. }. utrobique
> wrap 'lit'
> wrap^:_1 wrap 'lit'
>
> still I wonder if I could have done better
> when I only have a single adhoc use of
> (v((&.|.)@))
>
> Am 12.10.21 um 16:39 schrieb Hauke Rehr:
> > I also have uses for it but I’m very unexperienced in using
> > that resurrected modifier language.
> > In a simplified version of an example I have,
> > how is the obverse part written without that much paren noise?
> >
> > wrap =: DELIM&([ , ,~) :. (}.((&.|.)@))
> >
> >
> > Am 05.10.21 um 00:05 schrieb Henry Rich:
> >>
> >> 2. I found the production (A C)->((x A) C x) useful enough in my work
> >> that I gave it a name, the adverbial hook.
> >
>
> --
> ----------------------
> mail written using NEO
> neo-layout.org
>
> ----------------------------------------------------------------------
> 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