Initial commit

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

14
2023/day05/day05.bqn Normal file
View file

@ -0,0 +1,14 @@
Split•Import"../bqn-libs/strings.bqn"
input(@+1010)Split•FChars"input"
seeds•ParseFloat¨" "Split 1": "Splitinput
ms•ParseFloat¨¨¨" "Split¨¨(0<)¨/¨1¨(@+10)Split¨ 1input
Map{𝕊rs:
F{𝕊x: {𝕊dsl: (sx)x<s+l}¨rs}
V{𝕊x: {𝕊dsl: d+x-s}¨rs}
{((F𝕩)/V𝕩)𝕩}
}
seed2loc{𝕨𝕩}´Map¨ms
•Show ´Seed2Loc¨seeds