Discussion :

[salseropom]

Bonjour, je suis débutant en Fortran, et en lisant un poly de Fortran (cours de l'IDRIS) j'ai déjà qq questions.

question 1 :
comment mettre plusieurs lignes consecutives en commentaire ?

question 2 :
Supposons que l'on ait
integer, dimension(10) :: ints, ints2

quelle est la difference entre
data (ints(i), i=1,4)/4*6.0/ et
ints2(1:4)=6
je trouve que la version avec ints2 est plus lisible que celle avec ints.

question 3 :
quelle est la difference entre l'operateur = et l'utilisation du mot-cle DATA ?

question 4 :
Dans mon cours, a propos du mot-cle DATA il est marque :
"on peut utiliser l'instruction DATA pour initialiser les tableaux lors de leur declaration. Elle permet d'initialiser tout ou partie de tableaux a l'aide d'une liste de constantes encadree par le caractere /

Pourtant si je fais

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
real, dimension(2,3) :: mat
 
data mat/1., 2., 3., 4., 5., 6./ 
print *,"mat = ",mat ! affiche 1. 2. 3. 4. 5. 6.
 
data ((mat(i,j),j=1,3),i=1,2)/7., 8., 9, &
                              10., 11., 12./
print *,"mat = ",mat ! affiche 1. 2. 3. 4. 5. 6.
 
mat(2,3)=7
print *,"mat = ",mat ! affiche 1. 2. 3. 4. 5. 7.

donc si j'ai pu changer le 6 en 7, cela veut dire que les valeurs de mon tableau ne sont pas constantes ?

question 5 :
comment ecrire plus simplement le programme suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
PROGRAM operation_tableau
 
implicit none
 
integer i
integer, dimension(10) :: tab
 
do i=1,10
  tab(i)=i
end do
 
print *,"tab = ",tab
 
END PROGRAM operation_tableau

Dois-je obligatoirement passer par le mot-cle DATA ?

question 6 :
a propos des fonctions, est-ce la meme chose de faire

Code :

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

1
2
3
4
5
6
 
integer function myint(a,b)
implicit none
integer a,b,myint
myint=a+b
end function myint

et

Code :

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

1
2
3
4
5
6
 
integer function myint(a,b)
implicit none
integer a,b ! ici je n'ai pas declarer myint comme un integer
myint=a+b
end function myint

Merci beaucoup.

[DaZumba]

Bonjour, je suis débutant en Fortran, et en lisant un poly de Fortran (cours de l'IDRIS) j'ai déjà qq questions.

Assure-toi que le cours concerne le Fortran 90. Cette nouvelle norme introduit plusieurs changements par rapport au Fortran 77. Si tu decides d'apprendre le Fortran 90, il faut abandonner les anciennes methodes.

question 1 :
comment mettre plusieurs lignes consecutives en commentaire ?

Il faut les commenter une par une.

question 2 :
quelle est la difference entre
data (ints(i), i=1,4)/4*6.0/ et
ints2(1:4)=6

La premiere methode initialise la variable ints a la facon Fortran 77. La seconde methode est une affectation.

question 3 :
quelle est la difference entre l'operateur = et l'utilisation du mot-cle DATA ?

L'operateur d'affectation = fait plus de choses. DATA est utilise en Fortran 77 lors de l'initialisation uniquement.

question 4 :
Dans mon cours, a propos du mot-cle DATA il est marque :
"on peut utiliser l'instruction DATA pour initialiser les tableaux lors de leur declaration. Elle permet d'initialiser tout ou partie de tableaux a l'aide d'une liste de constantes encadree par le caractere

Ben oui, on initialise avec des constantes (i.e. valeurs connues a la compilation). Mais cela ne signifie pas que la variable initialisee est constante, evidemment (c'est le role du mot-cle parameter).

question 5 :
comment ecrire plus simplement le programme suivant :

Ce programme est deja suffisamment simple.

question 6 :
a propos des fonctions, est-ce la meme chose de faire

Oui (<type> function myfunc() est Fortran 90, cependant).

[salseropom]

Salut,
merci pour tes réponses. Effectivement, je désire apprendre le Fortran 95 (tant qu'à faire) sachant que je n'ai jamais fait de Fortran. Le cours que j'utilise est celui de l'IDRIS mais à te lire, j'ai l'impression que ce cours mélange le fortran 77 et 90...

Merci de tes réponses.

[Sylvain Bergeron]

question 2 :
Supposons que l'on ait
integer, dimension(10) :: ints, ints2

quelle est la difference entre
data (ints(i), i=1,4)/4*6.0/ et
ints2(1:4)=6
je trouve que la version avec ints2 est plus lisible que celle avec ints.

question 3 :
quelle est la difference entre l'operateur = et l'utilisation du mot-cle DATA ?

En complément aux réponses de DaZumba.

L'instruction DATA «s'execute» à la compilation. Elle permet d'initialiser l'image mémoire chargé. Si tu appelles une fonction contenant un DATA et que tu modifie la variable après le DATA, tu auras donc l'impression que le DATA ne s'exécute qu'une fois. Ça permet donc des choses comme :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
subroutine WriteResult(R)
...
logical PremiereFois
save PremiereFois
data PremiereFois/.true./
...
if (PremiereFois) then
  open(...)
  PremiereFois = .false.
endif
...

Un DATA est donc très différent d'une affectation. La façon « plus F90 » de coder un data est d'initialiser la variable à la déclaration :

Code :

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

logical PremiereFois=.true.

Cette initialisation est, tout comme le DATA, exécuté au chargement (ou plutôt à la compilation). De mémoire, le SAVE est implicit quand il y a un DATA ou une initialisation comme ci-haut.