set m [I 5 0 1]    ;# Integer 0/1 for clarity of presentation
puts [$m format 2string]