module Types where import Control.Monad.Reader (ReaderT(..)) import System.IO (Handle) data Bot = Bot { botSocket :: Handle } type Net = ReaderT Bot IO