[Haskell-cafe] Re: type level functions (type of decreasing list)