Initial commit
This commit is contained in:
commit
f242d2b0df
420 changed files with 62521 additions and 0 deletions
12
2022/day08/day08.bqn
Normal file
12
2022/day08/day08.bqn
Normal file
|
@ -0,0 +1,12 @@
|
|||
inp←>'0'-˜•FLines⊑•args
|
||||
Vis←{>∊¨⌈`¨<˘𝕩}
|
||||
•Show +´⥊∨´⟨⊢,⌽˘,⍉,(⌽˘⍉)⁼⟩{𝕎𝕩}¨Vis¨⟨⊢,⌽˘,⍉,⌽˘⍉⟩{𝕎𝕩}¨4⥊<inp
|
||||
Score←{m𝕊⟨x,y⟩:
|
||||
v←x‿y⊑m
|
||||
up←⌽x↑y⊏˘m
|
||||
left←⌽y↑x⊏m
|
||||
right←(y+1)↓x⊏m
|
||||
down←(x+1)↓y⊏˘m
|
||||
×´{(≠𝕩)⌊1++´∧`v>𝕩}¨up‿left‿right‿down
|
||||
}
|
||||
•Show ⌈´⥊inp⊸Score¨↕≢inp
|
Loading…
Add table
Add a link
Reference in a new issue