déclaration de variable

Bonjour,

Je débute sur FORTRAN et je ne comprend pas certaine déclaration de variable
Sur les exemple suivant que signifie les parenthèse et à quoi serve t il?
(J'ai chercher mais je n'ai rien trouver dessus)

DOUBLE PRECISION a( b, * )

INTEGER truc( * )

Bonjour,

Citation:

---

DOUBLE PRECISION a( b, * )

---

Ca signfie que a est une matrice de dimension b par * de réels double précision.

Citation:

---

INTEGER truc( * )

---

truc est un vecteur d'entiers de dimension *

On en déduit 2 choses :
1) ces 2 instructions ne peuvent être écrites que dans un sous programme puisqu'elles donnent des dimensions implicites (notées *) qui doivent être définies explicitement dans le programme principal.

2) La syntaxe est celle du FORTRAN 77. En Fortran 90 (ou plus) on écrira :

Code:

---

1 2 3

double precision, dimension(b,*) :: a integer, dimension(*) :: truc

---

Citation:

---

Envoyé par Grame

...La syntaxe est celle du FORTRAN 77. En Fortran 90 (ou plus) on écrira :

Code:

---

1 2 3

double precision, dimension(b,*) :: a integer, dimension(*) :: truc

---

---

Petite précision : La syntaxe integer truc(*) est toujours valide en Fortran 90, et il y a des indécrottables comme moi qui la préfèrent à la plus « moderne »...

Bonsoir Sylvain,

Citation:

---

Petite précision : La syntaxe integer truc(*) est toujours valide en Fortran 90, et il y a des indécrottables comme moi qui la préfèrent à la plus « moderne »..

---

J'entend bien, c'est pourquoi j'ai écrit

Citation:

---

on écrira :

---

et pas

Citation:

---

on doit écrire

---

Comme rAyyy nous dit

Citation:

---

Je débute sur FORTRAN

---

je pense qu'il vaut mieux lui conseiller une écriture « moderne » plutôt qu'une écriture qui risque de devenir obsolète dans les prochaines versions.

Ceci dit, très cordialement, bien sûr.

Devenir obsolète ? À mon avis, la syntaxe « type variable(dim) » va mourir en même temps que le langage...

Je viens de relire la documentation de John Reid sur les coarrays (ftp://ftp.nag.co.uk/sc22wg5/N1801-N1850/N1824.pdf). On parle d'une version très moderne de Fortran et l'auteur utilise presque exclusivement l'« ancienne » syntaxe.

J'ai lu je ne sais plus où que la différence de syntaxe est philosophique :

• integer, dimension(dim) :: variable signifie que la variable est du type « tableau d'integer »
• integer :: variable(dim) signifie que la variable est un tableau de type integer

La première syntaxe signifie que la dimension fait parti du type, ce qui n'est pas le cas dans la deuxième.

Sur ce, bonne soirée (?).