2.7 Koordinaatit

6.12

procedure
(make-posn x y) → posn?
x : ei-tyyppivaatimusta
y : ei-tyyppivaatimusta

Luo posn-tietueen, jonka kenttiin tallennetaan x ja y.

> (make-posn 3 3)
(posn 3 3)
> (make-posn 4.5 -3.0)
(posn #i4.5 #i-3.0)

procedure
(posn-x p) → ei-tyyppivaatimusta
p : posn?

Palauttaa posn-tietueen x-kentän arvon.

> p
(posn 2 -3)
> (posn-x p)
2

procedure
(posn-y p) → ei-tyyppivaatimusta
p : posn?

Palauttaa posn-tietueen y-kentän arvon.

> p
(posn 2 -3)
> (posn-y p)
-3

procedure
(posn? x) → totuusarvo
x : ei-tyyppivaatimusta

Tutkii, onko x tietue, joka on tehty käyttämällä make-posn:ia.

> q
(posn 3 2)
> (posn? q)
#true
> (posn? 42)
#false