{-# htermination (\\) :: (Eq a, Eq k) => [(Either a k)] -> [(Either a k)] -> [(Either a k)] #-} import List