import Data.List.Extra main :: IO () main = do print $ lower "ABCDE" print $ upper "XYZ"