-module(z).
-export([m/0]).
p(eof)->1;p(S)->io:format(S++S),m().
m()->p(io:get_line('')).