(while(#(when(>% 0)(%2(char%))(%2(char%))%)(.read *in*)print))