getPlayer :: Bool -> String
getPlayer player
    | player = "x"
    | otherwise = "o"
getPlayer :: Bool -> String
getPlayer player
    | player = "x"
    | otherwise = "o"
getPlayer player
    | player = "x"
    | otherwise = "o"