// "Probabilistic" - a probabilistic runnable

// subclass must implement run {} to do first action and schedule

// next steps with at() or atRelative()

// Creates its own scheduler if none is set

// Steppable is implemented only as convenience

//   (it steps the whole scheduler)

//   TODO: This is not very clear

asclass Probabilistic extends Meta implements IProbabilistic, Steppable {

  IProbabilisticScheduler ps;

  void initScheduler {

    if (ps == null) setScheduler(new ProbabilisticScheduler);

  }

  public void setScheduler(IProbabilisticScheduler ps) {

    this.ps = ps;

  }

  public IProbabilisticScheduler scheduler() {

    initScheduler();

    ret ps;

  }

  // Breaking change: Made this relative

  void schedule aka at(Runnable action) {

    scheduleRelative(1.0, action);

  }

  void schedule aka at(double probability, Runnable action) {

    initScheduler();

    ps.at(probability, action);

  }

  void scheduleRelative aka atRelative(double probability, Runnable action) {

    initScheduler();

    ps.atRelative(probability, action);

  }

  void scheduleAll(Iterable<? extends Runnable> actions) {

    forEach schedule(actions);

  }

  void scheduleAll(double probability, Iterable<? extends Runnable> actions) {

    forEach(actions, a -> schedule(probability, a));

  }

  void scheduleAllRelative(double probability, Iterable<? extends Runnable> actions) {

    forEach(actions, a -> scheduleRelative(probability, a));

  }

  ////// the "weird" convenience stuff

  void stepAll() {

    main stepAll(scheduler());

  }

  // call run() before

  public bool step() {

    ret scheduler().step();

  }

  void runFor(double seconds) { stepForNSeconds(seconds, scheduler()); }

}