module Main where import Arm import System.Environment import System.IO main = do hSetBuffering stdout NoBuffering (s:_) <- getArgs putStrLn s run s