Arantium Maestum

プログラミング、囲碁、読書の話題

2018-03-29から1日間の記事一覧

Thinking Functionally with Haskell勉強メモ: 第6章問題3

Exercise J Maximum Subsequence Sumが以下のように定義されている: mss :: [Int] -> Int mss = maximum . map sum . subseqs subseqs :: [a] -> [[a]] subseqs [] = [[]] subseqs (x:xs) = xss ++ map (x:) xss where xss = subseqs xs より効率のいい定義…