anchor.diff:  wins_vertically(_Config) ->
     EmptyBoard = fiar_core:start(),
     CheckMateBoard = drop_chips([1, 2, 1, 2, 1, 2], EmptyBoard),
  -  won = fiar_core:play(1, CheckMateBoard),
  +  {won, _} = fiar_core:play(1, CheckMateBoard),
     ok.
   
   %% @doc when the player puts 4 chips in a horizontal row, wins
  
positive.code: wins_right_diagonally(_Config) ->
    EmptyBoard = fiar_core:start(),
    CheckMateBoard = drop_chips([4, 4, 4, 4, 6, 3, 3, 3, 2, 2, 7], EmptyBoard),
    won = fiar_core:play(1, CheckMateBoard),
    ok.
  
  %% @doc when the player puts 4 chips in a diagonal row, wins
  
negative.code: wins_left_diagonally(_Config) ->
    EmptyBoard = fiar_core:start(),
    CheckMateBoard = drop_chips([4, 4, 4, 4, 2, 5, 5, 5, 6, 6, 1], EmptyBoard),
    {won, _} = fiar_core:play(7, CheckMateBoard),
    ok.
  
  %% @private
  