#(format #t"~b"(read))