CAD programy 4M
Převod úhlových stupňů na radiány
Lidé i uživatelská rozhraní CAD programů počítají spíše s úhly zadávanými ve stupních. LISP funkce, ale vyžadují zadávání hodnot v radiánech. Převod není složitý, ale práci může urychlit předdefinování převodních funkcí:360o = 2 π radiánů
Funkce deg2rad převádí stupně na radiány.
Funkce rad2deg převádí radiány na stupně.
pi je v LISP konstanta o přibližné hodnotě 3,14159265.
(defun deg2rad (degree / x) (* (/ degree 180) pi) ) (defun rad2deg (radian / x) (* (/ radian pi) 180) )
Soubor ke stažení