(mapc #'write-char '(#\GREEK_CAPITAL_LETTER_SIGMA #\Boy))