isto
data class SaveUserScope( val userRepository: UserRepository ) fun saveUserReader(model: UserModel) = Reader.ask<IdHK, SaveUserScope>().map({ IO { it.userRepository.save(model) } }, Id.functor())