Comment calculer une tangente en lisp ?

[famaice]

Salut / Hi / Hej / Ola / Ciao / Hoi / Merhaba / Hallo / Selam / etc....

 

Question peu être un peu conne mais ... comment fait-on pour calculer une tangente en LISP ?

 

Naïvement, je pensais qu'il existait une fonction arithmétique 'TAN' à l'instar de SIN ou COS mais apparement ce n'est pas le cas :(

 

Coridalement, (Olé !)

 

Fabrice

[Tramber]

Ben, Tangente, c'est sinus divisé par cosinus !

 

Ou l'inverse, je ne sais plus

[(gile)]

Salut,

 

tan alpha = sin alpha / cos alpha

 

Il est donc aisé de définir une fonction tangente.

de plus le risque d'une division par 0 n'existe pas puisque la fonction LISP cos est implémentée de telle manière que (cos (/ pi 2)) ou (cos (* pi 1.5)) ne retourne pas 0.

 

 (defun tan (a)
(/ (sin a) (cos a))
)

 

(doublé par Tramber...)

[famaice]

(MdR) Je savais bien que je posais une question conne !

 

Merci à tous,