sclass DoublePt {
  double x, y;
  
  *() {}
  *(Point p) {
    x = p.x;
    y = p.y;
  }
  *(double *x, double *y) {}
  
  [stdEq]
  
  toString {
    ret x + ", " + y;
  }
}