content: -- Kata: https://www.codewars.com/kata/5266876b8f4bf2da9b000362/train/haskell
  
  likes :: [String] -> String
  likes [] = "no one likes this"
  likes xs
    | length xs == 1 = head xs ++ " likes this"
    | length xs == 2 = head xs ++ " and " ++ last xs ++ " like this"
    | length xs == 3 = head xs ++ ", " ++ xs!!1 ++ " and " ++ last xs ++ " like this"
    | otherwise = head xs ++ ", " ++ xs!!1 ++ " and " ++ show (length xs - 2) ++ " others like this"
  