[Haskell-cafe] mapping a concept to a type