use runReader in Reader Monad instance