{-# htermination union :: [Int] -> [Int] -> [Int] #-}
import List