DRAW-POINT(2) System Calls Manual DRAW-POINT(2)

Point - coordinate position

include    "draw.m";
draw := load Draw Draw->PATH;
Point: adt
{

x: int;
y: int;
add: fn(p: self Point, q: Point): Point;
sub: fn(p: self Point, q: Point): Point;
mul: fn(p: self Point, i: int): Point;
div: fn(p: self Point, i: int): Point;
eq: fn(p: self Point, q: Point): int;
in: fn(p: self Point, r: Rect): int; };

The Point data type specifies a position in the integer grid.

The coordinate position. The coordinates increase to the right (x) and down (y).
Returns the point (p.x+q.x, p.y+q.y).
Returns the point (p.x-q.x, p.y-q.y).
Returns the point (p.x*i, p.y*i).
Returns the point (p.x/i, p.y/i).
Returns non-zero if the points' coordinates are equal and zero otherwise.
Returns non-zero if point p lies within rectangle r and zero otherwise.

draw-intro (2), draw-rect (2)