11 lines
622 B
Text
11 lines
622 B
Text
(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"))))
|
|
|
|
|