Rosetta Code

Idiomatically determine all the lowercase and uppercase letters: Difference between revisions

Page Discussion

Idiomatically determine all the lowercase and uppercase letters (view source)

Revision as of 05:01, 16 April 2022

50 bytes removed ,  2 years ago
m
→‎{{header|Haskell}}
(→‎{{header|Haskell}}: Tidied test with bimap)
Line 580:
main :: IO ()
main =
let(putStrLn label k =. unlines . (kuncurry :(<>)) $
bimap
in (putStrLn . uncurry (<>)) $
("Upper:" bimap:)
(label "Upper\nLower:" :)
(join bimap (chunksOf 70) uppersAndLowers)</lang>▼
(label "\nLower:")
▲ (join bimap (chunksOf 70) uppersAndLowers)</lang>
{{Out}}
<pre>Upper:
Hout
9,655

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/243776"