2018-10-16

1. notAlone.

    notAlone :: [Int] -> Int -> [Int]
    notAlone nums x = undefined

2. Team Tic Tac Toe

   • Write teamWins to determine if a given team wins a given three in a row.

      teamWins :: String -> [Char] -> Bool
      teamWins row team = undefined

   • Write allThrees, which gets all of the three in a row segments from a board.

       allThrees :: [String] -> [String]
       allThrees board = undefined

   • Write allTeams, which produces a list of all possible teams.

        allTeams :: [String]

   • Combine the previous functions to solve the problem.

3. (Bonus.) Family Tree. I use momList to be the list of pairs of strings (mother, child).

   • findParent momList cow produces [] or a list containing the name of the parent of the given cow in a list.

   • parentList momList cow produces a list containing the mother, grandmother, etc. of the given cow. The result could be empty if the cow has no known mother.

   • isRelated momList cow1 cow2 gives True if the cows are related at all.

   isRelated ::  [(String,String)] -> String -> String -> Bool
   isRelated familyTree cow1 cow2 = undefined