« [Haskell] YAHT | トップページ | [Haskell] YAHT case式 »

2006年9月11日 (月)

[Haskell] YAHT


4.6をながめた(難しくて読めない)。
Haskellにも継続があることを知った。
Schemeの継続もわからないけど、
Haskellのもさっぱりわからない。



Exercise 4.12 の答がない。
こんな感じでいいんだろうか。



cfold' f z [] = z
cfold' f z (x:xs) = f x z (\y -> cfold' f y xs)
mymap f l = cfold' (\x t g -> f x : (g t)) [] l
myfilter f l = cfold' (\x t g ->
if (f x) then x : (g t)
else (g t)) [] l

|

« [Haskell] YAHT | トップページ | [Haskell] YAHT case式 »

コメント

この記事へのコメントは終了しました。

トラックバック


この記事へのトラックバック一覧です: [Haskell] YAHT:

« [Haskell] YAHT | トップページ | [Haskell] YAHT case式 »