BiV_VarDim

N° Fonction Catégorie Version
BIV 01 BiV_VarDim Gestion de Symboles 1.0 - Janvier 2007

Description

But Donne la longueur affichable d'une variable
Prototype (BiV_VarDim Variable)
Argument Variable - La variable à mesurer - tout type -
Retours Un nombre - entier -
Var. globales Néant
Description Retourne le nombre de caractères de la représentation affichable d'une variable (ou symbole), y compris les fonctions internes.
Notes Pour les chaînes, ne tient pas compte des guillemets qui les entourent.
Utilise la fonction BiC_Var2Str.
Exemples 

Command:  (setq L1 '(1 2 3)
                a2  5.236
                a3  5236
                s4  "azerty"
          )

	(BiV_VarDim L1)	   retourne	7
	(BiV_VarDim a2)	   retourne	5
	(BiV_VarDim a3)	   retourne	4
	(BiV_VarDim s4)	   retourne	6
	(BiV_VarDim pi)    retourne	7
	(BiV_VarDim toto)  retourne	3 	 (nil)

	Et si on demande de mesurer une fonction,
	(pourquoi pas cette fonction elle-même !)
	(BiV_VarDim BiV_VarDim)	retourne   131

La fonction 


 
  1-   (defun BiV_VarDim (*Variable)

  2-       (cond	
  3-          ((= (type *Variable) 'STR) 			
  4-              (- (strlen (BiC_Var2Str *Variable)) 2 )
  5-          ) 	
  6-          (T	
  8-              (strlen (BiC_Var2Str *Variable))
  9-          )
 10-       )    	
 11-  ) 


Ligne 2 :  condition
Ligne 3 :     si la variable à mesurer est une chaîne,
Ligne 4 :        convertit la variable en chaîne à l'aide de la fonction BiC_Var2Str 
                    et retranche 2 à sa longueur
Ligne 6 :		dans tous les autres cas,
Ligne 7 :         prend la longueur de la variable préalablement convertie en chaîne 
                     à l'aide de la fonction BiC_Var2Str
Ligne 10 :	 fin de condition.
Type : Renvoie le type de l'élément spécifié.
Strlen : retourne la longueur d'une chaîne..