haskell - Create the base64 encode method