|  |  | Punt |

#### Punt

`prototype (Punt naam willekeurig x y)`
`naam`: Tekenreeks die de naam van het object aangeeft
`x`: De abscis van het punt
`y`: De ordinaat van het punt
Uitkomst: Verwijzing naar een willekeurig punt in het vlak met coördinaten `x` en `y`.
Voorbeeld:
`(define p1 (Punt Ä willekeurig 1.2 (acos -1)))`

`prototype (Punt naam op-kromme lijn x)`
`naam`: Tekenreeks die de naam van het object aangeeft
`lijn`: Verwijzing naar een lijn (rechte, halfrechte, lijnstuk, etc.)
`x`: Kromme-abscis van het willekeurig punt, de waarde behoort tot het interval [0 ; 1]
Uitkomst: Verwijzing van een willekeurig punt op een lijn.
Voorbeeld:
`(Punt M op-kromme s1 0.5 )`

`prototype (Punt naam midden-2ptn p1 p2)`
`naam`: Tekenreeks die de naam van het object aangeeft
`p1`: Verwijzing naar een punt
`p2`: Verwijzing naar een punt
Uitkomst: Verwijzing naar het midden van twee punten.
Voorbeeld:
`(weze Punt Ä willekeurig 1 1)
(weze Punt B willekeurig 4 4)
(Punt Ï midden-2ptn A B)`

`prototype (Punt naam midden-lijnstuk s)`
`naam`: Tekenreeks die de naam van het object aangeeft
`s`: Verwijzing naar een lijnstuk
Uitkomst: Verwijzing naar het midden van twee punten.
Voorbeeld:
`(weze Punt L midden-lijnstuk s)`

`prototype (Punt naam snijpunt l1 l2)`
`naam`: Tekenreeks die de naam van het object aangeeft
`l1`: Verwijzing naar een lijn
`l2`: Verwijzing naar een lijn
Uitkomst: Verwijzing naar het snijpunt van twee lijnen.
Voorbeeld:
`(Punt Ï snijpunt rechte lijnstuk)`

`prototype (Punt naam snijpunt2 l1 l2)`
`naam`: Tekenreeks die de naam van het object aangeeft
`l1`: Verwijzing naar een lijn
`l2`: Verwijzing naar een lijn
Uitkomst: Verwijzing naar het tweede snijpunt van twee lijnen als een van de twee een cirkelboog of een cirkel is.
Voorbeeld:
`(Punt Ï snijpunt2 rechte cirkel)`

|  |  | Punt |