AOC day 1
BQN - toki pona
· 1 coffee
advent of code computer science toki pona programming
wan wan.
zz pana pi (toki tawa lipu) li nasin lipu tu e wan.
zz pana pi (toki tawa lipu) li suli.
zz poka li sin pana ala li nanpa sewi e luka.
zz ale li sin pana.
zz mi li wan poka en wan luka e pana pi (toki tawa lipu).
zz taso wan poka ijo li alasa e wan luka ijo.
zz ni li sin sin pana e poka.
zz ale li sin pana.
zz pana pi (toki tawa lipu) li nasin lipu tu e wan.
zz pana pi (toki tawa lipu) li suli.
zz poka li sin pana ala li nanpa sewi e luka.
zz ale li sin pana.
⍉ pana
⟨ ⟨ 4 3 5 3 9 3 ⟩ ⟨ 3 4 2 1 3 3 ⟩ ⟩
∧˘⍉ pana
⟨ ⟨ 3 3 3 4 5 9 ⟩ ⟨ 1 2 3 3 3 4 ⟩ ⟩
|-˝∧˘⍉ pana
⟨ 2 1 0 0 1 5 ⟩
+´|-˝∧˘⍉ pana
9
zz mi li wan poka en wan luka e pana pi (toki tawa lipu).
zz taso wan poka ijo li alasa e wan luka ijo.
zz ni li sin sin pana e poka.
zz ale li sin pana.
poka ← ⊑¨pana
⟨ 4 3 5 3 9 3 ⟩
luka ← 1⊑¨pana
⟨ 3 4 2 1 3 3 ⟩
{+´𝕩⊸=¨luka}¨poka
⟨ 3 1 0 0 3 3 ⟩
poka×{+´𝕩⊸=¨luka}¨poka
⟨ 9 4 0 0 9 9 ⟩
+´poka×{+´𝕩⊸=¨luka}¨poka
31
∎