[Haskell-cafe] Associated types for number coercion