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
