dimitri/advent-of-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Initial commit

Browse source
This commit is contained in:
Dimitri Lozeve 2024-11-12 21:43:32 +01:00
commit f242d2b0df
420 changed files with 62521 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

18
2020/day13/day13.dyalog Normal file
View file

@ -0,0 +1,18 @@
⎕IO←0 ⋄ (⎕FR ⎕PP)←1287 34
p←⊃⎕NGET'input'1
t←⍎⊃p
b←⍎¨((1<',x'∘⍳)⊆⊢)1⊃p
b{×/((⊢⍳⌊/)⍵)⌷¨(⊂⍺),⊂⍵}b|-t ⍝ Part 1
⍝ https://www.jsoftware.com/papers/50/50_44.htm
xea←{(⍺,1 0){0=⊃⍵:⍺ ⋄ ⍵ ∇ ⍺-⍵×⌊(⊃⍺)÷⊃⍵}(⍵,0 1)}
∇r←larg cr rarg
m r←larg
n s←rarg
gcd a b←m xea n
lcm←m×n÷gcd
c←lcm|gcd÷⍨(r×b×n)+(s×a×m)
r←lcm,c
∇
c←','(≠⊆⊢)1⊃p
b←↓⍉⍎¨⍕¨↑(⊂~('x'≡⊃)¨c)/¨(⊂c),⊂-⍳⍴c
1⊃⊃cr/{x y←⍵ ⋄ 0=y:x,y ⋄ 1:x(x+y)}¨b ⍝ Part 2