Arcsin a arccos

Funkce arkus sinus a arkus cosinus nejsou základními funkcemi LISP ve 4MCAD, ale je možné je definovat s pomocí funkce Atan.

Výstupní hodnoty jsou v radiánech.

---

(defun asin (x)
	(atan x (sqrt (- 1 (* x x))))
)

(defun acos (x)
	(atan (sqrt (- 1 (* x x))) x)
)

---

Soubor ke stažení