[Haskell-cafe] Adding Authentication and Authorization to a service implemented in Haskell

I am trying to figure out a clean way to add authentication and authorization in a webservice. The services of the web services are implemented as Haskell functions. The request to the service contains the user authentication information. I want to authenticate the user by verifying his authentication informaton, assign him roles, and then based on the roles decide on the functions and data that he can have access too. Is there a clean way to do this in Haskell? Thanks Daryoush