{-# htermination insert :: Ordering -> [Ordering] -> [Ordering] #-}
import List