Class Char
back
isUpperCase
^ self between: $A and: $Z