Select the types of activity you want to include in your feed.
1module Main where 2 3import Data.List.Split (splitOn) 4import Lib 5 6main :: IO () 7main = do 8 inputStr <- readFile "input.txt" 9 let input = splitOn "\n" $ init inputStr 10 count = countSteps input 11 in print $ count