-------------- create a Cable ----------
mergeDSums :: GCompare a => [DSum a ES] -> Cable a
mergeDSums = merge . DMap.fromList
mergeDSums :: GCompare a => [DSum a ES] -> Cable a
mergeDSums = merge . DMap.fromList
mergeDSums = merge . DMap.fromList