main :: IO ()
main = do
    hSetBuffering stdout NoBuffering
    model <- tsvToModel "../data/train.tsv"
    loop model
main :: IO ()
main = do
    hSetBuffering stdout NoBuffering
    model <- tsvToModel "../data/train.tsv"
    loop model
main = do
    hSetBuffering stdout NoBuffering
    model <- tsvToModel "../data/train.tsv"
    loop model