Convertir un texte (chaîne de caractères) en nombre

Une variable de texte avec le contenu "123.5" correspond toujours à un texte. Il n'est pas possible de s'en servir pour calculer. Il faut pour cela convertir le texte en nombre.

C     Convertir un texte en nombre

C     

C     Appel :

C     CALL PCO001 (TEXTVAR,RZAHL,IERR,LUWRIT,LUREAD)

C     

C     Les variables suivantes doivent être définies au préalable :

C     

C     TEXTVAR : texte à convertir

C     RZAHL   : résultat en valeur réelle

C     IERR    : Code d'erreur de la fonction

C               0 = la conversion a réussi

C               1 = la conversion a échoué

C     LUWRIT  : n'est pas évalué, mais doit être spécifié

C     LUREAD  : n'est pas évalué, mais doit être spécifié

C     

C     NOTE : La variable de texte TEXTVAR doit être déclarée dans l'en-tête du

C              programme !

C     CHARACTER *80 TEXTVAR

C     

C     Exemple :

C     ------------------------------

C     Convertir un texte en nombre

C     ------------------------------

      TEXTVAR = "123.5"

C     

      CALL PCO001 (TEXTVAR,RZAHL,IERR,LUWRIT,LUREAD)

C     

C     La sortie avec l'instruction :

      WRITE(6,*)RZAHL

C     

C     donne : 123.5

C     

C     NOTE : TEXTVAR ne peut contenir que des chiffres et le point décimal.

C              Le point décimal (.) ainsi que la virgule (,) sont

C              autorisés ici.

C              Si la conversion échoue, RZAHL est égal à 0 et

C              IERR à 1.

C