Pomocí LISP nástroje 2DPlot můžete snadno vygenerovat tvar tzv. Fermatovy spirály. Ve Fermatově spirále je vzdálenost mezi závity nepřímo úměrná jejich vzdálenosti od středu spirály.
Kartézská definice kreslicí funkce je v tomto případě:
X = +a √φ cos(φ)
Y = +a √φ sin(φ)
a symetrická druhá větev:
X = -a √φ cos(φ)
Y = -a √φ sin(φ)
Takže v LISP notaci pro 2DPlot:
(defun fXYfermat (f)
(list
(* fCa (sqrt f)(cos f))
(* fCa (sqrt f)(sin f))
)
)
, kde fCa je parametr stoupání spirály.
V aplikaci 2DPlot má tato křivka přednastavenu funkci 13.
Zaslepením konců obou spirálových ramen a vyšrafováním můžete z vlastností šraf ověřit jednu z vlastností Fermatovy spirály - že dělí prostor (rovinu) na dvě oblasti se stejnou plochou. Nebo že plocha mezi dvěma následnými otáčkami je neměnná.
Viz DWG Blok 22784.