import Data.List (nub, sortOn)
import System.IO

-- separator -> Input -> Separated Input
-- split :: Char -> String -> [String]

-- data Entry =

-- averages :: [Entry] -> [(String, Float)]

-- content -> Entries
-- parse :: String -> [Entry]

main :: IO ()
main = do
  putStrLn "Enter a filename: "
  putStrLn "..."