> Test := ["1001110011", "1110111011", "0010010010", "1010101010", "1111111111", \
     "0100101101", "0100100", "101", "11", "00", "1"]:
> for s in Test do
>   printf( "%*s\t%5s   %s\n", 3 + max(map(length,Test)), s, repstr?( s ) )
> end do:
   1001110011    true   10011
   1110111011    true   1110
   0010010010    true   001
   1010101010    true   10
   1111111111    true   1
   0100101101   false
      0100100    true   010
          101   false
           11    true   1
           00    true   0
            1   false