{-# htermination insert :: Ord a => [a] -> [[a]] -> [[a]] #-}
import List