[Haskell-cafe] types calculation