h#(x:a)=zipWith(:)a h#a++h h#x=[] g a=map(:[])a#a m@main=getLine>>=putStrLn.head.filter(\x->x==reverse x).g>>m
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page