Skip to content

Instantly share code, notes, and snippets.

module Main where
import System.IO
import Data.List
import qualified Data.Map.Strict as Map
countIn :: Eq a => [a] -> a -> Int
countIn l v = length $ filter (== v) l
generateWords :: [String] -> String -> [String]