easy :: Strategy
easy b le = do  r <- randomRIO (0, length le - 1)
                return (le !! r)

-- Tries to complete a square, if not possible makes a random choice
easy :: Strategy
easy b le = do  r <- randomRIO (0, length le - 1)
                return (le !! r)

-- Tries to complete a square, if not possible makes a random choice
easy b le = do  r <- randomRIO (0, length le - 1)
                return (le !! r)

-- Tries to complete a square, if not possible makes a random choice