main=interact$(>>=(' '#)).lines a#(b:x)=[c|c<-"\27[4"++cycle"6970291?4"!!fromEnum b:"m",a/=b]++" "++b#x a#_="\27[49m\n"
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page