The Power of Words! require'csv web/gethttp' ]A=:'"Sea a Seahorse." "Where?" "The Seashore!' words=: [: ;: ' '"_`(I.@:= toupper)`]}~@tolower ;:A words A (,.;:A);<,.words A
Linda -----Original Message----- From: Programming [mailto:[email protected]] On Behalf Of Brian Schott Sent: Thursday, January 28, 2016 9:40 AM To: Programming forum Subject: Re: [Jprogramming] k programming challenge Henry, Yes, your information makes the Dissect much more useful. I'm sorry for mistaking |. for I. And now I notice that the alternating colors of the numbers in that block are signal 2 first single digit numbers, followed by double digit numbers. Before I thought they were all double digit and I could make no sense of the block. (I was disappointed in the linewrap problems in your reply so I tried using jsoftware.com/forumsearch but unfortunately I could not find my message there.) Thanks, ([: ;: ' '"_`(I.@:= toupper)`]}~@tolower)y +----------------------------------+ | y | | 66 | |Though, of course, it's po... | | | +-----------------+----------------+ | +-----------------+----------------+ | tolower 1 | |though, of course, it's po... | | | | | +----------------------------------+ +-+------------+--------+--------------------| | | | | +----------------------------------+ | | | | | toupper 1 | | | | | |THOUGH, OF COURSE, IT'S PO... | | | | | | | +------+-+-+ | | | | | 1 (m"_) 1| | | +-----------------+----------------+ | atom | | +---------------| | | | | +-------------------+--------------+ +-----+----+ | | 0=0 | | | | 66 | +-------------+---------------+-+ |0000001000... | | 0 m} 1 | | | | 66 | +-----------------------------+----+ |though of course it s po... | +---------------+ | +--------------+----------------+---------------+ I. 1 | | | | 12 +-----+ +--------------+----------------+ |69161720223134 | | ;: 11 | +---------------+ |though|of|course|it|s|po... | | | +-------------------------------+ On Wed, Jan 27, 2016 at 4:26 PM, Henry Rich <[email protected]> wrote: > That's not |. in the lower-right - it's I. > > Dissect displays ~ indirectly: by switching the wiring (for x u~ y) or > wiring a result to both x and y (for u~ y). > > Here, the display is streamlined considerably: the block for ] is > deleted (replaced by a wire) and the verb ' '"_ is shown simply as a > constant. The m} block has a left input from ' '"_, a right input > from tolower, and a control input (on the right) from I. . tolower feeds > into 3 blocks: > toupper, =, and m} . > > If you want to see more of the original, you can go to Preferences and > check 'Show ][ and 0-9:'. See if you like that better. > > Henry Rich > > > >> ([: ;: ' '"_`(I.@:= toupper)`]}~@tolower)y >> +----------------------------------+ >> | y >> | >> | 66 >> | >> |Though, of course, it's po... >> | >> | >> | >> >> +-----------------+----------------+ >> | >> >> +-----------------+----------------+ >> | tolower 1 >> | >> |though, of course, it's po... >> | >> | >> | >> | >> | >> >> +-----------------+----------------+ >> | >> >> +-----------------+----------------+ >> | toupper 1 >> | >> |THOUGH, OF COURSE, IT'S PO... >> | >> | >> | >> +----------+ | >> | >> | 1 (m"_) 1| >> +-----------------+----------------+ >> | atom | | >> | | >> +-------------------+--------------+ >> +-----+----+ | 0=0 >> | >> | | 66 >> | >> +-------------+-----------------+ |0000001000... >> | >> | 0 m} 1 | | >> | >> | 66 | >> +-----------------------------+----+ >> |though of course it s po... | +---------------+ | >> +--------------+----------------+---------------+ |. 1 | | >> | | 12 +-----+ >> +--------------+----------------+ |69161720223134 | >> | ;: 11 | +---------------+ >> |though|of|course|it|s|po... | >> | | >> +-------------------------------+ >> >> >> >> >> > > -- (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
