switchCaseChar :: Char -> Char
switchCaseChar c = if isUpper c then toLower c else toUpper c
switchCaseChar :: Char -> Char
switchCaseChar c = if isUpper c then toLower c else toUpper c
switchCaseChar c = if isUpper c then toLower c else toUpper c