リスト操作
まだまだいろいろありそうだけど取り合えずはここまで。
Hugs.Base> :l List List> partition (/=',') "12,3,4" ("1234",",,") List> takeWhile (/=',') "12,12,22" "12" List> sort [2,1,4,3] [1,2,3,4] List> nub [2,1,4,3,2] [2,1,4,3] List> group $ sort [2,1,4,3,2] [[1],[2,2],[3],[4]] List> intersperse ',' "abcdef" "a,b,c,d,e,f" List> intersperse ",,," ["abc","def","ghi"] ["abc",",,,","def",",,,","ghi"]