: [FilePath] → IO [Event]
readEventFiles = readFiles readEventFile

readDecisionFile
readEventFiles :: [FilePath] → IO [Event]
readEventFiles = readFiles readEventFile
readEventFiles = readFiles readEventFile