Tree diagrams are helpful to illustrate the differences between tacit and 
explicit definitions.

comb
                    ┌─ <
              ┌─ @ ─┴─ #
  ┌─ ~ ─── " ─┴─ 1      
  │                     
──┤     ┌─ [:           
  │     ├─ #:           
  └─────┤     ┌─ [:     
        │     ├─ i.     
        └─────┤     ┌─ 2
              └─────┼─ ^
                    └─ #
   
   
   combe
  ┌─ ]                  
  │                ┌─ [:
  │           ┌────┼─ < 
  ├─ ~ ─── " ─┤    └─ # 
──┤           └─ 1      
  │     ┌─ [:           
  │     ├─ #:           
  └─────┤     ┌─ [:     
        │     ├─ i.     
        └─────┤    ┌─ 2 
              └────┼─ ^ 
                   └─ # 
   
   Linda

-----Original Message-----
From: Programming <[email protected]> On Behalf Of Linda 
Alvord
Sent: Thursday, March 14, 2019 12:55 AM
To: [email protected]
Subject: Re: [Jprogramming] new tasks at rosettacode.org

Well Dave, I finally wrote and explicit definition for the last atop.

comb '135'
┌┬─┬─┬──┬─┬──┬──┬───┐
││5│3│35│1│15│13│135│
└┴─┴─┴──┴─┴──┴──┴───┘
   
   
    combe=: 13 :'y ([:<#)"1~ #: i. 2 ^ # y'
    combe '135' 
┌┬─┬─┬──┬─┬──┬──┬───┐
││5│3│35│1│15│13│135│
└┴─┴─┴──┴─┴──┴──┴───┘

Linda

-----Original Message-----
From: Programming <[email protected]> On Behalf Of Linda 
Alvord
Sent: Sunday, March 10, 2019 11:34 AM
To: [email protected]
Subject: Re: [Jprogramming] new tasks at rosettacode.org

Hi Dave,
Two @;@'s down. One to go.

fe=: 13 :'\:~_".;({~ [:perm#)L:_1 }.comb y'
   (fe '135')-:f '135'
1
   
   f
[: \:~ _ ". [: ; [: ({~ perm@#)L:_1 }.@comb
   fe
[: \:~ _ ". [: ; [: ({~ ([: perm #))L:_1 [: }. comb
   

My native language is explicit.

Linda

-----Original Message-----
From: Programming <[email protected]> On Behalf Of Linda 
Alvord
Sent: Tuesday, March 5, 2019 9:22 AM
To: [email protected]
Subject: Re: [Jprogramming] new tasks at rosettacode.org



Hi Dave,

Beautiful J and only 3 @'s!


Linda

'



Sent from my Verizon, Samsung Galaxy smartphone
-------- Original message --------
From: David Lambert <[email protected]>
Date: 3/5/19 8:06 AM (GMT-05:00)
To: programming <[email protected]>
Subject: [Jprogramming] new tasks at rosettacode.org

I submitted entries to many newly seen by me rosetta code tasks. There was some 
low hanging fruit, such as involving totients.

There is a stretch goal for
https://eur01.safelinks.protection.outlook.com/?url=http%3A%2F%2Frosettacode.org%2Fwiki%2FLargest_number_divisible_by_its_digits&amp;data=02%7C01%7C%7Cf836faa20a8f4bce496b08d6a83930fc%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636881360917110741&amp;sdata=LmnqJpUhW77JRhEwc4FPPJkzmWpRPrPT4Za4JtRrdDM%3D&amp;reserved=0
 to work in base 16.  I solved the problem in base 7 instead to show how it 
might be done without bothering to figure out if I had the resources for all 
permutations of all combinations of fifteen digits.  0 isn't one of the digits.

Enjoy, Dave

----------------------------------------------------------------------
For information about J forums see 
https://eur01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&amp;data=02%7C01%7C%7Cf836faa20a8f4bce496b08d6a83930fc%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636881360917120746&amp;sdata=7qpBVsXq26jetg8CojvQf8MpYcIwXXupVjK656nawVU%3D&amp;reserved=0
----------------------------------------------------------------------
For information about J forums see 
https://eur01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&amp;data=02%7C01%7C%7Cf836faa20a8f4bce496b08d6a83930fc%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636881360917120746&amp;sdata=7qpBVsXq26jetg8CojvQf8MpYcIwXXupVjK656nawVU%3D&amp;reserved=0
----------------------------------------------------------------------
For information about J forums see 
https://eur01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&amp;data=02%7C01%7C%7Cf836faa20a8f4bce496b08d6a83930fc%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636881360917120746&amp;sdata=7qpBVsXq26jetg8CojvQf8MpYcIwXXupVjK656nawVU%3D&amp;reserved=0
----------------------------------------------------------------------
For information about J forums see 
https://eur01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&amp;data=02%7C01%7C%7Cf836faa20a8f4bce496b08d6a83930fc%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636881360917130757&amp;sdata=%2Bkwg92ndzQEuL5HXzHbp7k0jL%2BPKtQMgvbDUbjd7%2BLE%3D&amp;reserved=0
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to