[Haskell-cafe] Function Type Calculation (Take 2)