varaq-interpreter-go/examples/aoc2022/day1/p1.vqe

19 lines
291 B
Plaintext
Raw Normal View History

() ~ elves set
0 2244 {
listen dup
strmeasure 0 eq?
choose
{ pop pop elves cons ~ elves set 0 true } ifyes
{ numberize add } ifno
} repeat
elves shatter depth sub1 {
over over lt?
choose
{ pop exch pop true } ifyes
{ pop } ifno
} repeat
2023-05-08 16:39:53 -04:00
disp newline