APL Wiki|
Size: 916
Comment: Examples added
|
← Revision 6 as of 2015-01-28 19:56:23 ⇥
Size: 918
Comment:
|
| Deletions are marked like this. | Additions are marked like this. |
| Line 33: | Line 33: |
| CategoryShowcases, CategoryDyalog | CategoryShowCases, CategoryDyalog |
Meaning of Life (Hitchhiker`s Guide to the Galaxy)
As you might know, the answer to the ultimate question is 42, according to Douglas Adams`s famous book "Hitchhiker`s Guide to the Galaxy".
We do not need a supercomputer and millions of years to prove that. Whatever you specify as right argument to this function:
MeaningOfLife←{+.×/⍎⊖⍕⊃¨⊂|⌊-*+○⌈∨.∧/>\</×÷!⌽⍉⌹~⍴⍋⍒,⍟?⍳''≡1↑0⍴∊⍵}...will produce THE answer, for example:
MeaningOfLife 1
42
MeaningOfLife 'aaa'
42
MeaningOfLife¨10 4⍴2 (2 3) 'abcdef'
42 42 42 42
42 42 42 42
42 42 42 42
42 42 42 42
42 42 42 42
42 42 42 42
42 42 42 42
42 42 42 42
42 42 42 42
42 42 42 42