check_identical function

Check whether a vector, x, has all its entries equal to its first entry