Either the first hint does not work or I misunderstood:
( TroubleMaker=. `(<_1;~":0))
`_1
┌─┬────┐
│`│┌──┐│
│ ││_1││
│ │└──┘│
└─┴────┘
(5!:5)<'TroubleMaker' NB. This is the problem..
`_1
( ATOMIC=. (5!:1)< 'TroubleMaker' ) NB. It seems fine...
┌────────────────────┐
│┌─┬────────────────┐│
││4│┌─┬────────────┐││
││ ││`│┌─┬────────┐│││
││ ││ ││0│┌──────┐││││
││ ││ ││ ││┌─┬──┐│││││
││ ││ ││ │││0│_1││││││
││ ││ ││ ││└─┴──┘│││││
││ ││ ││ │└──────┘││││
││ ││ │└─┴────────┘│││
││ │└─┴────────────┘││
│└─┴────────────────┘│
└────────────────────┘
(5!:5)<'ATOMIC' NB. It is fine.
<(<,'4'),<(<,'`'),<(<,'0'),<<(,'0');_1
( Name=. ATOMIC (5!:0) ) NB. It seems fine
`_1
┌─┬────┐
│`│┌──┐│
│ ││_1││
│ │└──┘│
└─┴────┘
5!:5 <'Name' NB. This is the same problem again
`_1
((5!:1)<'Name') -: ((5!:1)<'TroubleMaker')
1
NB. (5!:0) and (5!:1) work fine but (5!:5) does not.
*TroubleMaker
┌─┬──────┐
│*│┌─┬──┐│
│ ││0│_1││
│ │└─┴──┘│
└─┴──────┘
*Name
┌─┬──────┐
│*│┌─┬──┐│
│ ││0│_1││
│ │└─┴──┘│
└─┴──────┘
*(`_1)
|domain error
| *(`_1)
|[-15]
(<(<,'4'),<(<,'`'),<(<,'0'),<<(,'0');_1) (5!:0) NB. The current workaround...
`_1
┌─┬────┐
│`│┌──┐│
│ ││_1││
│ │└──┘│
└─┴────┘
*(<(<,'4'),<(<,'`'),<(<,'0'),<<(,'0');_1) (5!:0) NB. ...behaves fine.
┌─┬──────┐
│*│┌─┬──┐│
│ ││0│_1││
│ │└─┴──┘│
└─┴──────┘
________________________________________
From: programming-boun...@jsoftware.com [programming-boun...@jsoftware.com] on
behalf of Raul Miller [rauldmil...@gmail.com]
Sent: Monday, February 27, 2012 1:25 PM
To: Programming forum
Subject: Re: [Jprogramming] tacit adverb
2012/2/26 Jose Mario Quintana <josemarioquint...@2bestsystems.com>:
> That conjunction is useful but as an alternative to (`) instead of a
> replacement otherwise the definition of the also useful (`'') would be
> longer, for example, ( (`*)(((("_)(,@:{.@:))(` _))(`:6)) ) where (`) is its
> replacement (although an improved shorter definition might be possible it
> would still be longer than (`'') ).
>
> I believe Thomas is correct in his analysis (unless a higher authority states
> otherwise). I can understand now that I can manually produce a lean linear
> representation (a lot shorter than the general workaround method) of a
> trouble-making adverb that I have written because I know what I meant but
> (5!:5) does not (if you know what I mean). However, I am still somewhat
> confused: Why the atomic representation (5!:1) and (`:6) or (5!:0) have no
> difficulties? At any rate, if I recall correctly, it has been stated that
> (13 :) generates tacit equivalents of explicit verbs based on how they would
> be executed. I wonder if a similar approach could be used to generate a lean
> linear representation of a trouble-making adverb.
I am sure that 5!:0 has support code for each primitive. Thus, to
convert from atomic representation to linear representation
name=. atomicRep 5!:0
5!:5 <'name'
Or you could build your own lookup table with every primitive represented.
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
[BEST LLC]
Bayesian Efficient Strategic Trading LLC
The information in this communication and any attachment is confidential and
intended solely for the attention and use of the named addressee(s). Any views
or opinions presented are solely those of the author and do not necessarily
represent those of BEAM Bayesian Efficient Asset Management, LLC (BEAM),
Bayesian Efficient Strategic Trading, LLC (BEST) and/or their affiliates unless
otherwise specifically stated. All information and opinions expressed herein
are subject to change without notice. This communication is not to be construed
as an offer to sell or the solicitation of an offer to buy any security. Any
reliance one may place on the accuracy or validity of this information is at
their own risk. Past performance is not necessarily indicative of the future
results of an investment. If you are not the intended recipient, or a person
responsible for delivering this to the intended recipient, you are not
authorized to and must not disclose, copy, distribute, or retain this message
or any part of it. If you are not the intended recipient, please permanently
delete all copies of this communication and any attachments from your computer
system, destroy any hard copies, and immediately notify the sender or BEAM/BEST
at either i...@2bestsystems.com, i...@beamstrategy.com or (201) 792-1002. No
waiver of confidentiality or privilege is made by mistransmission.
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
