N° |
Fonction |
Catégorie |
Version |
BIA 02 |
BiA_RtD |
Fonction Arithmétique |
1.0 - Janvier 2007 |
Description
But
|
Convertit les radians en degrés
|
Prototype
|
(BiA_RtD Angle_Rad)
|
Argument
|
Angle_Rad - La valeur de l'angle en radians - Réel ou Entier -
|
Retours
|
Un nombre réel ou nil.
|
Var. globales
|
Néant
|
Description
|
Convertit en degrés la valeur d'un angle exprimé en radians.
|
Notes
|
Contrairement à la routine RtD usuelle, BiA_RtD vérifie le type de
l'argument et ne peut donc retourner un message d'erreur.
|
Exemples
|
(BiA_RtD 1) retourne 57.2958
(BiA_RtD -1) retourne -57.2958
(BiA_RtD pi) retourne 180.0
(BiA_RtD 0) retourne 0.0
(BiA_RtD "aab") retourne nil
(BiA_RtD aa) retourne nil
( aa n'a pas été défini)
|
La fonction
1- (defun BiA_RtD (*Angle_Rad)
2- (if (or
3- (= (type *Angle_Rad) 'REAL)
4- (= (type *Angle_Rad) 'INT)
5- )
6- (* 180.0 (/ *Angle_Rad pi))
7- )
8- )
Lignes 2-5 : Vérifie si l'argument est un nombre (entier ou réel)
Et, si oui,
Ligne 6 : Multiplie par 180 le résultat de la division de la valeur
de l'angle en radians par pi (3.14159...)
Sinon retourne nil
Equivaut à multiplier le nombre en radians par 57.295779513
Pourrait donc être remplacé par (* *Angle_Rad 57.295779513)
Type : Renvoie le type de l'élément spécifié.