練習問題 4.6.9

segs1
を 
segs1 = concat . map inits1 . tails1
のように定義せよ．ただし， 
inits1
はリストの空ではない先頭部分リストを返し， 
tails1
は空ではない末尾部分リストを返すものとする．これを使って，空の部分列を除外した版の最大部分和問題を述べ，それを解け．