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