1 
    2 module Main where
    3 import Prog (prog)
    4 
    5 main = do
    6     str <- getContents
    7     putStr (prog str)
    8