character*99c;1 read'(a)',c;print'(atl1a1t1a1)',trim(c),c,c(len_trim(c):);goto1;end