anchor.diff:          let rec foodLoop () =
               async {
                   do! Async.Sleep (5000 / level)
  -                food <- (createSquare bounds (snake@mines))::food
  +                food <- (createSquare (snake@mines))::food
                   return! foodLoop ()
               }
   
  
positive.code:     let mutable private mines = []
      let mutable private food = []
      let mutable private level = 1
  
      let private aliveSnakeColor = ConsoleColor.DarkBlue
      let private deadSnakeColor = ConsoleColor.DarkRed
      let private foodColor = ConsoleColor.DarkGreen
  
negative.code:     Console.CursorVisible <- false
      Console.BackgroundColor <- ConsoleColor.White
  
      let minX, minY = 0, 2
      let maxX, maxY = Console.WindowWidth, Console.WindowHeight
      let gameBounds = { x = minX; y = minY }, { x = maxX; y = maxY }
      let startPosition = { x = (maxX - minX) / 2; y = (maxY - minY) / 2 }
      let startDirection = Right
      
      SnakeGame.start gameBounds startPosition startDirection
  