結城浩のHaskell日記にコメントをつけようとしたら，グループに参加しろと（はてなが）言うので参加してみた。 せっかくなので Haskellリング にも参加。 みなさん，よろしくお願いします。

下のエントリは前段でこっちが本題。id:hyukiさんとこにコメントをつけたんだけど，忘れないようにこっちにも書いておく。 filter' f xs = foldr (\m n -> if f m then m:n else n) [] xs結果。 *Main> take 50 $ filter' odd [1..] [1,3,5,7,9,11,13,15,17,…

リスト中に，関数 f（述語って言うの？）を満たす要素のほうが多ければ True をかえす，というのを考えた。all と any の中間みたいなもの。 major f xs = (length $ filter f xs) > (length $ filter (not . f) xs)結果。 *Main> major odd [1..5] True *Ma…

id:takatoh:20060604:group についた hyuki さんのコメント。 参加ありがとうございます。ところで、コメントつけるときに「グループに参加」というのはどういう状況でしたか？いちおう誰で も書き込めるようになっていたはずですが…。 たぶん，はてなにログ…