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

12
2023/day03/day03.bqn Normal file
View file

@ -0,0 +1,12 @@
digits'0'+10
nminput>•FLines"input"
sympos>m(÷˜|)/¬inputdigits'.'
digpos(0)¨/ <˘¨{+`1<|+´˘+`𝕩} >m(÷˜|)/inputdigits
near{´1=´¨|¨(<˘sympos)-𝕩}¨digpos
nums•ParseFloat¨input¨digpos
•Show +´near/nums
gearpos<˘>m(÷˜|)/input='*'
nearnums{(1=´¨´¨|¨¨𝕩-¨¨digpos)/nums}¨gearpos
•Show +´×´¨(2=)¨/nearnums