[Haskell-cafe] type level program