Discussion :

[Kaeguri]

Bonjour,

Pour mettre un entier dans un caractère je fais la chose suivante :

Code :

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

1
2
current_lbl = 1
WRITE(current_lbl,'(I1)') i

A présent j'ai la chose suivante :

Code :

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

1
2
3
4
5
         DO i=-6,6
            Ibc=Ibc+1
            WRITE(current_lbl,'(I1)') i
(...)
        ENDDO

Pour les entiers de 0 à 6 tout s'affiche bien mais pour ce qui est de -6 à -1 j'obtiens une étoile. Quel est la lettre clé pour pour pouvoir le faire ?

Merci d'avance.

[Fortran90]

Le format I1 indique que l'output sera large d'une unité.
Or -1 à -6 représente un output de deux unités : le "-" et le "1". C'est ainsi normal que tu obtiennes une étoile.
Trois choix sont possibles:
-tu mets I0, et l'entier est représenté sur le nombre d'unités qui lui est propre.
(ex: 3 pour 310, 2 pour -1)
-tu sais que tu ne vas pas allez au delà de deux unités d'affichage et tu mets I2
-tu joues avec la fonction "char" et la table ascii, mais bon ça dépend de ton application et ce n'est pas forcément le plus simple.

Dans les deux premiers cas, il faut veiller à déclarer ton current_lbl en CHARACTER*2

[Kaeguri]

Ok merci pour les explications !