13 lines
378 B
Common Lisp
13 lines
378 B
Common Lisp
(test 5 (repString "1001110011"))
|
|
(test 4 (repString "1110111011"))
|
|
(test 3 (repString "0010010010"))
|
|
(test 4 (repString "1010101010"))
|
|
(test 5 (repString "1111111111"))
|
|
(test NIL (repString "0100101101"))
|
|
(test 3 (repString "0100100"))
|
|
(test NIL (repString "101"))
|
|
(test 1 (repString "11"))
|
|
(test 1 (repString "00"))
|
|
(test NIL (repString "1"))
|
|
(test NIL (repString "0100101"))
|