Flexible dynamic information flow control in Haskell | Synapse