関数型プログラミング言語Haskell Part3at TECH関数型プログラミング言語Haskell Part3 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト50:デフォルトの名無しさん 04/02/19 18:14 longerThan だと Equal が含まれないよ。 51:48 04/02/19 18:21 >>50 だからそうかえたんだよ。 52:デフォルトの名無しさん 04/02/19 18:26 >>48 なるほど、dropはnが大きすぎると[]を返すんだね。 きれいなやりかただ。 で、35の関数はわかりやすさと効率を考えると 以下のものがいいということになる？ 38とほぼ同じ。少し見やすくしてみた。 効率がいいのはこれなのかな。 それとnum < 0のときはデフォルトのエラーを起こすようにした。 k num = mapMaybe (takeOfMine num) . tails takeOfMine 0 _ = Just [] takeOfMine n [] = Nothing takeOfMine n (x:xs) = maybe Nothing (Just . (x:)) $ takeOfMine (n-1) xs 53:デフォルトの名無しさん 04/02/19 18:39 >>52 そんなもんかな。 # 個人的にはtakeOfMineは>>43のtakeJustのほうが # Haskellらしくて好きだけどね。(48 == 43だったりする:-) 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch