sclass AIStrategy_RandomWithVariation<A> implements Steppable {
  F0<A> random;
  F1<A> vary;
  F1<A, Double> submit; // returns score
  
  new Best<A> best;
  int round;
  
  public void step() { go(); }
  
  void go {
    A guess = guess();
    best.put(guess, callF(submit, guess));
  }
  
  A guess() {
    if (odd(round++) && vary != null && best.has())
      ret callF(vary, best!);
    else
      ret callF(random);
  }
}