[Haskell-cafe] Function to cast types