main = do
    args <- getArgs
    runStateT (runHisg args) (Hisg [])
main = do
    args <- getArgs
    runStateT (runHisg args) (Hisg [])
main = do
    args <- getArgs
    runStateT (runHisg args) (Hisg [])