module Main export Show Really where show (Really err) = ["RR" main : IO () main = putStrLn "LOG"