#(do((x 2(1+ x)))(#f)(format #t"~:@(~vr
"x 257))