{-# OPTIONS_GHC -Wall #-}

main :: IO ()
main = putStrLn used

used :: String
used = "T13839"

nonUsed :: ()
nonUsed = ()