BiA_RtD

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é.