Discussion :

[fanchois]

Bonjour
j'ai un petit souci avec une variable (en fortran 95).
voila ce que j'ai

Code :

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

1
2
3
4
5
6
7
8
...
complex*16 Z,k,M,q,x
do j=1,n
...
k(j)=((0.d0,1.d0)*f*amu*(1.d0/rho))**(1.d0/2.d0)
x(j)=k(j)*(p-h)
enddo
...

mon probleme est qu'il n'aime pas les k(j) et x(j) pour lesquelles
j'aimerais qu'il me fasse k1, k2, k3, k4 et x1, x2, x3, x4 (n=4 )

Error: Rank mismatch in array reference at (1) (1/2)

vraisemblablement je ne fais pas ce qu'il faut...
K et X sont defini comme des complex et des dimension je pense que l'erreur vient de la (ou alors de la façon dont j'ecris...), mais je ne vois pas comment changer pour que mon compilateur apprécie .

Quelqu'un a-t-il une solution s'il vous plait?
Merci d'avance

[Ladgalen]

D'après le bout de code que tu nous as donné x et k ne sont pas déclaré comme des tableaux !

le *16 ne précise pas la dimension si tu ne met pas "dimension" dans la déclaration de la variable !

Si ce sont des tableaux utilise plutot

complex,dimension(la dimension)::k,x

[fanchois]

aaaaa....
ok j'avais commencé par mettre:

Code :

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

dimension k(10,10),x(10,10)

sans que ça marche... normal...
avec:

Code :

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

dimension k(10),x(10)

ça marche impeccable
merci

[Sylvain Bergeron]

Est-ce que tu utilises la syntaxe suivante ?

Code :

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

1
2
3
 
complex*16 Z,k,M,q,x
dimension k(10),x(10)

Si oui, sache que l'instruction dimension (pas l'attribut) est très dépréciée. C'est un archaïsme datant du typage implicite. Tu dois utiliser l'une des syntaxes suivantes :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
complex (16) Z,M,q
complex (16), dimension(10) :: k,x
 
ou
 
complex (16) Z,M,q
complex (16) k(10),x(10)
 
ou
 
complex (16) Z,k(10),M,q,x(10)