christofsteel/aoc2021
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Day 4: rearranged

Browse source
This commit is contained in:
Christoph Stahl 2021-12-04 17:46:43 +01:00
parent a49b79d432
commit c5519a865d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
d4golf.hs
View file

@ -2,9 +2,9 @@ import Data.Either
e=[]:e
a=m.m.m.k
h=any$all i
w p=head.rights.p
a?b|c a,i b=b|let=l 0
k d i|i==l d=r d|let=i
w p=head.rights.p
(x:y)#f=m(x!)(a x f):y#a x f
v[]=[];v s=tail(take 6 s):v(drop 6 s)
s(v:t)|'.'>v=[]:s t|(x:u)<-s t=(v:x):u