Right Brian, the adverb ce is a shorthand for concatevoke. These are usual
definitions in the sense that I have mentioned them a lot before. See, for
example, the post [0]. The verb an is a standard way to atomize nouns;
however, it can also take verbs, adverbs and conjunctions as arguments
(with the benefit of hindsight I think aw would have been a better name).
The verb train is one of the best in a family of controversial cheaters; it
is an illegal verbalized version of the adverb `:6.
Thus,
(19$E`O) &([ , an@:]) 100
┌─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬─┬───────┐
│E│O│E│O│E│O│E│O│E│O│E│O│E│O│E│O│E│O│E│┌─┬───┐│
│ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ ││0│100││
│ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │└─┴───┘│
└─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴─┴───────┘
((19$E`O) &([ , an@:]) 100)`:6
98
97
95
94
92
91
89
88
86
85
83
82
80
79
77
76
74
73
71
71
(19$E`O) ( ce=. &([ train@:, an@:]) ) 100
98
97
95
94
92
91
89
88
86
85
83
82
80
79
77
76
74
73
71
71
In this instance train is producing a noun but it is able to produce any
word; for example (*:),
train *:`'' 1 2 3
1 4 9
Why would one want to cheat? For a rabid tacit adverbial writer this is
Deus ex machina. (I could nor resist the temptation to rewrite
concatevoke.)
If I had use a tacit specific verb related to your initial post I would
probably settle for a dyadic version of Tikkanz clever solution,
v=. (] , 2 3 -~ {:)@:]^:[
10 v 100
100 98 97 95 94 92 91 89 88 86 85 83 82 80 79 77 76 74 73 71 70
[0] [Jprogramming] Tacit?
http://www.jsoftware.com/pipermail/programming/2014-January/034510.html
On Mon, Jul 13, 2015 at 11:51 PM, Brian Schott <[email protected]>
wrote:
> Pepe,
>
> This solution seems to be inspired by Raul's automated version, but I
> cannot be sure because the "usual definition"s are a little new and opaque
> to me. Clearly it works nicely though.
>
> Thank you,
>
>
> On Mon, Jul 13, 2015 at 6:26 PM, Jose Mario Quintana <
> [email protected]> wrote:
>
> > Actually, I my mind I thought it was from left to right but the exercise
> is
> > from right to left. So,
> >
> > ce=. &([ train@:, an@:]) NB. It is even easier than I thought!
> >
> > 0 0$(19$E`O)ce 100
> >
>
> --
> (B=)
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
