diff options
| -rw-r--r-- | challenge-149/conor-hoekstra/apl/ch-1.apl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/challenge-149/conor-hoekstra/apl/ch-1.apl b/challenge-149/conor-hoekstra/apl/ch-1.apl new file mode 100644 index 0000000000..053883ac31 --- /dev/null +++ b/challenge-149/conor-hoekstra/apl/ch-1.apl @@ -0,0 +1,11 @@ +fibDigitSum ← { + ⎕IO ← 0 + fibs ← (⍳+.!⌽∘⍳)¨⍳⍵ + ⍵↑⍸fibs∊⍨{+/⍎¨⍕⍵}¨⍳10×⍵ +} + +⍝ Test +fibDigitSum 20 + +⍝ Output +0 1 2 3 5 8 10 11 12 14 17 20 21 23 26 30 32 35 41 44 |