|  |  |  | Poligono | 
prototipo (Polygon nome npoints args)
  nome: stringa di caratteri che designa il nome dell'oggetto
args: una lista di riferimenti a punti che rappresentano i vertici del poligono
output: riferimento ad un poligono definito dai suoi vertici
Esempio:
(lets Point "A" free  1 1)
(lets Point "B" free  1 5)
(lets Point "C" free  5 1)
(lets Point "D" free  5 5)
(lets Polygon "quad" npoints A B C D)
|  |  |  | Poligono |