作者scwg ( )
看板PLT
标题Re: [比较] 我为何锺情於用 Scala 做为兵刃（三）
时间Mon Jul 11 11:46:58 2011
※ 引述《huei1224 (渣)》之铭言：
: : ====================== 我是 Scala 程式分隔线 =========================
: : val xs = List(-1, -2, -3, 0, 1, 2, 3)
: : val square = (n: Int) => n * n
: : val isGreaterThan5 = (n: Int) => n > 5
: : val result = xs.map(square).filter(isGreaterThan5).length
: : // 上面那行和下面这行等价
: : // val result = xs.map(n => n * n).filter(n => n > 5).length
: : println (result1)
: : ======================================================================
: 最近在学 haskell ，发现 haskell 也可以写成像上面的型式，分享一下
: let x -: f = f x
: let xs = [-3..3]
: let square = (^2)
: let isGreaterThan5 = (>5)
: let result = xs -: map square -: filter isGreaterThan5 -: length
: -- let result = xs -: map (^2) -: filter (>5) -: length
通常用 Haskell 的人会这样写
result = length $ filter (>5) $ map (^2) $ xs
不过如果想用 flip ($) 的话不如试试
import Control.Monad.List
result = length $ xs >>= return . (^2) >>= guard . (>5)
--
And in that line now was a whiskered old man,
with a linen cap and a crooked nose,
who waited in a place called the Stardust Band Shell
to share his part of the secret of heaven:
that each affects the other and the other affects the next,
and the world is full of stories, but the stories are all one.
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 128.36.232.45
※ 编辑: scwg 来自: 128.36.232.45 (07/12 11:29)
1F：→ scwg:Fix "flip ($)" which was written as "flip (.)" 07/12 11:29