本文介绍了三个实用的函数：getUppercase用于提取字符串中的大写字母，len'通过sum函数实现列表长度计算，以及pingPong根据条件将数字转为字符串。这些函数展示了编程中简洁表达和功能重用的技巧。
–单行注释
{-多行注释-}
{- 1.
函数名：getUppercase
参数：str
功能：获取给定字符串中的大写字母
-}
getUppercase str = [ a | a <- str, a `elem` ['A'..'Z'] ]
{- 2.
函数名：len’
参数：xs（列表）
功能：利用sum函数，重写length函数
-}
len' xs = sum [ 1 | _ <- xs ]
{- 3.
函数名：pingPong
参数：xs（一个数字列表）
功能：数字替换为字符串
x>10→"Ping",
x<10→"Pong",
x为奇数
-}
pingPong xs = [ if x>10 then "Ping" else "Pong" | x <- xs, odd x ]
扫一扫
1609
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
