boucle et variable en fortran

[invitea0f03ccc]

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

...
complex*16 Z,k,M,q,x
dimension k(10,10),x(10,10)
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
-----

[invited678abcd]

Question toute simple (ça fait longtemps que je n'ai plus fait de fortran) : tu définis k comme à 2 dim : k(10,10) puis, tu assignes seulement une dimension k(1)... k(10) .... l'erreur ne viendrait pas de là ?

[invite6de5f0ac]

Bonjour,

freddo a raison, ça vient bien de là. Fortran ce n'est pas comme C, on ne peut pas facilement tromper le compilo sur le rang d'un tableau. D'ailleurs l'intitulé de l'erreur ("Rank mismatch") est explicite !

A+,

-- françois