Class Char
back
upperCase
self isLowerCase
ifTrue: [ ^ Char new: (value - 97) + 65 ]