Bonjour,

je suis débutant en fortran et j'essaie de realiser un programme capable de lire un fichier .dat et d'extraire les valeurs pour les stocker dans les variables xpro, ypro.

Voici mon code

implicit none

real xpro (5600),ypro (5600)
real i1low, i2low, i1up, i2up, imax, i


OPEN(UNIT=1,file='DonnéesInjecteur.dat')

imax = 44
i1low = 1
i2low = imax+1
i1up = imax
i2up = 2*imax-3

do i=i2low,i2up
read(18) xpro(i), ypro(i)
end do


do i=i1low,i1up
read(18) xpro(i), ypro(i)
end do

close(unit=1)

OPEN(UNIT=1,file='valeur.dat')

do i=1,i2up

write(1,*) xpro(i)
write(1,*) ypro(i)

end do

close(unit=1)

stop
end

Je compile en utilisant gfortran -ffree-form -o test.exe test.f

Je recois le message d'erreur suivant

test.f:28.7:

do i=1,i2up
1
Warning: Deleted feature: End expression in DO loop at (1) must be integer


Merci pour votre aide!!