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

Day 7: Solition, that takes about 7 minutes, 119

Browse source
This commit is contained in:
Christoph Stahl 2021-12-07 13:20:04 +01:00
parent b91c813f69
commit 582997dbb6
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
d7golf_takes_7_minutes.hs Normal file
View file

@ -0,0 +1 @@
main=interact$show.(<$>[\n->(n^2+2)`div`2,id]).(\i d->minimum[sum$map(d.abs.(x-))i|x<-[0..sum i]]).read.('[':).(++"]")