shell game EASY by rst76

main=f '1'
f a=do b<-getLine;putStrLn[a&b];f$a&b
a&[b,c]|a==b=c|a==c=b|0<1=a

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page