La commande DATA

Bonjour,
Moi je suis en train de traiter la commande DATA: j'aimerais bien savoir quel est son rôle dans la déclaration des tableaux, pour cela je veux savoir ce que signifie la commande suivante (Data (ints(i),i=1,4)/4*6.0/, A(10)/-1.0/) dans le programme ci-dessous :

Code:

---

1 2 3 4 5 6 7 8 9

program test implicit none integer :: i,j real, dimension(20) :: A,B integer , dimension(10) :: ints real , dimension(2,3) :: MAT   Data (ints(i),i=1,4)/4*6.0/, A(10)/-1.0/ end

---

Je n'arrive pas à l'afficher sur l'écran, alors comment l'afficher aussi ?
Merci pour votre aide

L'instruction DATA est une instruction d'initialisation. Elle défini la valeur initiale des variables.

Dans l'exemple Data (ints(i),i=1,4)/4*6.0/, A(10)/-1.0/, elle initialise les 4 premiers éléments de inst à 6, puis a(10) à -1.0

J'insiste sur le terme initial. Si elle est utilisée dans un sous-programme, il n'y aura pas réinitialisation à chaque invocation, mais uniquement avant la première. On ne peut donc pas remplacer l'instruction data par des instructions d'affectation standard. Dans l'exemple suivant, L'affichage sera 4 la première fois et 10 les fois suivantes :

Code:

---

1 2 3 4 5 6 7

subroutine test integer k data k/4/ write (*,*) k k = 10 end

---

C'est une instruction qui date de Fortran 66. Depuis F90, la forme :

type :: Variable = ValeurInitiale

est plus populaire.

Merci pour ta reponse,
si j ai bien compris , dans l exemple Data (ints(i),i=1,4)/4*6.0/, A(10)/-1.0/ , Data initialise seulement le 10eme element de A!? et si je veux initialiser tout les elements de A en utilisant DATA?

data a /10*-1./

ou

data a /1.,2.,3.,4.,5.,6.,7.,8.,9.,10./

ou tout combinaison...