dimitri/apl-competition-2020
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Solve problem 10

Browse source
This commit is contained in:
Dimitri Lozeve 2020-05-09 14:15:08 +02:00
parent 2ec19672f5
commit 78f1d367fb
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
phase1.dyalog
View file

@ -17,4 +17,6 @@
zigzag←∧/2=∘|2-/∘×2-/(10∘⊥⍣¯1) zigzag←∧/2=∘|2-/∘×2-/(10∘⊥⍣¯1)
⍝ 9: Rise and Fall ⍝ 9: Rise and Fall
risefall←{∧/(⍳∘≢≡⍋)¨(⊂((⊢⍳⌈/)↑⊢),⍵),⊂⌽((⊢⍳⌈/)↓⊢),⍵} risefall←{∧/(⍳∘≢≡⍋)¨(⊂((⊢⍳⌈/)↑⊢),⍵),⊂⌽((⊢⍳⌈/)↓⊢),⍵}
⍝ 10: Stacking It Up
stacking←{↑⊃,/↓¨⍕¨⍵}
:EndNamespace :EndNamespace