!7

module ShowRandomColor > DynSCP {
  RGB color;
  
  visualize2 {
    if (color == null) setField(color := randomColor());
    ret singleColorPanel(toColor(color));
  }
  
  void newColor {
    setField(color := randomColor());
    revisualize2();
  }
}