{-# htermination sequence :: [[] a] -> [] [a] #-}