Discussion :

[lechevbt]

Bonjour,

Je cherche à convertir une variable entière en sa chaine de caractère équivlente. exemple: i étant un entier, disons i=153 par ex., je voudrais convertir ça en '153'. en VB je ferai str$(153), y'a-t-il un équivalent en Fortran ?

Le but c'est de donner des noms de fichiers différents en fonction de cet indice i.

j'ai bien réussi en utilisant CHAR() et la table ASCII ( CHAR(1 +48 ) = '1' ), mais ça ne marchera pas avec des nombres à 2 chiffres ou plus.

Merci pour votre aide,
Benoit

[netPhilou31]

Bonjour,

En fait, la meilleur façon de générer des noms de fichiers dépendant d'un indice i est d'utiliser l'expression write pour les créer.
exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
  character(len=80) FileName
  write(FileName,'(A,I3.3,A)') 'GenericName',i,'.ext'

ce qui générera des fichiers du type:
GenericName001.ext
GenericName002.ext
...
ce qui permet de créer 999 fichiers. Si cela n'est pas suffisant, tu peux toujours remplacer le format I3.3 par I4.4.

Bonne chance.

[lechevbt]

Merci bien !!

Je n'avais jamais pensé à utiliser write() pour écrire dans une chaine de caractère en fait !

et ça résoud complètement mon problème.

Allez, je retourne aux joies du Fortran.

Benoit

[netPhilou31]

En fait c'est assez pratique et on y pense pas toujours la première fois que l'on est confronté a ce problème. Dans le même esprit, il est possible de lire des données à partir d'une chaine de caractères (très utile lorsque l'on souhaite décoder une ligne de données mais que l'on ne connait pas forcément sa longueur.
exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
  character(len=256) Line
 
  open(Unit=IUL,File=.....)
 
  read(IUL, '(A)') Line
  read(Line,*) x, y, z t, ....

Cela peut être bien plus compliqué, notamment si l'on décide d'analyser le contenu de la chaine avant traîtement....
..