英語の小文字を対応する大文字へ変換します。
Atomの全ての大文字を対応する英小文字へ変換し、UpperAtomで結果を単一化します.
Atom アトム UpperAtom アトム
atom_upper('HeLlO world', T) -> T = 'HELLO WORLD'
->
T = 'HELLO WORLD'