sclass RandomAndVary_Double implements RandomAndVary<Double> {
  double min = 0, max = 1, varyFactor = 0.1;
  
  Double randomInstance() { ret random(min, max); }
  Double varyInstance(Double a) {
    ret clipDouble(min, max, a+(max-min)*varyFactor);
  }
}