| N° |
Fonction |
Catégorie |
Version |
| BIA 05 |
BiA_ACos |
Fonction Arithmétique |
1.0 - Janvier 2007 |
Description
|
But
|
Retourne l'Arccosinus d'un angle.
|
|
Prototype
|
(BiA_ACos Cosinus_Angle)
|
|
Argument
|
Cosinus_Angle - La valeur du cosinus de l'angle - Réel ou Entier -
|
|
Retours
|
Valeur de l'angle exprimé en radians ou nil. - Réel
|
|
Var. globales
|
Néant
|
|
Description
|
Retourne l'Arccosinus d'un angle, c'est à dire, la valeur d'un angle
(en radians), si on transmet le cosinus.
|
|
Notes
|
La valeur du cosinus doit être comprise entre +1 et -1 (0° et +180°).
|
|
Exemples
|
(BiA_ACos 0.5) retourne 1.0472
(BiA_ACos 0) retourne 1.5708 (angle 90°)
(BiA_ACos -1) retourne 3.14159 (angle 180°)
(BiA_ACos 1) retourne 0.0
(BiA_RtD(BiA_ACos 0.5)) retourne 60.0 (angle 60° )
(BiA_RtD convertit les radians en degrés)
(BiA_ACos 1.1) retourne nil
(BiA_ACos -1.1) retourne nil
(BiA_ACos aa) retourne nil
( aa n'a pas été défini)
(BiA_ACos "aab") retourne
erreur: mauvais type d'argument
|
La fonction
1- (defun BiA_ACos (*Cos_Angl)
2- (if (and (<= *Cos_Angl 1.0)
3- (>= *Cos_Angl -1.0)
4- )
5- (if (not (equal *Cos_Angl 1.0 1e-06))
6- (if (not (equal *Cos_Angl -1.0 1e-06))
7- (atan
8- (sqrt (- 1.0 (* *Cos_Angl *Cos_Angl)))
9- *Cos_Angl
10- )
11- (eval pi)
12- )
13- (eval '0.0)
14- )
15- )
16- )
Lignes 2-4 : Vérifie si l'argument (le cosinus) est un nombre compris entre 1.0
et -1.0 et si oui,
Ligne 5 : Si le cosinus est différent de 1, plus ou moins 0.000001, et, si oui,
Ligne 6 : Si le cosinus est différent de -1, plus ou moins 0.000001,
Ligne 7 : Retourne l'arctangente
Ligne 8 : de la racine carrée de 1 diminué du carré du cosinus.
Ligne 9 : avec le cosinus comme second argument.
Ligne 11 : Sinon (si le cosinus est -1), retourne 3.14159 >> angle de 180°
Ligne 13 : Sinon (si le sinus est 1), retourne 0.0 >> angle de 0°
Ligne 15 : Sinon (nombre supérieur à 1 ou inférieur à -1) retourne nil.
Equal : Détermine si 2 expressions sont égales, le 3ème argument définissant la précision.
Atan : Renvoie la cotangente d'un angle dont la valeur est exprimée en radians.
Sqrt : Renvoie la racine carrée d'un nombre.
Eval : Renvoie le résultat d'une évaluation d'une expression.
Pi : Constante de valeur approximative 3.1415926
