2018/09/19
メモ
-- リスト(右結合)
[1,2,3,4,5] ++ ([6,7] ++ [8])
[1,2,3,4,5] ++ [6,7,8] -- コスト2(合計2)
[1,2,3,4,5,6,7,8] -- コスト5(合計7)
-- リスト(左結合)
([1,2,3,4,5] ++ [6,7]) ++ [8]
[1,2,3,4,5,6,7] ++ [8] -- コスト5(合計5)
[1,2,3,4,5,6,7,8] -- コスト7(合計12)
-- 差分リスト(右結合)
fromDiffList(toDiffList [1,2,3,4,5] <> (toDiffList [6,7] <> toDiffList [8]))
fromDiffList((\a->[1,2,3,4,5] ++ a) <> ((\b->[6,7] ++ b) <> (\c->[8] ++ c)))
fromDiffList((\a->[1,2,3,4,5] ++ a) <> (\x->(\b->[6,7] ++ b) ((\c->[8] ++ c) x)))
fro