Reader.T1
module T : Core_kernel.T
module M : Monad
type env = T.t
type 'a m = 'a M.t
type 'a t = ('a m, env) reader
type 'a e = env -> 'a m