make Foo instance of MonadIO