(ten-to-bin 99)

(main '("382040" "15800" "1525" "35300" "19410" "25000" "15800" "1525" "35300" "19410" "25000" "15800" "1525" "35300" "19410" "25000" "15800" "1525" "35300" "19410" "25000"))

(main '("477550" "15800" "1525" "35300" "19410" "25000" "15800" "1525" "35300" "19410" "25000" "15800" "1525" "35300" "19410" "25000" "15800" "1525" "35300" "19410" "25000" "15800" "1525" "35300" "19410" "25000"))

(time (dotimes (i 1000000) (calculate-sum #(1 2 3 4 5 6 7 8 9 10 11 12 13) #(1 1 1 0 1 1 0 0 1 1 1 0 0 0)) ))

(time (dotimes (i 1000) (main-one '("69" "12" "1" "2" "11"  "12" "1" "2" "11"  "12" "1" "2" "11"))))

cmd
/usr/bin/time -v ./solution 477550 25000 19410 35300 1525 15800 25000 19410 35300 1525 15800 25000 19410 35300 1525 15800 25000 19410 35300 1525 15800 25000 19410 35300 1525 15800

/usr/bin/time -v ./solution3 477550 25000 1525 35300 19410 19410 1525 25000 15800 35300 25000 35300 1525 19410 15800 15800 25000 1525 15800 19410 35300 19410 25000 1525 35300 15800

hyperfine './solution 382040 15800 1525 35300 19410 25000 15800 1525 35300 19410 25000 15800 1525 35300 19410 25000 15800 1525 35300 19410 25000'