Discussion :

[ZeFMG]

Bonjour à tous !

Je suis un total newbie en Fortran et j'ai une petite question qui reste en suspens malgré mes recherches dans les différents cours que j'ai pu consulter sur le net : je cherche à déclarer un tableau de character dont les éléments seraient : 'sortie', 'Indice', 'Levee', 'Vitesse', 'Acceleration' et 'Test'.

Le code suivant est-il correct ?

Code :

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

1
2
3
4
5
6
7
8
 
       CHARACTER*12 FIELDS(6)
       FIELDS(1)='sortie'
       FIELDS(2)='Indice'
       FIELDS(3)='Levee'
       FIELDS(4)='Vitesse'
       FIELDS(5)='Acceleration'
       FIELDS(6)='Test'

[Sylvain Bergeron]

Tout à fait correct. C'est du Fortran 77. Cette syntaxe est toujours valide, même en Fortran 2003.

À compter de Fortran 90, on pourrait utiliser la syntaxe :

Code :

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

1
2
3
4
5
6
7
8
 
character (len=12) :: Fields(6)
       Fields(1)='sortie'
       Fields(2)='Indice'
       Fields(3)='Levee'
       Fields(4)='Vitesse'
       Fields(5)='Acceleration'
       Fields(6)='Test'

où «len=» est facultatif.

Si les valeurs sont constantes, il serait plus approprié d'utiliser :

Code :

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

1
2
3
4
5
6
7
 
character (len=12), parameter :: Fields(6) = (/ Fields(1)='sortie', &
                                                Fields(2)='Indice', &
                                                Fields(3)='Levee', &
                                                Fields(4)='Vitesse', &
                                                Fields(5)='Acceleration', &
                                                Fields(6)='Test' /)

À compter de Fortran 2003 (et de certains compilateurs Fortran 95), tu peux remplacer les (/ ... /) par [ ... ], ce qui est beaucoup plus joli...

P.S. La rédaction tout en majuscule est plutôt dépréciée depuis quelques années...

[ZeFMG]

Merci pour cette réponse très complète. Pour ce qui est de l'écriture tout en majuscules, c'est vrai que ça donne mal au crane, mais les codes sur lesquels je travaille sont comme ça, donc je suis le mouvement...