main@m=getLine>>=putStrLn.([]!)>>m []![]="yes";_![]=s++"EOL" x!(y:z)|elem y"([{<"=(y:x)!z (x:y)!(z:w)|x>z||[x..]!!20=y!w s="failed at: "