uniform x -- whether all elements of the list x have the same class.
Code:
-- ../m2/classes.m2:63 uniform = (x) -> same apply(x,class)