module List where import FindIndex elemIndex :: Eq a => a -> [a] -> Maybe Int elemIndex x = findIndex (x ==)