Raul, I like your use of capitals for data and small letters for functrions, 
so...

   T =: 2 2 $ +/`|:`|.`(-/ .*)
   T
┌───────┬───────────────┐
│┌─┬───┐│|:             │
││/│┌─┐││               │
││ ││+│││               │
││ │└─┘││               │
│└─┴───┘│               │
├───────┼───────────────┤
│|.     │┌─┬───────────┐│
│       ││.│┌───────┬─┐││
│       ││ ││┌─┬───┐│*│││
│       ││ │││/│┌─┐││ │││
│       ││ │││ ││-│││ │││
│       ││ │││ │└─┘││ │││
│       ││ ││└─┴───┘│ │││
│       ││ │└───────┴─┘││
│       │└─┴───────────┘│
└───────┴───────────────┘
   f=: T (4 :'<y`:0 x'"_ 0&)
   f i.2 2
┌───┬───┐
│2 4│0 2│
│   │1 3│
├───┼───┤
│2 3│_2 │
│0 1│   │
└───┴───┘
   

Linda


-----Original Message-----
From: [email protected]

re.com [mailto:[email protected]] On Behalf Of Linda 
Alvord
Sent: Monday, April 15, 2013 8:58 AM
To: [email protected]
Subject: Re: [Jprogramming] Table of Verbs

Kip, Raul's works with a space after 4

   T =: 2 2 $ +/`|:`|.`(-/ .*)
   U=: T (4:'<y`:0 x'"_ 0&)
   U i.2 2
4
   U=: T (4 :'<y`:0 x'"_ 0&)
   U i.2 2
┌───┬───┐
│2 4│0 2│
│   │1 3│
├───┼───┤
│2 3│_2 │
│0 1│   │
└───┴───┘
   
I don't know why yet, but I'll figure it out.

Linda


-----Original Message-----
From: [email protected] 
[mailto:[email protected]] On Behalf Of Raul Miller
Sent: Monday, April 15, 2013 8:23 AM
To: Programming forum
Subject: Re: [Jprogramming] Table of Verbs

   U=: T (4 :'<y`:0 x'"_ 0&)

U i. 2 2

+---+---+

|2 4|0 2|

| |1 3|

+---+---+

|2 3|_2 |

|0 1| |

+---+---+


--
Raul


On Mon, Apr 15, 2013 at 6:15 AM, km <[email protected]> wrote:
> Your use of `: is very neat, thank you, but the desired results are 
> those of U below. --Kip
>
>     T =: 2 2 $ +/`|:`|.`(-/ .*)
>     <"2 (T `: 0)  i. 2 2
>  +---+----+
>  |2 4|0 2 |
>  |0 0|1 3 |
>  +---+----+
>  |2 3|_2 0|
>  |0 1| 0 0|
>  +---+----+
>     <"2 (T `: 0)  i. 3 3
>  +-------+-----+
>  |9 12 15|0 3 6|
>  |0  0  0|1 4 7|
>  |0  0  0|2 5 8|
>  +-------+-----+
>  |6 7 8  |0 0 0|
>  |3 4 5  |0 0 0|
>  |0 1 2  |0 0 0|
>  +-------+-----+
>
>     U i.2 2
>  +---+---+
>  |2 4|0 2|
>  |   |1 3|
>  +---+---+
>  |2 3|_2 |
>  |0 1|   |
>  +---+---+
>     U i. 3 3
>  +-------+-----+
>  |9 12 15|0 3 6|
>  |       |1 4 7|
>  |       |2 5 8|
>  +-------+-----+
>  |6 7 8  |0    |
>  |3 4 5  |     |
>  |0 1 2  |     |
>  +-------+-----+
>     U
>  2 2 $ +/ ; |: ; |. ; -/ .*
>
>
> Sent from my iPad
>
>
> On Apr 15, 2013, at 4:15 AM, Jan-Pieter Jacobs <[email protected]> 
> wrote:
>
>> I think the answer can be even more compact using the Evoke Gerund
>> conjunction:
>>
>> T =: 2 2 $ +/`|:`|.`(-/ .*)
>> <"2 (T `: 0)  i. 2 2
>> <"2 (T `: 0)  i. 3 3
>>
>> Jan-Pieter
>>
>>
>> 2013/4/15 Linda Alvord <[email protected]>
>>
>>>
>>> A=:i.2 2
>>>   <"2 "."1 (>"0 f)(,"1)2 2 1$'A'
>>> ----T----┐
>>> │2 4│0 2 │
>>> │0 0│1 3 │
>>> +---+----+
>>> │2 3│_2 0│
>>> │0 1│ 0 0│
>>> L---+-----
>>>
>>>   <"2 "."1 (>"0 f)(,"1)2 2 1$'B'
>>> --------T-----┐
>>> │9 12 15│0 3 6│
>>> │0  0  0│1 4 7│
>>> │0  0  0│2 5 8│
>>> +-------+-----+
>>> │6 7 8  │0 0 0│
>>> │3 4 5  │0 0 0│
>>> │0 1 2  │0 0 0│
>>> L-------+------
>>>
>>>
>>> This is getting closer to the answer.  Linda
>>>
>>> -----Original Message-----
>>> From: [email protected]
>>> [mailto:[email protected]] On Behalf Of Linda 
>>> Alvord
>>> Sent: Sunday, April 14, 2013 12:15 PM
>>> To: [email protected]
>>> Subject: Re: [Jprogramming] Table of Verbs
>>>
>>> You just need to exclude the extra zeros somehow.
>>>
>>>  A=:>:i.2 2
>>>   f=: 2 2$ '+/';'|:';'|.';'-/ .*'
>>>   "."1 (>"0 f)(,"1)2 2 1$'A'
>>> 4 6
>>> 0 0
>>>
>>> 1 3
>>> 2 4
>>>
>>>
>>> 3 4
>>> 1 2
>>>
>>> _2 0
>>> 0 0
>>>
>>> Linda
>>>
>>>
>>> -----Original Message-----
>>> From: [email protected]
>>> [mailto:[email protected]] On Behalf Of Raul 
>>> Miller
>>> Sent: Sunday, April 14, 2013 11:45 AM
>>> To: Programming forum
>>> Subject: Re: [Jprogramming] Table of Verbs
>>>
>>> Paper and pencil is a powerful tool of thought. I have yet to see an 
>>> adequate replacement in any computing environment.
>>>
>>> --
>>> Raul
>>>
>>> On Sun, Apr 14, 2013 at 10:41 AM, km <[email protected]> wrote:
>>>> It would be nice if there were a simple way to transform your T into U :
>>>>
>>>>    U =: 2 2 $ +/ ; |: ; |. ; -/ . *
>>>>    U i. 2 2
>>>> +---+---+
>>>> |2 4|0 2|
>>>> |   |1 3|
>>>> +---+---+
>>>> |2 3|_2 |
>>>> |0 1|   |
>>>> +---+---+
>>>>    U i. 3 3
>>>> +-------+-----+
>>>> |9 12 15|0 3 6|
>>>> |       |1 4 7|
>>>> |       |2 5 8|
>>>> +-------+-----+
>>>> |6 7 8  |0    |
>>>> |3 4 5  |     |
>>>> |0 1 2  |     |
>>>> +-------+-----+
>>>>    U
>>>> 2 2 $ +/ ; |: ; |. ; -/ .*
>>>>
>>>> P.S. I probably should have said "One of Ken's handwritten notes 
>>>> for
>>> Linda".
>>>>
>>>> --Kip
>>>>
>>>> Sent from my iPad
>>>>
>>>>
>>>> On Apr 14, 2013, at 9:40 AM, Dan Bron <[email protected]> wrote:
>>>>
>>>>> I wasn't wanting any behavior; I was just answering your question.
>>>>> Is
>>> there something else you wanted, having read Ken's paper (i.e. some 
>>> other question than how to make a table of verbs in J)?
>>>>>
>>>>> -Dan
>>>>>
>>>>> Please excuse typos; composed on a handheld device.
>>>>>
>>>>> On Apr 14, 2013, at 9:00 AM, km <[email protected]> wrote:
>>>>>
>>>>>> Is this the behavior you want?
>>>>>>
>>>>>> T =: 2 2 $ +/`|:`|.`(-/ .*)
>>>>>>  T i. 2 2
>>>>>> 2
>>>>>>  T i. 3 3
>>>>>> 2
>>>>>>  T
>>>>>> +-------+---------------+
>>>>>> |+-+---+||:             |
>>>>>> ||/|+-+||               |
>>>>>> || ||+|||               |
>>>>>> || |+-+||               |
>>>>>> |+-+---+|               |
>>>>>> +-------+---------------+
>>>>>> ||.     |+-+-----------+|
>>>>>> |       ||.|+-------+-+||
>>>>>> |       || ||+-+---+|*|||
>>>>>> |       || |||/|+-+|| |||
>>>>>> |       || ||| ||-||| |||
>>>>>> |       || ||| |+-+|| |||
>>>>>> |       || ||+-+---+| |||
>>>>>> |       || |+-------+-+||
>>>>>> |       |+-+-----------+|
>>>>>> +-------+---------------+
>>>>>>
>>>>>> --Kip
>>>>>>
>>>>>> Sent from my iPad
>>>>>>
>>>>>>
>>>>>> On Apr 14, 2013, at 8:36 AM, Dan Bron <[email protected]> wrote:
>>>>>>
>>>>>>> 2 2 $ +/`|:`|.`(-/ .*)
>>>>>>>
>>>>>>> Please excuse typos; composed on a handheld device.
>>>>>>>
>>>>>>> On Apr 14, 2013, at 8:24 AM, km <[email protected]> wrote:
>>>>>>>
>>>>>>>> One of Ken's notes shows a "table of verbs".  A two by two 
>>>>>>>> example in J might be
>>>>>>>>
>>>>>>>> +/   |:
>>>>>>>>
>>>>>>>> |.   -/.*
>>>>>>>>
>>>>>>>> How would you implement such a table in J?
>>>>>>>>
>>>>>>>> --Kip Murray
>>>>>>>>
>>>>>>>> Sent from my iPad
>>>>>>>>
>>>>>>>>
>>>>>>>> On Apr 13, 2013, at 11:53 PM, "Linda Alvord"
>>>>>>>> <[email protected]>
>>> wrote:
>>>>>>>>
>>>>>>>>> Here are some copies of notes that Ken made over the years.
>>>>>>>>>
>>>>>>>>>
>>>>>>>>> http://www.jsoftware.com/jwiki/KenIversonNotes-LindaAlvord
>>>>>>>>>
>>>>>>>>> Linda
>>>>>>>> ---------------------------------------------------------------
>>>>>>>> ---
>>>>>>>> ---- For information about J forums see 
>>>>>>>> http://www.jsoftware.com/forums.htm
>>>>>>> ----------------------------------------------------------------
>>>>>>> ---
>>>>>>> --- For information about J forums see 
>>>>>>> http://www.jsoftware.com/forums.htm
>>>>>> -----------------------------------------------------------------
>>>>>> ---
>>>>>> -- For information about J forums see 
>>>>>> http://www.jsoftware.com/forums.htm
>>>>> ------------------------------------------------------------------
>>>>> ---
>>>>> - For information about J forums see 
>>>>> http://www.jsoftware.com/forums.htm
>>>> -------------------------------------------------------------------
>>>> --- For information about J forums see 
>>>> http://www.jsoftware.com/forums.htm
>>> --------------------------------------------------------------------
>>> -- For information about J forums see 
>>> http://www.jsoftware.com/forums.htm
>>>
>>> --------------------------------------------------------------------
>>> -- For information about J forums see 
>>> http://www.jsoftware.com/forums.htm
>>> --------------------------------------------------------------------
>>> -- For information about J forums see 
>>> http://www.jsoftware.com/forums.htm
>> ---------------------------------------------------------------------
>> - For information about J forums see 
>> http://www.jsoftware.com/forums.htm
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
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