-- 自己寫一些安全的列表函數(shù)乌助，確保它們不會(huì)出錯(cuò)例获。
safeHead :: [a] -> Maybe a
safeHead [] = Nothing
safeHead xs = Just $ head xs
safeTail :: [a] -> Maybe [a]
safeTail [] = Nothing
safeTail xs = Just $ tail xs
safeLast :: [a] -> Maybe a
safeLast [] = Nothing
safeLast xs = Just $ last xs
safeInit :: [a] -> Maybe [a]
safeInit [] = Nothing
safeInit xs = Just $ init xs
map' :: (a -> b) -> [a] -> [b]
map' f (x: xs) = f x : map f xs
map' _ [] = []
asInt_fold :: [Char] -> Int
asInt_fold xs = foldl step 0 xs
where step x y = x * 10 + (digitToInt y)
-- Prelude下面的函數(shù) concat 將一個(gè)列表的列表連接成一個(gè)單獨(dú)的列表
concat' :: [[a]] -> [a]
concat' = foldr step []
where step x y = x ++ y
-- 寫出你自己山寨的 takeWhile 函數(shù)，首先用顯式遞歸的手法吕漂，然后改成 foldr 形式．
takeWhile' :: (a -> Bool) -> [a] -> [a]
takeWhile' f (x: xs)
| f x = x: takeWhile' f xs
| otherwise = []
takeWhile'' :: (a -> Bool) -> [a] -> [a]
takeWhile'' f = foldr step []
where step x y
| f x = x: y
| otherwise = []
RWH 第四章
最后編輯于 ：
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
- 文/潘曉璐 我一進(jìn)店門峻仇，熙熙樓的掌柜王于貴愁眉苦臉地迎上來公黑，“玉大人，你說我怎么就攤上這事摄咆》惭粒” “怎么了？”我有些...
- 文/不壞的土叔 我叫張陵吭从，是天一觀的道長朝蜘。 經(jīng)常有香客問我，道長涩金，這世上最難降的妖魔是什么芹务？ 我笑而不...
- 正文 為了忘掉前任，我火速辦了婚禮鸭廷，結(jié)果婚禮上枣抱，老公的妹妹穿的比我還像新娘。我一直安慰自己辆床，他們只是感情好佳晶，可當(dāng)我...
- 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著讼载，像睡著了一般轿秧。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上咨堤，一...
- 文/蒼蘭香墨 我猛地睜開眼，長吁一口氣：“原來是場(chǎng)噩夢(mèng)啊……” “哼萎战！你這毒婦竟也來了咐容？” 一聲冷哼從身側(cè)響起，我...
- 序言：老撾萬榮一對(duì)情侶失蹤蚂维，失蹤者是張志新（化名）和其女友劉穎戳粒，沒想到半個(gè)月后路狮，有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體，經(jīng)...
- 正文 獨(dú)居荒郊野嶺守林人離奇死亡蔚约，尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
- 正文 我和宋清朗相戀三年览祖，在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片炊琉。...
- 正文 年R本政府宣布团赏，位于F島的核電站箕般，受9級(jí)特大地震影響，放射性物質(zhì)發(fā)生泄漏舔清。R本人自食惡果不足惜丝里，卻給世界環(huán)境...
- 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望体谒。 院中可真熱鬧杯聚，春花似錦、人聲如沸抒痒。這莊子的主人今日做“春日...
- 文/蒼蘭香墨 我抬頭看了看天上的太陽故响。三九已至傀广，卻和暖如春，著一層夾襖步出監(jiān)牢的瞬間彩届，已是汗流浹背伪冰。 一陣腳步聲響...
- 正文 我出身青樓，卻偏偏與公主長得像坯墨，于是被迫代替她去往敵國和親寂汇。 傳聞我的和親對(duì)象是個(gè)殘疾皇子，可洞房花燭夜當(dāng)晚...
推薦閱讀更多精彩內(nèi)容
- 第四章 比病更難治好的是人 生完寶寶停巷，女性小腹能否盡量回復(fù)往日的彈性和緊繃耍攘，除了個(gè)人體質(zhì)等先天因素榕栏，關(guān)鍵是看你在孕...
- 第四章 宮外孕：媽媽知道你想留下來扒磁，但你太性急 多次的輸卵管通液，會(huì)破壞輸卵管的纖毛功能式曲，可能把宮腔的一些細(xì)菌妨托、內(nèi)...
- HashMap ：基于哈希表的Map接口實(shí)現(xiàn)。底層基于數(shù)組吝羞，鏈表兰伤，1.8引入紅黑樹。 主要屬性 final flo...
- 1.《超級(jí)個(gè)體》 話題：“職場(chǎng)上沒有人帶钧排，該怎么辦敦腔？” 做自己的師傅 別抱怨：沒人帶很正常，有人帶是福分 主動(dòng)：主...
- 有的時(shí)候你在想我難道真的比別人差嗎恨溜？答案會(huì)是肯定的呢符衔？不會(huì)，正那句歌詞說的好我就是我顏色不一樣的花火-糟袁。我們愛著自...
