Hatena::ブログ(Diary)

ドレッシングのような このページをアンテナに追加 RSSフィード

2011-08-15

『お題:文字列を先頭から見て同じところまで除去』への回答 (Haskell 編)

Haskell 力を高めるための練習として『お題:文字列を先頭から見て同じところまで除去』への回答を Haskell でも作りました。皆さんからのツッコミを歓迎します。

ujihisaujihisa 2011/08/15 13:39 https://gist.github.com/1145718 別解

nobsunnobsun 2011/08/16 13:36 import Control.Applicative ((<*>)); import Data.List (transpose)
removeCommonPrefix = map (concat . takeWhile (not . null)) . transpose . dropWhile (and . (zipWith (==) <*> tail)) . takeWhile (not . all null) . transpose . map ((++repeat "").map (:[]))

スパム対策のためのダミーです。もし見えても何も入力しないでください
ゲスト


画像認証

トラックバック - http://d.hatena.ne.jp/mrkn/20110815/removing_common_prefix_by_haskell