Project 5
--implementation option 1
data Color = Red | Yellow
-- 2 different data types (red or yellow)
Move :: Int
-- int = column number
-- add new move to an end of a list
Winner :: OneWinner Color | Tie | None
-- 3 different types: winning player, tie, no winner
Board :: [[Maybe Color]]
Game :: (Color,Board)
-- list of lists (list of columns)
-- implementation option 2
Game :: [Column]
Move :: (Color, Int)
-- the color of the piece being played and the number of the column it's being played in