class Generator {
  val state: IO[Ref[IO, Int]] = IO.ref(33)

  def generate: IO[Int] =
    for {
      delta <- IO.delay { scala.util.Random.nextInt(10) }
      _ <- state.flatMap(state => state.update(_ + delta))
      newVal <- state.flatMap(_.get)
    } yield newVal
}