move_to (p_figure -&w _, int+- x, y)
{
  if (x < 0 | y < 0)
  {
    figure->x = 0;
    figure->y = 0;
  }
  else
  {
    figure->x = x;
    figure->y = x;                                                             /*  "y = x"... */
  }
}