{-# htermination inits :: [a] -> [[a]] #-} import List