|  |  | Semiretta |

#### Semiretta

`prototipo (Ray nome 2points o p)`
`nome`: stringa di caratteri che designa il nome dell'oggetto
`o`: riferimento ad un punto origine della semiretta
`p`: riferimento ad un punto appartenente alla semiretta
output: riferimento ad una semiretta definita dall'origine e un punto.
Esempio:
`(lets Point "A" free 1 5)
(lets Point "O" free 0 0)
(lets Ray "dd1" 2points A 0)`

|  |  | Semiretta |